*COMDECK,SMAPDEF
                                                                       #
*             COMMON DEFINITIONS FOR APPLICATIONS 
                                                                       #
                                                                       #
************************************************************************
*     BI/MARK       DEFINITIONS 
                                                                       #
      DEF# LBIMARK,D,2       # LBIMARK# 2 #; # LENGTH OF BI/MARK       #
                                                                       #
************************************************************************
*     COMMON   CON         DEFINITIONS
                                                                       #
      DEF# ACCON,D,1         # ACCON  # 1 #; #   CON   ACT             #
                                                                       #
*     CON /ACRQ     DEFINITIONS 
                                                                       #
      DEF# LCONAC,D,2        # LCONAC # 2 #; # LENGTH OF CON/ACRQ      #
      DEF# LCONACA,D,2       # LCONACA # 2#; # LENGTH OF CON/ACRQ/A    #
                                                                       #
*     CON /CB         DEFINITIONS 
                                                                       #
      DEF# LCONCB,D,1        # LCONCB# 1 #; #LENGTH OF CON/CB          #
      STATUS# RCB,(N,LND,CNB,LCA)        #                             #
* #           RCB  N,LND,CNB,LCA        ;#  CON/CB   RC                #
                                                                       #
*     CON /END        DEFINITIONS 
                                                                       #
      DEF# LCONEN,D,2        # LCONEN  # 2 #; # LENGTH OF CON/END      #
      DEF# LCONENN,D,1       # LCONENN # 1 #; # LENGTH OF CON/END/N    #
                                                                       #
*     CON /REQ        DEFINITIONS 
                                                                       #
      DEF# LCONREQ,D,16      # LCONREQ#16 #; # LENGTH OF CON/REQ       #
      DEF# LCORQR,D,1        # LCORQR # 1 #; # LENGTH OF CON/REQ/N,A   #
      STATUS# RRA,(N,ACN,REJ,ACC,TER)        #                         #
* #           RRA N,ACN,REJ,ACC,TER         ;# CON/REQ/A   RC          #
      STATUS# RRQ,(N,NEW,FAP)                #                        # 
* #   RRQ N,NEW,FAP                         ;# CON/REQ/N RC            #
                                                                       #
************************************************************************
*     COMMON   CTRL   DEFINITIONS 
                                                                       #
      DEF# LCTRL,D,1         # LCTRL   # 1 #; # LENGTH OF CTRL         #
      DEF# ACCTRL,D,2        # ACCTRL  # 2 #; #   CTRL  ACT            #
      STATUS# RCT,(STI,NR,CSE,EOI,BI)         #                        #
* #           RCT  STI,NR,CSE,EOI,BI         ;# CTRL/STPD    RC        #
                                                                       #
************************************************************************
*     COMMON   DBG    DEFINITIONS 
                                                                       #
      DEF# ACDBG,D,1         # ACDBG   # 1 #; # DBG  ACT               #
      DEF# LDBG,D,1          # LDBG    # 1 #; # LENGTH OF DBG          #
                                                                       #
************************************************************************
*     COMMON   DC     DEFINITIONS 
                                                                       #
      DEF# ACDC,D,1          # ACDC  # 1 #; #   DC   ACT               #
      DEF# LDC,D,1           # LDC   # 1 #; # LENGTH OF ALL DC MESSAGES#
                                                                       #
************************************************************************
*     COMMON   ERR    DEFINITIONS 
                                                                       #
      DEF# ACERR,D,1         # ACERR  # 1 #; #    ERR   ACT            #
      DEF# LERR,D,3          # LERR   # 3 #; # LENGTH OF ERR/LGL       #
  STATUS# RLG,(N,IA,IT,IAB,ACN,ABL,IAL,ISM,RES,NCE,NFI,A,B,C,ILS,PN)#  #
* #     RLG N,IA,IT,IAB,ACN,ABL,IAL,ISM,RES,NCE,NFI,A,B,C,ILS,PN; 
                                                                       #
************************************************************************
*     ESX / OKR DEFINITIONS 
                                                                       #
      DEF# ESXL,D,2          # ESXL   # 2 #; # LENGTH OF ESX           #
  
                                                                       #
************************************************************************
*     COMMON   FC     DEFINITIONS 
                                                                       #
      DEF# ACFC,D,1          # ACFC   # 1 #; #    FC   ACT             #
      DEF# LFC,D,1           # LFC    # 1 #; # LENGTH OF FC,NOT FC/BRK #
                                                                       #
*     FC   /ACK       DEFINITIONS 
                                                                       #
      DEF# LFCACK,D,1        # LFCACK   # 1 #; # LENGTH OF FC/ACK      #
                                                                       #
*     FC   /BRK       DEFINITIONS 
                                                                       #
      DEF# LFCBRK,D,2        # LFCBRK   # 2 #; # LENGTH OF FC/BRK      #
      STATUS# RBR,(N,R1,R2,R3,R4,R5,R6,R7) #                 #
*  #           RBR  N,R1,R2,R3,R4,R5,R6,R7; # BREAK RC       #
                                                                       #
*     FC   /INACT     DEFINITIONS 
                                                                       #
      DEF# LFCINCT,D,1       # LFCINCT  # 1 #; # LENGTH OF FC/INACT    #
                                                                       #
*     FC   /INIT      DEFINITIONS 
                                                                       #
      DEF# LFCINIT,D,1       # LFCINIT  # 1 #; # LENGTH OF FC/INIT     #
      DEF# LFCINTN,D,1       # LFCINTN  # 1 #; # LENGTH OF FC/INIT/N   #
                                                                       #
*     FC   /NAK       DEFINITIONS 
                                                                       #
      DEF# LFCNAK,D,1        # LFCNAK   # 1 #; # LENGTH OF FC/NAK      #
      STATUS# RFCNK,(N,LB)                    #                       # 
*  #          RFCNK  N,LB                   ; # FC/NAK RC             # 
                                                                       #
************************************************************************
*     COMMON   FNT   DEFINITIONS
                                                                       #
      DEF# LFNTS,D,2         # LFNTS   # 2 #; #  LENGTH OF FNT SM MSG  #
      DEF# LFNTRSP,D,2       # LFNTRSP # 2 #; # LENGTH OF FNT RESPONSE #
                                                                       #
*    REASON CODES FOR FNT/DMS AND FNT/DSM    MASTER/SLAVE 
                                                                       #
      STATUS# MSR,(PS,PTAS,PAS,UNA) 
* #           MSR   PS,      # PARTNER SELECTED               NORMAL # #
* #                 PTAS,    # PARTNER TYPE ALREADY SELECTED     -   # #
* #                 PAS,     # PARTNER ALREADY SELECTED          -   # #
* #                 UNA ;    # ANAME/JSN UNAVAILABLE             -     #
                                                                       #
*    REASON CODES FOR FNT/IFL, FNT/RFL, FNT/TFL  FILE LOANING OPERATION 
*                                                SUPERVISORY MESSAGES 
                                                                       #
      STATUS# RFL,(FNTL,SUNA,FAO,RES0,RES1,GERR,PERR,RERR,R2,R3,ILSQ) 
*#            RFL   FNTL,    # FNT ENTRY LOANED               NORMAL # #
*#                  SUNA,    # SLAVE UNAVAILABLE            ABNORMAL # #
*#                  FAO ,    # FNT ALREADY OUTSTANDING          -    # #
*#                  FNO ,    # FNT NOT OUTSTANDING              -    # #
*#                  FENA,    # FNT ENTRY NOT AVAILABLE          -    # #
*#                  GERR,    # FNT NIP SST GET ERROR            -    # #
*#                  PERR,    # FNT NIP SST PUT ERROR            -    # #
*#                  RERR,    # FNT NIP SST RET ERROR            -    # #
*#                  R2  ,    #                                       # #
*#                  R3  ,    #                                       # #
*#                  ILSQ;    # ILLEGAL SEQUENCE OF FNT SM              #
                                                                       #
*     FC   /RST       DEFINITIONS 
                                                                       #
      DEF# LFCRST,D,1        # LFCRST   # 1 #; # LENGTH OF FC/RST      #
      STATUS# RFCST,(N,TB,TF,BI)              #                     # 
*  #          RFCST  N,TB,TF,BI              ;# FC/STP RC           # 
                                                                       #
************************************************************************
*     COMMON   HOP    DEFINITIONS 
                                                                       #
      DEF# ACHOP,D,1         # ACHOP   # 1 #; # HOP ACT                #
                                                                       #
*     HOP   /ALT      DEFINITIONS 
                                                                       #
      DEF# LHOPALT,D,1       # LHOPALT # 1 #; # LENGTH OF HOP/ALT      #
                                                                       #
*     HOP   /BRK      DEFINITIONS 
                                                                       #
      DEF# LHOPBRK,D,1     # LHOPBRK # 1 #; # LENGTH OF HOP/BRK        #
                                                                       #
*     HOP   /CMD      DEFINITIONS 
                                                                       #
      DEF# LHOPCMD,D,10    # LHOPCMD #10 #; # LENGTH OF HOP/CMD        #
                                                                       #
*     HOP   /DAY      DEFINITIONS 
                                                                       #
      DEF# LHOPDAY,D,1     # LHOPDAY # 1 #; # LENGTH OF HOP/DAY        #
                                                                       #
*     HOP   /DIS    DEFINITIONS 
                                                                       #
      DEF# LHOPDIS,D,32    # LHOPDIS #32 #; # LENGTH OF HOP/DIS        #
                                                                       #
*     HOP   /DU     DEFINITIONS 
                                                                       #
      DEF# LHOPDU,D,1      # LHOPDU  # 1 #; # LENGTH OF HOP/DU         #
                                                                       #
*     HOP   /DB     DEFINITIONS 
                                                                       #
      DEF# LHOPDB,D,1      # LHOPDB  # 1 #; # LENGTH OF HOP/DB         #
                                                                       #
*     HOP   /DE     DEFINITIONS 
                                                                       #
      DEF# LHOPDE,D,1      # LHOPDE  # 1 #; # LENGTH OF HOP/DE         #
                                                                       #
*     HOP   /ENDD    DEFINITIONS
                                                                       #
      DEF# LHOPEND,D,1     # LHOPEND # 1 #; # LENGTH OF HOP/END        #
                                                                       #
*     HOP   /IG    DEFINITIONS
                                                                       #
      DEF# LHOPIG,D,1      # LHOPIG  # 1 #; # LENGTH OF HOP/IG         #
                                                                       #
*     HOP   /LG     DEFINITIONS 
                                                                       #
      DEF# LHOPLG,D,1      # LHOPLG  # 1 #; # LENGTH OF HOP/LG         #
                                                                       #
*     HOP   /NOTR  DEFINITIONS
                                                                       #
      DEF# LHOPNTR,D,1     # LHOPNTR # 1 #; # LENGTH OF HOP/NOTR       #
                                                                       #
*     HOP   /PAGE   DEFINITIONS 
                                                                       #
      DEF# LHOPAGE,D,1     # LHOPAGE # 1 #; # LENGTH OF HOP/PAGE       #
                                                                       #
*     HOP   /REL    DEFINITIONS 
                                                                       #
      DEF# LHOPREL,D,1     # LHOPREL # 1 #; # LENGTH OF HOP/REL        #
                                                                       #
*     HOP   /RS     DEFINITIONS 
                                                                       #
      DEF# LHOPRS,D,1      # LHOPRS  # 1 #; # LENGTH OF HOP/RS         #
                                                                       #
*     HOP   /START  DEFINITIONS 
                                                                       #
      DEF# LHOPSTR,D,1     # LHOPSTR # 1 #; # LENGTH OF HOP/START      #
                                                                       #
*     HOP   /TRACE  DEFINITIONS 
                                                                       #
      DEF# LHOPTRA,D,1     # LHOPTRA # 1 #; # LENGTH OF HOP/TRACE      #
                                                                       #
************************************************************************
*     COMMON        XFT    DEFINITIONS                                 #
      DEF# LXFTN,D,3       # LXFTN   # 1 #; # LENGTH OF IFT/OFT NORMAL #
      DEF# OFTRC,D,1       # OFTRC   # 1 #; # REASON FROM PIP FOR OFT  #
      DEF# IFTRC,D,2       # IFTRC   # 2 #; # REASON FROM PIP FOR IFT  #
  
                                                                       #
************************************************************************
*     COMMON   INTR   DEFINITIONS 
                                                                       #
      DEF# ACINTR,D,1        # ACINTR  # 1 #; # INTR ACT               #
      DEF# LINTR,D,1         # LINTR   # 1 #; # LENGTH OF INTR         #
      STATUS# RIR,(N,R1,R2,UB1,UB2) #                                  #
* #            RIR  N,R1,R2,UB1,UB2; # INTERRUPT VALUE                 #
                                                                       #
************************************************************************
*     COMMON   LST    DEFINITIONS 
                                                                       #
      DEF# ACLST,D,1         # ACLST   # 1 #; #   LST   ACT            #
      DEF# LLST,D,1          # LLST    # 1 #; # LENGTH OF LST          #
                                                                       #
************************************************************************
*     RO/MARK       DEFINITIONS 
                                                                       #
      DEF# LROMARK,D,2       # LROMARK# 2 #; # LENGTH OF RO/MARK       #
                                                                       #
************************************************************************
*     COMMON   SAC   DEFINITIONS
                                                                       #
      DEF# LSAC,D,1          # LSAC    # 1 #; #  LENGTH OF SAC SM MSG  #
      DEF# LSAF,D,2          # LSAF    # 2 #; #  LENGTH OF SAF SM MSG  #
      DEF# LSAFRSP,D,1       # LSAFRSP # 1 #; #  LENGTH OF SAF RSPMSG  #
  
                                                                       #
************************************************************************
*     COMMON   SHUT   DEFINITIONS 
                                                                       #
      DEF# ACSHUT,D,1        # ACSHUT # 1 #; #   SHUT  ACT             #
      DEF# LSHUT,D,1         # LSHUT  # 1 #; #  LENGTH OF SHUT  MSG    #
                                                                       #
*     SHUT/INSD       DEFINITIONS 
                                                                       #
      DEF# SHUTYPG,D,0       # SHUTYPG # 0 #; # GRADUAL SHUTDOWN       #
      DEF# SHUTYPI,D,1       # SHUTYPI # 1 #; # IMMEDIATE SHUTDOWN     #
                                                                       #
************************************************************************
*     COMMON   TCH    DEFINITIONS 
                                                                       #
      DEF# ACTCH,D,1         # ACTCH   # 1 #; #    TCH   ACT           #
      DEF# LTCH,D,1          # LTCH    # 1 #; # LENGTH TCH             #
                                                                       #
************************************************************************
*     TO/MARK       DEFINITIONS 
                                                                       #
      DEF# LTOMARK,D,2       # LTOMARK# 2 #; # LENGTH OF TO/MARK       #
                             #
SYMTAB  RMT 
NP$SYMI    BSS    0 
SYMTAB  RMT 
                             #
