Re: Read File with DB2

[Stu-Wood <SWood2@OFFICEDEPOT.COM>]

Here is the code:

    WHILE  1
        READ 1 INTO $RECORD:80
            STATUS=#integer

        IF #integer != 0
            SHOW 'Cannot Read Standard AP Invoice File'
            SHOW $rc_input_file
            SHOW 'Last Successfully Read Record:   ' #record_count
            SHOW 'ERROR STATUS:                    ' #integer
            LET #PRCS_RUN_STATUS       = #PRCS_RUN_STATUS_ERROR
            DO UPDATE-PRCS-RUN-STATUS
            STOP
        END-IF

        IF #end-file
            BREAK
        END-IF

    ...

Here is the error:

Cannot Read Standard AP Invoice File
C:\TEMP\PAPS0140.DAT
Last Successfully Read Record:   12
ERROR STATUS:                    0

When I comment out the processing to forgo the DML, it reads the file fine.

Thanks,

Stu

-----Original Message-----
From: O'riordan, Paul (EI05) [mailto:Paul.O'riordan@HONEYWELL.COM]
Sent: Tuesday, July 16, 2002 8:29 AM
To: SQR-USERS@list.iex.net
Subject: Re: Read File with DB2


Perhaps your file is not consistant, are you using delimiters to get values
and is it possible that the delimiter is being used within a field in the
file? If so then you might be disconnecting from the database! Can you show
the error?
        Just a thought,
                Paul


Honeywell

Paul O'Riordan                  Honeywell Application Services
Application Developer           Industrial Park, Cork Road
PeopleSoft Applications,                Waterford Ireland

                                                        +353-51-309856
Direct
                                +353-51-309821 Fax
                                +353-87-9083244 Mobile
mailto:Paul.O'Riordan@honeywell.com


-----Original Message-----
From: Stu-Wood [mailto:SWood2@OFFICEDEPOT.COM]
Sent: 16 July 2002 13:10
To: SQR-USERS@list.iex.net
Subject: Read File with DB2


I am having an issue with reading a file and loading it into SQR.  My
process seems to consistently fail after reading a series of records,
performing some DML and then attempting to continue readin recrods.  I get a
error return status on the subsequent read after the DML.

Any ideas?

Thanks,

Stu Wood