View previous topic :: View next topic |
Author |
Message |
suma Beginner
Joined: 23 Jan 2006 Posts: 65 Topics: 29
|
Posted: Wed Aug 03, 2011 2:04 am Post subject: eibresp=16 and eibresp=47 |
|
|
Hi all,
I am getting EIBRESP=16 AND EIBRESP2=47 while Rewriting a KSDS Vsam file. Please review this codes and let me know what is the problem with my code.
Before rewrite I have READ statement which is show below
Code: | EXEC CICS
READ DATASET(FILE)
RIDFLD(PRIME-KEY)
INTO(WS-REC)
RESP(WS-RESP1)
UPDATE
TOKEN(WS-TOKEN)
END-EXEC |
WS-TOKEN is defined as PIC X(10).
if the read is succesfull, then I am rewriting vsam file using command as show below
Code: | EXEC CICS
REWRITE(FILE)
FROM(WS-REC)
TOKEN(WS-TOKEN)
END-EXEC |
thanks
Suma |
|
Back to top |
|
 |
kolusu Site Admin

Joined: 26 Nov 2002 Posts: 12378 Topics: 75 Location: San Jose
|
Posted: Wed Aug 03, 2011 11:02 am Post subject: |
|
|
suma,
Is this a C application? If so read this
http://www.ibm.com/support/docview.wss?uid=swg1PQ49218
If not IIRC, the token should be defined as S9(8) COMP. Try to change the definition from X(10) to S9(8) COMP and see if it works.
Kolusu |
|
Back to top |
|
 |
|
|