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

RESP2 code -502


IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
pshongal

New User


Joined: 14 Jun 2012
Posts: 96
Location: India

PostPosted: Mon May 28, 2018 10:58 am
Reply with quote

I am getting value as -502 in RESP2 field and 16 in RESP while reading the file.

Code:

EXEC        CICS                                         
            READ  DATASET   (SWA-XXX-DSID)           
                      INTO         (XXX-RECORD)             
                      LENGTH    (SWA-XXX-RECORD-LENGTH) 
                      RIDFLD    (SWA-XXX-KEY)           
                      GTEQ                               
                      RESP      (L77-RESP)               
                      RESP2     (L77-RESP2)             
END-EXEC.                                               


16 is related to INVREQ, but what's -502?
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2455
Location: Hampshire, UK

PostPosted: Mon May 28, 2018 1:10 pm
Reply with quote

Where have you looked for the answer?
Back to top
View user's profile Send private message
pshongal

New User


Joined: 14 Jun 2012
Posts: 96
Location: India

PostPosted: Mon May 28, 2018 1:51 pm
Reply with quote

Googled and found some codes in below site. Also searched in this forum, But could not find -502

www.ibm.com/support/knowledgecenter/en/SSGMGV_3.1.0/com.ibm.cics.ts31.doc/dfhp7/dfhp75b.htm
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Mon May 28, 2018 6:02 pm
Reply with quote

OK... I will bite
the cics api reference syntax for the read is
EXEC CICS READ FILE(...)
...
as per
www.ibm.com/support/knowledgecenter/en/SSGMCP_4.2.0/com.ibm.cics.ts.applicationprogramming.doc/commands/dfhp4_read.html


the only reference I found for
EXEC CICS READ DATASET
is in a microfocus environment


but apart that You should learn how to format properly
EIBRESP and and EIBRESP2
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Mon May 28, 2018 7:59 pm
Reply with quote

The CICS Language Reference manual lists valid RESP2 values for an EXEC CICS READ that returns INVREQ RESP as ranging from 20 to 59. Your -502 is way outside those ranges, so the possibilities are:
- you are doing your EXEC CICS READ on a non-system z machine (using Microfocus for example), in which case you need to consult their documentation
- you are incorrectly formatting RESP2 and getting the invalid value that way
- you are mis-interpreting the actual value to be -502

You will need to do additional investigation to figure out what the actual value is and what it tells you about your EXEC CICS READ command.
Back to top
View user's profile Send private message
pshongal

New User


Joined: 14 Jun 2012
Posts: 96
Location: India

PostPosted: Tue May 29, 2018 8:08 am
Reply with quote

Thanks for your insights in to this.

We are executing this transaction in system Z machine itself and I am seeing the value by debugging using Xpeditor.

Looks like I need to check the internal documentation to see if they are formatting the value in some way.
Back to top
View user's profile Send private message
pshongal

New User


Joined: 14 Jun 2012
Posts: 96
Location: India

PostPosted: Tue May 29, 2018 12:32 pm
Reply with quote

Finally it is resolved

Internally DB2 code was moved to RESP2. So -502 was DB2 error.

Issue was with END-BROWSE, after start browse, end-browse was not executed due to some wrong condition. Which was corrected and issue got resolved.
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 -> CICS

 


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 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
No new posts Monitoring production job progress. N... JCL & VSAM 4
Search our Forums:

Back to Top