Re: Linking RPG module to a CL Program

["Charlie Massoglia" <cmassoglia@xxxxxxxxxxx>]

Title: Linking RPG module to a CL Program

Try the following:

 

    RTVOBJD OBJ(PGMNAME) OBJTYPE(*PGM) RTNLIB(&RTNLIB)

 

where PGMNAME is the name of the program which is running.  &RTNLIB will contain the name of the first library in the library list containing that program.  This assumes the program was called using the library list and not with a qualified library name.

 

 

Charles L.Massoglia, President
Massoglia Technical Consulting, Inc.
cmassoglia@voyager.net
In MI 517-676-9700 or in NC 919-363-9395

----- Original Message -----

From: Steve Moland

To: Rpg400-L-Digest (E-mail)

Sent: Friday, 30 March, 2001 09:47

Subject: Linking RPG module to a CL Program

I'm still looking for direct way for a CL program to know what library it was loaded from. I don't have the option of passing in a parameter.

If I created a small RPG module which used the Program Status Data Structure I'd have the name of the library from which the program was loaded. Does the MAIN program have to be RPG for structure to be populated?

However I can't seem to find an example of how I'd prototype the call or use of the module in a CL program.

Is this something a CL program can't do?

Steve Moland