View previous topic :: View next topic
|
Author |
Message |
amitc23
New User
Joined: 05 Nov 2014 Posts: 96 Location: India
|
|
|
|
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 |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006 Posts: 1353 Location: Israel
|
|
|
|
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 |
|
|
amitc23
New User
Joined: 05 Nov 2014 Posts: 96 Location: India
|
|
|
|
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 |
|
|
amitc23
New User
Joined: 05 Nov 2014 Posts: 96 Location: India
|
|
|
|
Even I displayed the key in sysout and it exists, so not sure why this error. |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8700 Location: Dubuque, Iowa, USA
|
|
|
|
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 |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006 Posts: 1353 Location: Israel
|
|
|
|
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 |
|
|
Mickeydusaor
Active User
Joined: 24 May 2006 Posts: 258 Location: Salem, Oregon
|
|
|
|
Why was this not in the CICS ???? |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8700 Location: Dubuque, Iowa, USA
|
|
|
|
Topic moved from COBOL to CICS. |
|
Back to top |
|
|
|