*COMDECK,SMRBF
                                                                       #
*             SUPERVISORY MESSAGES FOR RBF
                                                                       #
                                                                       #
*     COMMON   IFC    DEFINITIONS 
                                                                       #
      ITEM# IFCACN,U,0,24,12   # IFCACN U(0,24,12);  # APP CONN NUMBER #
      ITEM# IFCACNT,U,0,36,24  # IFCACNT U(0,36,24); # ACCOUNTING DATA #
      ITEM# IFCLFN,C,1,0,7     # IFCLFN C(1,0,07);   # LOGICAL FIL NAME#
      ITEM# IFCFNT,U,1,48,12   # IFCFNT U(1,48,12);  # FNT ORDINAL     #
                                                                       #
*     IFC  /JOB       DEFINITIONS 
                                                                       #
      ITEM# IFCAPRM,C,1,0,10   # IFCAPRM  C(1,0,10); # NOS JOB CARD    #
      ITEM# IFCRJOB,U,0,16,8   # IFCRJOB S:RIJ(0,16,8);# RC            #
                                                                       #
*     IFC  /STPD      DEFINITIONS 
                                                                       #
      ITEM# IFCMSEC,U,0,48,12  # IFCMSEC U(0,48,12); # MASS STRG ERR CD#
      ITEM# IFCRSTP,U,0,16,8   # IFCRSTP S:RIS(0,16,8);  # RC          #
                                                                       #
                                                                       #
                                                                       #
*     COMMON   OFC    DEFINITIONS 
                                                                       #
      ITEM# OFCACN,U,0,24,12    # OFCACN U(0,24,12);   # APP CONN NUMBR#
      ITEM# OFCACNT,U,0,36,24   # OFCACNT U(0,36,24);  # ACCOUNTG  DATA#
      ITEM# OFCCURP,U,0,36,24   # OFCCURP   U(0,36,24);# FILE PRU POSIT#
      ITEM# OFCLFN,C,1,0,7      # OFCLFN C(1,0,7);     # LOGICL FIL NAM#
      ITEM# OFCFNT,U,1,48,12    # OFCFNT U(1,48,12);   # FNT ADDRESS   #
                                                                       #
*     OFC  /DATA      DEFINITIONS 
                                                                       #
      ITEM# EOJFLAG,U,0,59,1 # EOJFLAG B(0,59,1);  # END OF JOB FLAG   #
      ITEM# OFCPAR,U,1,0,60     # OFCPAR U(1,0,60);    # APP DATA      #
                                                                       #
*     OFC  /STPD      DEFINITIONS 
                                                                       #
      ITEM# OFCRC,U,0,16,8      # OFCRC    S:ROS(0,16,8);# RC          #
      ITEM# OFCPMCC,U,1,0,12    # OFCPMCC U(1,0,12);   # PM CHAR COUNT #
      ITEM# OFCMSEC,U,1,52,8    # OFCMSEC U(1,52,8);   # MASS STRG ERRO#
      ITEM# OFCPM,U,2,0,16      # OFCPM U(2,0,16);     #  PM           #
      ITEM# OFCPMT1,U,2,16,44   # OFCPMT1   U(2,16,44);# PRINTER       #
      ITEM# OFCPMT2,U,3,0,60    # OFCPMT2   U(3,0,60); # MESSAGE       #
      ITEM# PMTEXT,U,0,0,60  # PMTEXT  U(0,0,60);  # PRINTER MESSAGE   #
                                                                       #
                                                                       #
                                                                       #
*     COMMON   PRU    DEFINITIONS 
                                                                       #
      ITEM# PRUACN,U,0,24,12   # PRUACN U(0,24,12);   # APP CONN NUMBR #
      ITEM# PACNT,U,0,36,24  # PACNT   U(0,36,24); # ACCOUNTING DATA   #
      ITEM# PRULFN,C,1,0,NC  # PRULFN  C(1,0,NC);  # QUEUE FILE LFN    #
      ITEM# PRUFNT,U,1,48,12 # PRUFNT  U(1,48,12); # QUEUE FILE FNT ORD#
      ITEM# CURPRU,U,0,36,24 # CURPRU  U(0,36,24); # PRU POSITION OF FI#
                                                                       #
*     PRU  /ON        DEFINITIONS 
                                                                       #
      ITEM# PRURC,U,0,16,8     # PRURC   S:RPRU(0,16,8);# REASON CODE  #
      ITEM# PRUFL1,U,0,36,1       # PRUFL1         B(0,36,1);#XFR MODE #
      ITEM# PRUUPS,U,0,56,2    # PRUUPS       U(0,56,2);# UPLINE BLOCK #
      ITEM# PRUDPS,U,0,58,2    # PRUDPS       U(0,58,2);# DOUNLINE BLOK#
      ITEM# PRUCWS,U,1,0,8        # PRUCWS         U(1,0,8);# CHK MARK #
      ITEM# PRUICKVAL,U,1,16,24   # PRUICKVAL      U(1,16,24); #       #
      ITEM# PRUDD,U,1,40,3        # PRUDD          U(1,40,3); #        #
                                                                       #
                                                                       #
                                                                       #
*     COMMON   SET    DEFINITIONS 
                                                                       #
      ITEM# SETACN,U,0,24,12  # SETACN U(0,24,12);   # APP CONN NUMBR  #
      ITEM# SETSTRG,U,1,0,60  # SETSTRG   U(1,0,60); # FIELD NUMB VALUE#
