Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

LISTCAT return code -262

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
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    Post subject: LISTCAT return code -262
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

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Thu Dec 15, 2011 5:59 pm    Post subject: Reply to: LISTCAT return code -262
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

Senior Member


Joined: 01 Sep 2006
Posts: 2025
Location: Silicon Valley

PostPosted: Thu Dec 15, 2011 7:56 pm    Post subject: Reply to: LISTCAT return code -262
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: 1746
Location: Bloomington, IL

PostPosted: Thu Dec 15, 2011 8:10 pm    Post subject: Re: LISTCAT return code -262
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: 183
Location: Toronto, ON, Canada

PostPosted: Sat Dec 17, 2011 3:38 am    Post subject: Re: LISTCAT return code -262
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    Post subject: Reply to: LISTCAT return code -262
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: 183
Location: Toronto, ON, Canada

PostPosted: Fri Dec 30, 2011 1:34 am    Post subject: Reply to: LISTCAT return code -262
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    IBMMAINFRAMES.com Support Forums -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to Capture the Max return code of... anilkumar922 All Other Mainframe Topics 0 Thu Jan 12, 2017 12:02 pm
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts PL/I code tuning/Performance improvement Virendra Shambharkar PL/I & Assembler 4 Mon Dec 05, 2016 11:57 am
No new posts What is the code in CLIST to enable t... jackzhang75 CLIST & REXX 1 Fri Dec 02, 2016 3:02 am
No new posts IDEAL - Code Retrieval yugendran CA Products 0 Fri Nov 25, 2016 3:27 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us