Re: [MI400] [RE] Symbol Table

[Gene_Gaunt@xxxxxxxxxxxxxxx]

Be aware the "*ENTRY" you see in an OPM RPG symbol table entry is for the
operand-list named *ENTRY, not for the program's external entry-point.  An
OPM RPG program that begins:

C      *ENTRY   PLIST
C               PARM        STUFF

will generate this MI code:

DCL OL  *ENTRY  (STUFF.P)  PARM  EXT  MIN(0);
ENTRY   .whatever  (*ENTRY)  EXT;

If you obtain the ODT number of an operand-list named "*ENTY" by finding "
*ENTRY" in an OPM RPG symbol table, unfortunately there still is no way to
find the ODT number of a corresponding entry-point that uses this *ENTRY
operand-list, other than searching the entire ODT array for entry-point
entries and comparing the operand-list ODT number inside the body of each
entry-point entry for a match with your *ENTRY number.