SeanHoppe.com > Cleo Code Samples >

CLEO DDS - 830 Inbound Report - EI830NL1

A*=========================================================================
     A* TRANSACTION: PLANNING SCHEDULE (830) - DETAIL NOTE FILE
     A*=========================================================================
     A          R IN830R                    PFILE(EDI830DNTE)
     A*-------------------------------------------------------------------------
     A            INMSID                    RENAME(MSGID)
     A            INMLOG                    RENAME(MSGREF)
     A            INTPCD                    RENAME(TPCODE)
     A            INBRCH                    RENAME(BRANCH)
     A            INCUST                    RENAME(CUSTNO)
     A            INDUNS                    RENAME(DUNSNO)
     A            INCRUS                    RENAME(CRTUSR)
     A            INCRDT                    RENAME(CRTDTE)
     A            IHCRTM                    RENAME(CRTTME)
     A*
     A            INPO                      RENAME(BFR11)
     A            INLNNO                    RENAME(DTLSEQ)
     A            INSQNO                    RENAME(NTESEQ)
     A*
     A            INNT01                    RENAME(NTE01)
     A            INNT1D                    RENAME(NTE01D)
     A            INNT02                    RENAME(NTE02)
     A*
     A          K INMLOG
     A          K INLNNO
     A          K INSQNO