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
 

 

EIBRESP 13 on Alternate Index

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
amitc23

New User


Joined: 05 Nov 2014
Posts: 78
Location: India

PostPosted: Wed Feb 18, 2015 6:33 pm    Post subject: EIBRESP 13 on Alternate Index
Reply with quote

Hi
My program is trying to read a record from a file which is Alternate index of a VSAM dataset. Problem is it is getting a EIBRESP 00000013 , intermittently. It sometimes works fine , but all of a sudden gives this Response Code 13. Nothing looks wrong in the program. The read command is as below.

EXEC CICS READ
FILE(WIPPath)
RIDFLD(WIPPathKey)
KEYLENGTH(WIPPathKeyLength)
INTO(RETURN-DATA)
Nohandle
Resp(Resp)
END-EXEC.


Any suggestions.
Back to top
View user's profile Send private message

Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1219
Location: Israel

PostPosted: Wed Feb 18, 2015 6:46 pm    Post subject:
Reply with quote

IEBRESP 13 is NOTFND.
No GENERIC in the READ command, so I guess that sometimes the full key is really not found.
Back to top
View user's profile Send private message
amitc23

New User


Joined: 05 Nov 2014
Posts: 78
Location: India

PostPosted: Wed Feb 18, 2015 6:52 pm    Post subject: EIBRESP 13 on Alternate Index
Reply with quote

Hi Marso
This is how key is populated
Move High-Values to WIPPathKey.
Move 'SG' to WIPPathKey-SG.
Move REQ-KEY-SIGN-ON-OPER to WIPPathKey-OprID
Move 30 to WIPPathKeyLength

and the definition is
05 WIPPathKey.
10 WIPPathKey-SG PIC X(02).
10 WIPPathKey-OprID PIC X(08).
10 Filler PIC X(20).

I checked the file after this error and the key is there, it is
'SGACHOPR ' where ACHOPR is my id and rest all are high values x'FF'.
Back to top
View user's profile Send private message
amitc23

New User


Joined: 05 Nov 2014
Posts: 78
Location: India

PostPosted: Wed Feb 18, 2015 6:53 pm    Post subject:
Reply with quote

Even I displayed the key in sysout and it exists, so not sure why this error.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7913
Location: Bellevue, IA

PostPosted: Wed Feb 18, 2015 7:34 pm    Post subject:
Reply with quote

Since the FILLER is part of the key, and you are not using GENERIC, then you MUST ensure that the FILLER bytes in your program match the FILLER bytes in the VSAM file -- or you will get a NOTFND response. If the FILLER is SPACES in the VSAM file, and you use HIGH-VALUES in your program -- you will get a NOTFND since SPACES do not match HIGH-VALUES.
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1219
Location: Israel

PostPosted: Wed Feb 18, 2015 8:06 pm    Post subject:
Reply with quote

Field WIPPathKey-OprID is 8 chars long, your ID has 6 chars only.
So the key you try to read is: (mind the hex values)
Code:
----+----1----+----2----+----3
SGACHOPR                     
ECCCCDDD44FFFFFFFFFFFFFFFFFFFF
2713867900FFFFFFFFFFFFFFFFFFFF


I just want to make sure the file has this exact key.
Back to top
View user's profile Send private message
Mickeydusaor

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Wed Feb 18, 2015 8:25 pm    Post subject:
Reply with quote

Why was this not in the CICS ????
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7913
Location: Bellevue, IA

PostPosted: Wed Feb 18, 2015 11:34 pm    Post subject:
Reply with quote

Topic moved from COBOL to CICS.
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 -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Several errors during building altern... Andi1982 JCL & VSAM 11 Wed Jul 06, 2016 7:39 pm
No new posts Drop building Alternate Index for a p... bhavin.mehta JCL & VSAM 6 Mon Jul 04, 2016 3:47 pm
No new posts VSAM Alternate Index in CICS jacobdng CICS 2 Fri May 06, 2016 1:41 pm
No new posts Rebuilding IMS secondary index withou... Hooman24 IMS DB/DC 6 Tue Mar 29, 2016 12:22 pm
No new posts How to find Table-space and Index-spa... venksiv DB2 5 Wed Feb 03, 2016 6:16 pm


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