Re: Procedures within procedures?

James,

The things not defined seem to be fields in some standard /copy members for standard fields and the procedure prototypes. Perhaps I do not understand the sequence of source records. My latest try is as follows:

GetFileInf prototype

GetFileInf B
GetFileInf PI

BitIsOn prototype
KeyTools prototypes
MsgTools prototypes

/copy PgmConstants
/copy UsrSpc structures

Local D spec defines

GetFIleInf code and a few subroutines here

More subprocedures here, such as

BitIsOn B
BitIsOn PI
some procedure code
BitIsOn E

Then finally

GetFileInf E


One of the typical things not found is BitIsOn and the message is linked to the BitIsOn B statement. I have tried moving the specs around in different sequences, but I have not found anything that seems to work very well.


James H. H. Lampert wrote:

Dave Murvin wrote:

What I am getting is a ton of things not defined.

Of course you can have procedures calling other procedures.

By "things not defined," I'm guessing that your program is compiling just fine, but not linking. You have two choices: you can compile to module level (15 instead of 14 in PDM), and link manually using a CRTPGM, or you can set up a binding directory, and refer to it in an H-spec.

Or maybe I don't understand the question.
--
JHHL