/*T: 856 outbound ASN - BSN level control file #1       - Physical File
     H*
     M*=========================================================================
     M* Maintenance   :
     M*=========================================================================
     A*=========================================================================
     A          R EDXSHHR                   TEXT('EDXSHHR')
     A*-------------------------------------------------------------------------
     A            E0STUS     00001A         TEXT('Shipping Status')
     A            E0SCTL     00007S         TEXT('EDI Shipping Control')
     A            E0CMP      00003S         TEXT('Company No.')
     A            E0CUST     00007A         TEXT('Customer No.')
     A            E0TYPE     00002A         TEXT('00=Orig, 07= Dupl')
     A            E0PRON     00015A         TEXT('Pro Number')
     A            E0SCAC     00035A         TEXT('EDI Ship Via /Carrier Desc')
     A            E0PCKS     00009P         TEXT('Total Packages')
     A            E0GWGH     00013P04       TEXT('Gross Weight')
     A            E0TRDT     00006S         TEXT('Transm Date- YMD')
     A            E0TRTM     00004S         TEXT('Transm Time- HM')
     A            E0PTNR     00009A         TEXT('EDI Trading Partner ID')
     A            E0TRD8     00008S         TEXT('Transm Date- CYMD')
     A            E0PRID     00015A         TEXT('Trading Partner Id')
     A            E0PRQL     00025A         TEXT('Trading Partner QL')
     A            E0EDOC     00010A         TEXT('Mailbox #/Message Log#')
     A            E0EDDT     00008S         TEXT('Transmission Date')
     A            E0EDTM     00006S         TEXT('Transmission Time')
     A            E0EDPT     00001A         TEXT('Test/Production')
     A            E0EDIC     00010A         TEXT('Interchange Control#')
     A            E0EDGC     00010A         TEXT('Group Control#')
     A            E0EDTC     00010A         TEXT('Transaction Control#')
     A            E0EDST     00010A         TEXT('Transaction Set 830/DELFOR e+
     A                                            tc.')
     A            E0EDFT     00010A         TEXT('Translation Format')
     A            E0AFS      00010A         TEXT('Application File Set/AFS/UFD')
     A            E0GRP      00010A         TEXT('Transaction Set Group IN/SH/+
     A                                            PO..')
     A            E0EDPF     00001A         TEXT('Processed Flag')
     A            E0CCTD     00008S         TEXT('Creation Date')
     A            E0CCTT     00006S         TEXT('Creation Time')
     A            E0CCTU     00010A         TEXT('Creation User')
     A            E0CCTP     00010A         TEXT('Creation Pgm')
     A            E0LCGD     00008S         TEXT('Change Date')
     A            E0LCGT     00006S         TEXT('Change Time')
     A            E0LCGU     00010A         TEXT('Change User')
     A            E0LCGP     00010A         TEXT('Change Pgm')
     A*=========================================================================