MVSFORUMS.com

tcurrier · Intermediate Joined: 10 Feb 2006 Posts: 188 Topics: 68

Hello,

Does anyone know how to capture, in a COBOL program, the name of the load library that the program was loaded from ?

Thanks for any help....

semigeezer · Posted: Tue May 13, 2008 6:47 pm Post subject:

There is probably some good way to do this, but one way would be to run the various control blocks that are managed by Contents Supervisor. Its been a decade or so since I did this, but I think they were the CDE an LPDE ( or something similar). You'd have to know the address you were running at and then compare the load address and length to that known address. Or you could call statically linked assembler program that could do a CSVQUERY macro to do the same thing (CSVQUERY accepts an address and returns the name of the module loaded at that address).
_________________
New members are encouraged to read the How To Ask Questions The Smart Way FAQ at http://www.catb.org/~esr/faqs/smart-questions.html.

Terry_Heinze · Posted: Wed May 14, 2008 8:47 am Post subject:

You could force an abend and Abend-AID will tell you.
_________________
....Terry

tcurrier · Intermediate Joined: 10 Feb 2006 Posts: 188 Topics: 68

Thanks, but our production support unit doesn't like to wake people up at 2 AM if they don't have to ... Smile

Terry_Heinze · Posted: Wed May 14, 2008 11:34 am Post subject:

I realized that, but I was just proposing a "less than ideal" solution. I should have mentioned that initially. Smile

_________________
....Terry

tcurrier · Intermediate Joined: 10 Feb 2006 Posts: 188 Topics: 68

I know.. my reply was merely in jest.... Wink