The OpenEdge Hive

Hi...

I'm trying to develop some code which writes an audit record.
Basically I want to put the calling procedure name into record when I write it

The code is run something like this

/*Test.p*/
run pctest.
Procedure pcTest:
run audit.p("this is some audit code")
end.

How can I get access to both the name of the .p and the name of the internal procedure from within audit.p??????

i.e. test.p pcTest

I want to write this to the log file so I ca easily see what called it

Thanks in advance
ryan