I am getting the following error :
READY
ISPSTART CMD(%xxxxxxxx)
IRX0250E System abend code 013, reason code 00000024.
IRX0255E Abend in host command EXECIO or address environment routine TSO.
IRX0670E EXECIO error while trying to GET or PUT a record.
ISRLS062Find member not done -/-For partitioned data sets, LMGET requires previous successful LMMFIND.
FYI - The REXX code xxxxxxxx is already present in xyz library.
Joined: 01 Sep 2006 Posts: 2547 Location: Silicon Valley
LMINIT should use the name of the dataid variable (it should be a constant value). Other services should use the value of the variable that is returned by LMINIT.
LMINIT should use the name of the dataid variable (it should be a constant value). Other services should use the value of the variable that is returned by LMINIT.
Joined: 01 Sep 2006 Posts: 2547 Location: Silicon Valley
You seem to have multiple problems with the LMINIT statement.
1. It needs to use the name of the variable (you already fixed)
2. it needs to refer to a file that is allocated.
because the name is not a valid data set name. The allocation failed.
Of course, a trace would have shown you that the ALLOC failed. And your code should check the return code before proceeding to statements that rely on RC=0.
You seem to have multiple problems with the LMINIT statement.
1. It needs to use the name of the variable (you already fixed)
2. it needs to refer to a file that is allocated.
because the name is not a valid data set name. The allocation failed.
Of course, a trace would have shown you that the ALLOC failed. And your code should check the return code before proceeding to statements that rely on RC=0.
I provided the valid file name in LOAD, just for posting purpose, i mentioned the 'Loadlib name'.
You seem to have multiple problems with the LMINIT statement.
1. It needs to use the name of the variable (you already fixed)
2. it needs to refer to a file that is allocated.
because the name is not a valid data set name. The allocation failed.
Of course, a trace would have shown you that the ALLOC failed. And your code should check the return code before proceeding to statements that rely on RC=0.
I provided the valid file name in LOAD, just for posting purpose, i mentioned the 'Loadlib name'.
Thanks a lot enrico,dick,Akatsukami and Pedro for all of yours help.
I followed the TRACE and resolved the problem. The actual problem was in RC handling and LMINIT syntax.
You seem to have multiple problems with the LMINIT statement.
1. It needs to use the name of the variable (you already fixed)
2. it needs to refer to a file that is allocated.
because the name is not a valid data set name. The allocation failed.
Of course, a trace would have shown you that the ALLOC failed. And your code should check the return code before proceeding to statements that rely on RC=0.
I provided the valid file name in LOAD, just for posting purpose, i mentioned the 'Loadlib name'.
Thanks a lot enrico,dick,Akatsukami and Pedro for all of yours help.
I followed the TRACE and resolved the problem. The actual problem was in RC handling and LMINIT syntax.
I changed the code as follows:
"ALLOC F(DBFILE) DS('"DBRM"("Z")') SHR REUSE"
"EXECIO * DISKR DBFILE (FINIS STEM DBF."
FIND_RC = RC
"FREE F(DBFILE)"
OTX=OUTTRAP("OFF")
IF FIND_RC > 0 THEN
DO
DBR_TOKEN = "DBR NOT FOUND"
LOD_TOKEN = "NOT MATCHED"
PKG_TOKEN = X
END
IF FIND_RC = 0 THEN
DO
Before it was setting RC=0 again and again.
and i changed the LMINIT syntax.