/*T: 754 Routing Order Level Enhanced Mapping File      - Physical File
     Z* CRTPF
     H*
     M*=========================================================================
     M* Maintenance   :
     M*=========================================================================
     A*=========================================================================
     A          R EDRTIOR                   TEXT('EDRTIOR')
     A*-------------------------------------------------------------------------
     A            ITOSTS     00001A  B      TEXT('STATUS')
     A            ITOCTL     00007S00B      TEXT('SHIPPING CONTROL #')
     A            ITOCMP     00003S00B      TEXT('Company No.')
     A            ITOCUST    00007A  B      TEXT('Customer No.')
     A            ITOSHIP    00007A  B      TEXT('Ship-To No.')
     A            ITOSHTO    00007A  B      TEXT('SHIP TO LOCATION')
     A            ITOCPO     00020A  B      TEXT('Customer P.O.')
     A            ITOSDAT    00008S00B      TEXT('SHIP DATE')
     A            ITO1101    00050A  B      TEXT('RRC CONTROL #')
     A            ITO1103    00050A  B      TEXT('TRANSP. SVC. LEVEL')
     A            ITOLOAD    00050A  B      TEXT('LOAD NUMBER')
     A            ITOSCAC    00035A  B      TEXT('EDI Ship Via /Carrier Desc')
     A            ITOEDOC    00010A  B      TEXT('Electronic Doc #')
     A            ITOPRID    00015A  B      TEXT('Trading Partner ID')
     A            ITOPRQL    00025A  B      TEXT('Trading Partner QL')
     A            ITOEDPF    00001A  B      TEXT('Processed-Y/N, Error-E')
     A*=========================================================================