SeanHoppe.com Cleo Code Samples 830 Inbound Report - EI830SL1
A*=========================================================================
A* TRANSACTION: PLANNING SCHEDULE (830) - DETAIL - SHIP/RECEIVE
A*=========================================================================
A R IS830R PFILE(EDI830DSR)
A*-------------------------------------------------------------------------
A ISMSID RENAME(MSGID)
A ISMLOG RENAME(MSGREF)
A ISTPCD RENAME(TPCODE)
A ISBRCH RENAME(BRANCH)
A ISCUST RENAME(CUSTNO)
A ISDUNS RENAME(DUNSNO)
A ISCRUS RENAME(CRTUSR)
A ISCRDT RENAME(CRTDTE)
A ISCRTM RENAME(CRTTME)
A*
A ISPO RENAME(BFR11)
A ISLNNO RENAME(DTLSEQ)
A ISSQNO RENAME(SHPSEQ)
A*
A ISQTQL RENAME(SHP01)
A ISQTQD RENAME(SHP01D)
A ISQTY RENAME(SHP02)
A ISDTQL RENAME(SHP03)
A ISDTQD RENAME(SHP03D)
A ISDT01 RENAME(SHP04)
A ISDT02 RENAME(SHP06)
A*
A K ISMLOG
A K ISLNNO
A K ISSQNO