View previous topic :: View next topic
|
Author |
Message |
rammraju
New User
Joined: 05 Mar 2005 Posts: 65 Location: Hyderabad
|
|
|
|
Hi all,
When I try to run a job, in that I am reading a VSAM file and it is giving me 92 return code. I have run the same job around 10 times before, it was running fine but now it is abending. When I promote the same code from a different changeman package, it is working.
Below are the details of the file
Code: |
SELECT I-FILEA ASSIGN TO FILEA
ORGANIZATION IS INDEXED
ACCESS MODE IS RANDOM
RECORD KEY IS FILEA-KEY
FILE STATUS IS WS-FILEA-RC,
WS-FILEA-VSAM-CODE.
SELECT I-FILEB ASSIGN TO FILEB
FILE STATUS WS-FILEB-RC.
FD I-FILEA
LABEL RECORDS ARE STANDARD
BLOCK CONTAINS 0 RECORDS.
01 WS-FILEA-REC PIC X(2000).
FD I-FILEB
RECORDING MODE IS F
LABEL RECORDS ARE STANDARD
BLOCK CONTAINS 0 RECORDS.
01 WS-FILEB-REC PIC X(500).
.
.
PROCEDURE DIVISION.
.
.
OPEN INPUT I-FILEA
I-FILEB.
.
.
.
READ I-FILEB
INTO WS-FILEB-REC
END-READ.
MOVE FILEB-NBR TO FILEA-KEY.
READ I-FILEA
KEY IS FILEA-KEY
END-READ.
.
.
. |
|
|
Back to top |
|
|
CICS Guy
Senior Member
Joined: 18 Jul 2007 Posts: 2146 Location: At my coffee table
|
|
|
|
Logic error, the answer is in your WS-FILEA-VSAM-CODE, can you display it? |
|
Back to top |
|
|
rammraju
New User
Joined: 05 Mar 2005 Posts: 65 Location: Hyderabad
|
|
|
|
Unfortunately the variable WS-FILEA-VSAM-CODE is not getting populated. |
|
Back to top |
|
|
CICS Guy
Senior Member
Joined: 18 Jul 2007 Posts: 2146 Location: At my coffee table
|
|
|
|
Is it FILEA?
Did FILEA open? Status?
Is FILEA actually VSAM?
It's your code, you are the only one that can test the statuses and put in the displays.....
rammraju wrote: |
Unfortunately the variable WS-FILEA-VSAM-CODE is not getting populated. |
I find that very hard to believe..... |
|
Back to top |
|
|
rammraju
New User
Joined: 05 Mar 2005 Posts: 65 Location: Hyderabad
|
|
|
|
Yes FILEA is VSAM file and it is the one which is giving 92 return code on read(if a matching key is found, or else it is giving 23 return code). It opened with return code 00.
I dont know why WS-FILEA-VSAM-CODE is not getting populated, I am looking into that still |
|
Back to top |
|
|
rammraju
New User
Joined: 05 Mar 2005 Posts: 65 Location: Hyderabad
|
|
|
|
Problem solved, Actually the file FILEA which I am referring to as VSAM is not VSAM actually, its IAM file. and IAM files donot give VSAM return codes, thats the reason my variable WS-FILEA-VSAM-CODE is not getting populated.
The reason for the 92 return code was the record structure of the file FILEA and the actual file size are not in sync.
anyways thanks for the replies |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello RamaMohan,
Thank you for posting how the problem was resolved |
|
Back to top |
|
|
|