*COMDECK /EPCOM/
* 
*      PARAMETERS (POSITIONS COUNT FROM LEFT) 
* 
 FNF.P    =         42D            1=FATAL ERROR
 FNF.S    =         01D 
 NTE.P    =         43D            1=NOTE 
 NTE.S    =         01D 
 DME.P    =         44D            1=DATA MANAGER CALL
 DME.S    =         01D 
 INF.P    =         45D            1= MESSAGE INSERT LIST ADDRESS IN B4.
 INF.S    =         01D 
 EES.P    =         46D            1=ERROR EXIT SUPPRESS
 EES.S    =         01D 
 SES.P    =         47D            PARITY ERROR SEVERITY
 SES.S    =         04D 
 ES.P     =         51D            ERROR/NOTE CODE
 ES.S     =         09D 
 INA.P    =         24D            FWA OF INSERT ITEM LIST
 INA.S    =         18D 
 RTN.P    =         06D            CRMEP RETURN ADDRESS 
 RTN.S    =         18D 
 PAR.S    =         FNF.S+NTE.S+DME.S+INF.S+EES.S+SES.S+ES.S
* 
*         MESSAGE INSERT ELEMENT FIELDS 
* 
 EOL.P    =         00D            END OF LIST INDICATOR, 1=EOL 
 EOL.S    =         01D 
 TYPE.P   =         01D            DATA ENCODING TYPE 
 TYPE.S   =         03D 
 MODE.P   =         04D            MODE OF INSERT ELEMENT 
 MODE.S   =         02D 
 DIS.P    =         15D            1=DISPLAY IN DAYFILE 
 DIS.S    =         01D 
 FIT.P    =         16D            1=FIT DUMP 
 FIT.S    =         01D 
 POS.P    =         17D            INSERT ITEM POSITION (BITS/CHARS)
 POS.S    =         06D 
 COM.P    =         23D            COM=1 - POS. BITS COUNT FROM RIGHT 
 COM.S    =         01D 
 LEN.P    =         24D            LENGTH OF INSERT (BITS/CHARS/WORDS)
 LEN.S    =         18D 
 LOC.P    =         42D            FWA OF INSERT ITEM 
 LOC.S    =         18D 
 VAL.P    =         12D            INSERT ITEM WHEN MODE=CONTAINED
 VAL.S    =         48D 
* 
* END /EPCOM/ 
