IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

LISTCAT return code -262
IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
Chaketh Ram

New User


Joined: 16 Nov 2011
Posts: 7
Location: India
PostPosted: Thu Dec 15, 2011 5:48 pm
 Reply with quote
For a given list of list, LISTCAT is executed from a rexx script.The rexx script is executed through a JCL.

For some files the return code of LISTCAT is -262. The error message is as follows.

Code:

*-*  "LISTC ENTRY('"dsname"') ALL"
+++ RC(-262) +++


Please let me know how to resolve this.Appreciate your help
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
PostPosted: Thu Dec 15, 2011 5:59 pm
 Reply with quote
Please post a Trace of the REXX exec up to this point, as well as the LISTCAT error messages.
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley
PostPosted: Thu Dec 15, 2011 7:56 pm
 Reply with quote
and show us your JCL.
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL
PostPosted: Thu Dec 15, 2011 8:10 pm
 Reply with quote
Chaketh Ram wrote:
For a given list of list, LISTCAT is executed from a rexx script.The rexx script is executed through a JCL.

For some files the return code of LISTCAT is -262. The error message is as follows.

Code:

*-*  "LISTC ENTRY('"dsname"') ALL"
+++ RC(-262) +++


Please let me know how to resolve this.Appreciate your help

ENTRY is bogus. Read about LISTCAT and fix it.
Back to top
View user's profile Send private message
jerryte

Active User


Joined: 29 Oct 2010
Posts: 202
Location: Toronto, ON, Canada
PostPosted: Sat Dec 17, 2011 3:38 am
 Reply with quote
Chaketh Ram wrote:
Code:

*-*  "LISTC ENTRY('"dsname"') ALL"
+++ RC(-262) +++


Syntax is incorrect. It should be
Code:
"LISTC ENTRIES('"dsname"') ALL"

Read the TSO Command Reference manual for all of the options
Back to top
View user's profile Send private message
Chaketh Ram

New User


Joined: 16 Nov 2011
Posts: 7
Location: India
PostPosted: Tue Dec 20, 2011 12:33 pm
 Reply with quote
The Issue is resolved.

The JCL that is used is
Code:

//P86BHH00  JOB (DWR,SYS999,TSO--TC3,P03EDM),
//   'VSMC',NOTIFY=P86BHH,MSGLEVEL=(1,1),
//    MSGCLASS=X,CLASS=7,USER=PRDTDM
//STEP01   EXEC PGM=IKJEFT01,DYNAMNBR=20,PARM='ISPSTART
//              CMD(%ZTST) BDISPMAX(99999)'
//SYSEXEC  DD DISP=SHR,DSN=TSTK.TDMS.CHAKETH.REXX.SOURCE.TESTC
//ISPPLIB  DD DISP=SHR,DSN=SYS1.SISPPENU
//         DD DISP=SHR,DSN=SYS1.ISRPLIB
//ISPMLIB  DD DISP=SHR,DSN=SYS1.SISPMENU
//         DD DISP=SHR,DSN=SYS1.ISRMLIB
//ISPSLIB  DD DISP=SHR,DSN=SYS1.SISPSENU
//         DD DISP=SHR,DSN=SYS1.ISRSLIB
//ISPTLIB  DD DISP=SHR,DSN=SYS1.SISPTENU
//         DD DISP=SHR,DSN=SYS1.ISRTLIB
//SYSPROC  DD DISP=SHR,DSN=SYS1.SISPEXEC
//         DD DISP=SHR,DSN=SYS1.CLIST
//ISPPROF  DD DSN=&&TMPPRF,DISP=(NEW,DELETE,DELETE),
//            RECFM=FB,LRECL=80,SPACE=(TRK,(2,2,2))
//ISPLOG   DD DUMMY,DCB=(RECFM=VBA,LRECL=125,BLKSIZE=27944)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSIN  DD DUMMY
//INPFL    DD DISP=SHR,DSN=TSTK.TDSS.OPFL41K.TMP.FL


and the rexx code(simplified)

Code:

/* Rexx */

call Initialize

address tso
"EXECIO * DISKR  inpfl (STEM inp_read. finis"

do j=1 to inp_read.0
parse upper var inp_read.j dsn acc typ ex

   if j//100 = 0 then say "Processing : "right(j,6,'0') dsn

   if typ == 'GDG' then
   do
   parse var ex gdgct ltver exq
   dsname = ltver
   end
   else dsname = dsn

x = Outtrap("listc.")
Address TSO
"LISTC ENTRY('"dsname"') ALL"
lcc=rc
x = Outtrap("OFF")


return code of this listcat command is used to be -262

the inp file is of length 2000 byte and contains around 40k records.I faced the same error while exectuig the command hrecall(through rexx) also.

Solution: Added the parameter Region=0M in the jobcard and the rexx code executed fine in batch mode.

I reckon the issue might be related to virtual space used during execution.I couldn't fine much detail in googling.I don't have much expertise in this and please correct me if i'm wrong.
Back to top
View user's profile Send private message
jerryte

Active User


Joined: 29 Oct 2010
Posts: 202
Location: Toronto, ON, Canada
PostPosted: Fri Dec 30, 2011 1:34 am
 Reply with quote
Chaketh

If your Rexx is not using any ISPF service calls (ie. only TSO commands) then your jcl does not need to be so complicated. You can remove all of the DD names that being with ISP and then change the EXEC to:
Code:
//STEP01   EXEC PGM=IKJEFT01,DYNAMNBR=20,PARM='%ZTST'

This will run the Rexx in a TSO environment. The "ISPSTART" will start an ISPF environment which would be just extra overhead.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CLIST & REXX

 

Similar Topics
Topic Forum Replies
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts Return codes-Normal & Abnormal te... JCL & VSAM 7
No new posts REXX code to expand copybook in a cob... CLIST & REXX 2
No new posts VSAM return code 23 - for a Random read COBOL Programming 4
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us