COMSVED 
COMMON
          CTEXT  COMSVED - VIRTUAL ENVIRONMENT DEFINITIONS. 
          BASE   M
 COMSVED  SPACE  4,10 
*         COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992. 
          SPACE  4,10 
***       COMSVED - VIRTUAL ENVIRONMENT DEFINITIONS.
*         K. H. BOSSARD.     82/03/03.
          SPACE  4,10 
***              COMSVED CONTAINS *VER* INTERFACE EQUIVALENCES. 
          SPACE  4,10 
**        *VER* - VIRTUAL ENVIRONMENT REQUEST FUNCTION CODES. 
  
  
 BEGIN    BSSN
 RSCM     BSSN   1           RESERVE CM 
 RSPP     BSSN   1           RESERVE PP(S)
 RSCH     BSSN   1           RESERVE CHANNEL(S) 
 RSEQ     BSSN   1           RESERVE EQUIPMENT(S) 
 RNCM     BSSN   1           RETURN CM
 RNPP     BSSN   1           RETURN PP(S) 
 RNCH     BSSN   1           RETURN CHANNEL(S)
 RNEQ     BSSN   1           RETURN EQUIPMENT(S)
 STCM     BSSN   1           STATUS CM
 STPP     BSSN   1           STATUS PP-S
 STCH     BSSN   1           STATUS CHANNELS
 STEQ     BSSN   1           STATUS EQUIPMENTS
 STMR     BSSN   1           STATUS AVAILABLE RESOURCES 
 SFRC     BSSN   1           SET *FRC* TO DESIRED VALUE 
 RSPT     BSSN   1           RESERVE NPP, NPP PARTNER PAIR OR CPP 
 RSCT     BSSN   1           RESERVE NIO OR CIO CHANNEL 
 RNPT     BSSN   1           RETURN NPP, CPP OR ALL PP-S
 RNCT     BSSN   1           RETURN NIO OR CIO CHANNEL OR ALL CHANNELS
 STPT     BSSN   1           STATUS NPP-S AND/OR CPP-S
 STCT     BSSN   1           STATUS NIO AND/OR CIO CHANNELS 
  
 MXVR     BSSN   0           MAXIMUM *VER* REQUEST + 1
 END      BSSN
          SPACE  4,10 
*         PP AND CHANNEL TYPE CODES FOR *VER* REQUESTS. 
* 
*         *VER* DEPENDS ON THESE CODES HAVING THE SPECIFIC AND
*         RELATIVE VALUES DEFINED HERE.  ANY CHANGES TO THESE VALUES
*         WILL REQUIRE CAREFUL EXAMINATION OF THEIR USAGE BY *VER*. 
  
  
 VNPT     EQU    0           TYPE CODE FOR NON-CONCURRENT PP
 VCPT     EQU    2           TYPE CODE FOR CONCURRENT PP
 VPPT     EQU    4           TYPE CODE FOR PP PARTNER PAIR
 VLPT     EQU    0           TYPE CODE FOR LOWER BANK PP
 VUPT     EQU    1           TYPE CODE FOR UPPER BANK PP
 VNCT     EQU    0           TYPE CODE FOR NON-CONCURRENT CHANNEL 
 VCCT     EQU    1           TYPE CODE FOR CONCURRENT CHANNEL 
          SPACE  4,10 
**        DUAL STATE ERROR STATUS CODES.
  
  
 ESCH     EQU    10          CHANNEL NOT AVAILABLE/NOT ASSIGNED 
 ESEQ     EQU    20          EQUIPMENT NOT AVAILABLE/NOT ASSIGNED 
 ESUN     EQU    30          UNIT NOT AVAILABLE/NOT ASSIGNED
 ESCM     EQU    40          CM NOT AVAILABLE/NOT ASSIGNED
 ESPP     EQU    50          PP NOT AVAILABLE/NOT ASSSIGNED 
 ESNE     EQU    60          CHANNEL/EQUIPMENT/UNIT NOT IN EST
 ESAA     EQU    70          EQUIPMENT/UNIT ALREADY ASSIGNED TO NOS/VE
 ESDC     EQU    100         DO NOT DOWNLINE LOAD CONTROLWARE 
 ESCC     EQU    110         CONCURRENT CHANNEL NOT PRESENT 
 ESCP     EQU    150         CONCURRENT PP NOT PRESENT
 ESIL     EQU    700         INSUFFICIENT LENGTH IN RESPONSE BUFFER 
 ESIR     EQU    1000        ILLEGAL REQUEST
 ESNR     EQU    2000        DUAL STATE NOT ENABLED 
          SPACE  4,10 
**        DUAL STATE ASSEMBLY CONSTANTS.
  
  
 MINP     EQU    4           MINIMUM NUMBER OF POOL PP-S NEEDED BY NOS
 MINDP    EQU    MINP/2      MININUM DRIVER PP-S FOR CYBER 180-810/830
  
          BASE   *
          ENDX
