Common COMBSNS

Library Member Format: MODIFY
Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M00S00001.combsns +++|
00002  M00S00002.combsns +++|#     COMBSNS - M860 SENSE RECORD.                                     #
00003  M00S00003.combsns +++|                                               CONTROL NOLIST;
00004  M00S00004.combsns +++|                                               CONTROL IFEQ LISTCON,1;
00005  M00S00005.combsns +++|                                               CONTROL LIST;
00006  M00S00006.combsns +++|                                               CONTROL FI;
00007  M00S00007.combsns +++|      BEGIN  # COMDECK SNS DESCRIPTION #
00008  M00S00008.combsns +++|
00009  M00S00009.combsns +++|#
00010  M00S00010.combsns +++|***   COMBSNS - M860 SENSE RECORD.
00011  M00S00011.combsns +++|*
00012  M00S00012.combsns +++|*     THE SENSE RECORD IS RETURNED BY THE M860 HARDWARE AS A RESULT OF A
00013  M00S00013.combsns +++|*     READ SENSE OF A UNIT.
00014  M00S00014.combsns +++|#
00015  M00S00015.combsns +++|
00016  M00S00016.combsns +++|
00017  M00S00017.combsns +++|      DEF MST$SREADY #O"37"#;        # VALUE OF *MST$RSTATE[0]* IF ALL
00018  M00S00018.combsns +++|                                       STATIONS ARE READY #
00019  M00S00019.combsns +++|      DEF SNSLEN     #8#;            # LENGTH OF SENSE RECORD #
00020  M00S00020.combsns +++|
00021  M00S00021.combsns +++|      COMMON BSNSCOM;
00022  M00S00022.combsns +++|
00023  M00S00023.combsns +++|        BEGIN  # BSNSCOM #
00024  M00S00024.combsns +++|
00025  M00S00025.combsns +++|        BASED
00026  M00S00026.combsns +++|        ARRAY SNS [0:0] S(SNSLEN);
00027  M00S00027.combsns +++|          BEGIN  # ARRAY SNS #
00028  M00S00028.combsns +++|          ITEM MSA$CREJ   B(01,20,01);  # COMMAND REJECT #
00029  M00S00029.combsns +++|          END  # ARRAY SNS #
00030  M00S00030.combsns +++|
00031  M00S00031.combsns +++|        END  # BSNSCOM #
00032  M00S00032.combsns +++|
00033  M00S00033.combsns +++|      END  # COMDECK SNS DESCRIPTION #
00034  M00S00034.combsns +++|
00035  M00S00035.combsns +++|                                               CONTROL LIST;