/*T: 850 NOTE file                                      - Physical File

     H* Generated date: 04/26/15
     H* Generated time: 13:08:38
     H*
     M*=========================================================================
     M* Maintenance   :
     M*=========================================================================
     A*=========================================================================
     A          R EDPONR                    TEXT('EDPONR')
     A*-------------------------------------------------------------------------
     A            ENDEL      00001A         TEXT('Status Code')
     A            ENCMP      00003S         TEXT('Company No.')
     A            ENCUST     00007A         TEXT('Customer No.')
     A            ENPONO     00022A         TEXT('P.O. Number- BEG03/324')
     A            ENLINE     00004S         TEXT('Line/Seq Number')
     A            ENCODE     00003A         TEXT('Reference Code')
     A            ENNTE      00060A         TEXT('Special Instructions- NTE02/+
     A                                            3')
     A            ENCTRL     00009A         TEXT('EDI Transaction Control #')
     A            ENALLW     00009A         TEXT('Allowance- SSS01')
     A            ENSSC      00009A         TEXT('Special Service Code- SSS03')
     A            ENRLNO     00009A         TEXT('Release Number- BEG04')
     A            ENCSH1     00002A         TEXT('Sales Req. Code- CSH01')
     A            ENCSH2     00001A         TEXT('Do-Not-Exceed Act Code- CSH0+
     A                                            2')
     A            ENCSH3     00011S02       TEXT('Do-Not-Exceed Amt- CSH03')
     A            ENCSH4     00035A         TEXT('Account #-CSH04')
     A            ENCSH5     00006S         TEXT('Req. Inv Date- CSH05')
     A            ENCSH6     00002A         TEXT('Agency Qual Code- CSH06')
     A            ENCSH7     00010A         TEXT('Special Serv Code- CSH07')
     A            ENCSH8     00002A         TEXT('Prod/Serv Sub Code- CSH08')
     A            ENTYPE     00002A         TEXT('PO Type/ BEG02')
     A            ENTSP      00002A         TEXT('Purpose of Trans /BEG01')
     A            ENEDOC     00010A         TEXT('Electronic Doc #')
     A            ENPRID     00015A         TEXT('Trading Partner ID')
     A            ENPRQL     00025A         TEXT('Trading Partner QL')
     A            ENEDPF     00001A         TEXT('Processed-Y/N, Error-E')
     A*=========================================================================