View previous topic :: View next topic
|
Author |
Message |
rexph
New User
Joined: 03 Mar 2005 Posts: 2
|
|
|
|
Hi all,
Using a standard CICS read command as illustated below
EXEC CICS READ
FILE ('filename')
INTO (record-area)
LENGTH (LENGTH OF record-area)
RIDFLD (ws-ridfield)
EQUAL
RESP (WS-CICS-RESP)
END-EXEC.
I have encounted a length error problem with one of the programs I'm investigating. But there is a mirror program that uses the same file andis not encountering the error. The strange thing in this program is that before execution of the read command the length already shows a negative 23565 value. As I understand before execution the length should be zeroes and only after execution that the length will have a value. Can anybody shed light on this?
Thanks
Rex :?: |
|
Back to top |
|
|
meetsrk
New User
Joined: 13 Jun 2004 Posts: 85
|
|
|
|
hi,
Check the record length of the VSAM file and the record length of record-area in working storage section are same
or
Check the length picture clause, whether it is declared as S9(4) COMP. |
|
Back to top |
|
|
mmwife
Super Moderator
Joined: 30 May 2003 Posts: 1592
|
|
|
|
Hi Rex,
Can you show us the actual READ cmd and the listing of "record-area" and perhaps a few lines before and after the "record-area" description?
Another possiblity is that the length field generated by the cmd is being overlaid. Is there any table processing in the pgm? |
|
Back to top |
|
|
|