Database fields in a progress program

[goos]

Hello,

I've got to make a program wich can get the database fields wich are included in a other progress program.
For example:

run getDatabaseFields.p
(INPUT program.w)

Does anyone know a way to do this??

Greetings Bob

 

[jongpau]

Hi Bob,

Try compiling the procedure with XREF and then read (and analyse) the XREF file that Progress creates. For instance:

DEF INPUT PARAMETER IPProcedure AS CHAR NO-UNDO.
COMPILE VALUE(IPProcedure) XREF VALUE(IPProcedure + ".xrf":U).
INPUT FROM VALUE(IPProcedure + ".xrf":U) NO-ECHO.
REPEAT:
  IMPORT..
  ..
END.

Look in the Progress manuals for the information you can obtain from the XREF files...

HTH