fileprocedureopenedgeprogress-4gl

Get invoked Progress procedure .p file location at runtime


Lets say I have a simple procedure file in my system:

C:\git\project\helloworld.p

Inside this procedure file, the code needs to know it's location on my system at runtime. So in my computer in this case it would be:

C:\git\project\helloworld.p

In my friend's computer it could be:

D:\codingprojects\project\helloworld.p

Is there any way to resolve the procedure file location at runtime?


Solution

  • FILE-INFO:FILE-NAME = THIS-PROCEDURE:FILE-NAME.
    MESSAGE FILE-INFO:FULL-PATHNAME.