While trying to read load module using LMGET service, for few components its working fine,
but for few its giving RC 8 (End-of-data set condition; no message formatted), though attributes of both kinds of components are same.
I tried option INVAR with DO but its not reading till lrecl. I went thru manuals but not getting the actual cause.
Code:
"ISPEXEC LMINIT DATAID(LMD1) DATASET('"DSN1"') ENQ(SHR)"
"ISPEXEC LMOPEN DATAID("LMD1") OPTION(INPUT)"
"ISPEXEC LMMFIND DATAID("LMD1") MEMBER("MEMNAME")" /*STATS(YES)*/
"ISPEXEC LMGET DATAID("LMD1") MODE(MULTX) DATALOC(INREC),
DATALEN(INLEN) MAXLEN(2000)"
"ISPEXEC LMCLOSE DATAID(&LMD1)"
"ISPEXEC LMFREE DATAID("LMD1")"
"ISPEXEC LMOPEN DATAID("LMD1") OPTION(INPUT)"
"ISPEXEC LMMFIND DATAID("LMD1") MEMBER("MEMNAME")" /*STATS(YES)*/
"ISPEXEC LMGET DATAID("LMD1") MODE(MULTX) DATALOC(INREC),
DATALEN(INLEN) MAXLEN(2000)"
"ISPEXEC LMCLOSE DATAID(&LMD1)"
"ISPEXEC LMFREE DATAID("LMD1")"
Trace:
*-* "ISPEXEC LMGET DATAID("LMD1") MODE(MULTX) DATALOC(INREC),
DATALEN(INLEN) MAXLEN(80)"
+++ RC(8) +++
I have tried with different values of MAXLEN.
Please tell is there anything wrong with the usage,
Regards