Archives of the TeradataForum
Message Posted: Thu, 22 Aug 2002 @ 12:52:16 GMT
<-- Anonymously Posted: Thursday, August 22, 2002 07:55 -->
Question on INMOD:
I'am writing a COBOL INMOD for a TPUMP script. The INMOD has to read a input file sequentially, process every record and pass to TPUMP. The INMOD is failing when it gets a RETURN-CODE 1 from TPUMP.
The code looks like
IF WS09-RETURN-CODE EQUAL 0 DISPLAY 'WS09-RETURN-CODE = 0' PERFORM S1000-OPEN-FILES PERFORM S2000-READ-RECORDS GOBACK ELSE IF WS09-RETURN-CODE EQUAL 1 DISPLAY 'WS09-RETURN-CODE = 1' PERFORM S2000-READ-RECORDS GOBACK
The READ statement fails with File-Status-Code of 47 (Meaning trying to READ a file not open).
Any advise will be appreciated.
Thanks & Regards
|Copyright 2016 - All Rights Reserved|
|Last Modified: 28 Jun 2020|