MVSFORUMS.com

[ayush]

Hi,

I am trying to run a retrieval job and writing to a KSDS file from the IDMS Database.
However, the job abends and gives me the reason

A COBOL II U1020 abend occurred during execution of program PMVSAM.
An attempt to WRITE a record to file OUTFILE failed because the file was
not open in output, I-O or extend mode. This corresponds to file status
code 48. Neither FILE STATUS nor an ERROR declarative were specified in
the program and the job abended.

though i have coded "open output outfile and defined the code-fstat variable in the below described manner

OPEN OUTPUT OUT-FILE.
DISPLAY 'VSAM RETURN CODE' FSTAT-CODE.

when i lookinto the SYSOUT, i only get blanks for VSAM RETURN CODE
Unable to detect the problem. Please suggest any solution.
Thanks.

[ayush]

Hi Ravi,

Thanks. Its working now.
Giving a VSAM Status of 39.
Where can i find help regarding these status?

Thanks.