It only takes a few REXX statements to read in  and concatenate the module in 
memory. Put it in a DO loop until EOF. LMGET  a record into a variable. If 
not EOF, one REXX statement will concatenate it,  i.e.,...
 
modulearea = modulearea || inputrecord
 
If EOF, move to the next module.
 
Looks like the entire EXEC to process all the modules in the load  library 
will only be about 100 lines of code.
 
Ira
 
In a message dated 4/27/2007 2:23:41 P.M. Central Standard Time,  
[EMAIL PROTECTED] writes:

Why not  do this in Assembler?  There are interfaces for reading the 
directory  of the PDS; then do a LOAD, [insert your scan of the loaded load 
module  here], DELETE for each load module? LOAD will return the address 
and  length of the entire module loaded, if I am not mistaken, which is 
easier  than assembling the module in Rexx, I think.


Tim Hare
Senior  Systems Programmer
Florida Department of Transportation
(850)  414-4209

----------------------------------------------------------------------
For  IBM-MAIN subscribe / signoff / archive access instructions,
send email to  [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the  archives at  http://bama.ua.edu/archives/ibm-main.html







************************************** See what's free at http://www.aol.com.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to