If the 35 is in the status for a file opened for some form of input, then it is not present.
Are you sure it is the I-O file and not another input file?
The only connection between the program and the operating system is through the filenames in the selects and the filenames on the DDs.
Don't worry about if the file exists or not, if it didn't, that would be another error.
Post your selects and the DD jcl.
Joined: 16 May 2006 Posts: 16 Location: Philippines
just some data exception (which i already solved by this time)
i made some test on the i-o file to see if it contain any record after the write section in the program, i found nothing in the file, it's weird because it does not return any error, i only noticed it when the 2nd part of the program, which is where the file is being used as input, abend.
this is my code for the write statement
MOVE 1 TO TEMP-SEQUENCE-NUMBER.
SET WS-TEMP-WRITTEN-NO TO TRUE.
PERFORM UNTIL WS-TEMP-WRITTEN-YES
IF NOT WS-TEMP-STAT-OK THEN
DISPLAY 'WRITE TEMP FILE ERROR: ' WS-TEMP-STAT
GO TO 7100-ERROR
SET WS-TEMP-WRITTEN-YES TO TRUE