COBOL as/400 Call Error MCH3601

[liquidsin]

First i get this error message when i call the program after a clean compile

Message . . . . : I/O operation failed in program 'ASSIGN' in library

'F04MW113' (C D F G).

Cause . . . . . : COBOL program 'ASSIGNMENT' in program object 'ASSIGN' in

library 'F04MW113' issued an I/O operation on file 'PRINTFILE' at COBOL

statement 118 which failed with file status '90'; and no error handler

existed. When an unsuccessful file status is received from an I/O operation,

an AT END/INVALID KEY, USE PROCEDURE, or FILE STATUS should be coded to

handle the error.


Then after i push enter or G i get this error message which is severity 50

Message . . . . : Message 'MCH3601' in program object 'ASSIGN' in library

'F04MW113' (C D F G).

Cause . . . . . : Message 'MCH3601' was detected in COBOL statement 122 of

COBOL program 'ASSIGNMENT' in program object 'ASSIGN' in library 'F04MW113'.


Hopefully someone can fiqure this out, as looked for hours on these errors on
the net and couldn't find what i needed =/

Thanks
Rob

 

[fredericofonseca]

http://publib.boulder.ibm.com/iseries/v5r2/ic2924/index.htm

Look under programming - COBOL

You will find the COBOL users and reference manual's, and they will have the meaning of the file status 90.

As for the MCH3601 if you press F1 on the message you will have plenty of information regarding the error, including the program instruction where the error occurred.
It is then a matter of going to that instruction and see what could be causing the problem.

It is probably related to the previous error.

As a minor point you should not be selecting "G" to continue if you don't know what you are doing.

Regards

Frederico Fonseca
SysSoft Integrated Ltd

http://www.syssoft-int.com