Common COMXCCB

Library Member Format: MODIFY

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M00S00001.comxccb +++|
00002  M00S00002.comxccb +++|#     COMXCCB - COPY CONTROL BLOCK.                                   #
00003  M00S00003.comxccb +++|                                               CONTROL NOLIST;
00004  M00S00004.comxccb +++|                                               CONTROL IFEQ LISTCON,1;
00005  M00S00005.comxccb +++|                                               CONTROL LIST;
00006  M00S00006.comxccb +++|                                               CONTROL FI;
00007  M00S00007.comxccb +++|      BEGIN  # COMXCCB #
00008  M00S00008.comxccb +++|
00009  M00S00009.comxccb +++|#
00010  M00S00010.comxccb +++|***   COMXCCB - COPY CONTROL BLOCK.
00011  M00S00011.comxccb +++|*
00012  M00S00012.comxccb +++|*     COMXCCB DEFINES THE STRUCTURE OF THE COPY CONTROL BLOCK
00013  M00S00013.comxccb +++|*     AND DEFINES THE VALID COPY OPERATION CODES.
00014  M00S00014.comxccb +++|#
00015  M00S00015.comxccb +++|
00016  M00S00016.comxccb +++|
00017  M00S00017.comxccb +++|      DEF CCBLEN     #2#;            # COPY CONTROL BLOCK LENGTH #
00018  M00S00018.comxccb +++|
00019  M00S00019.comxccb +++|      STATUS CPYC                    # COPY OPERATION CODES #
00020  M00S00020.comxccb +++|        DISKAU,                      # COPY DISK TO AU-S #
00021  M00S00021.comxccb +++|        AUDISK,                      # COPY AU-S TO DISK #
00022  M00S00022.comxccb +++|        RAWAU,                       # COPY RAW AU-S TO DISK #
00023  M00S00023.comxccb +++|        ENDCPYC;                     # END OF COPY OPERATION CODES #
00024  M00S00024.comxccb +++|
00025  M00S00025.comxccb +++|      BASED
00026  M00S00026.comxccb +++|      ARRAY CCB [0:0] P(CCBLEN);     # COPY CONTROL BLOCK #
00027  M00S00027.comxccb +++|        BEGIN
00028  M00S00028.comxccb +++|        ITEM CCBOPCODE  U(00,00,06);  # OPERATION CODE #
00029  M00S00029.comxccb +++|        ITEM CCBDKFET   U(00,06,18);  # ADDRESS OF DISK FET #
00030  M00S00030.comxccb +++|        ITEM CCBM86FET  U(00,24,18);  # ADDRESS OF M860 FET #
00031  M00S00031.comxccb +++|        ITEM CCBLINK    U(00,42,18);  # CHAIN LINK #
00032  M00S00032.comxccb +++|        ITEM CCBCLFG    U(01,00,12);  # FLAGS #
00033  M00S00033.comxccb +++|        ITEM CCBDKFLGS  U(01,00,06);  # DISK FLAGS #
00034  M00S00034.comxccb +++|        ITEM CCBDERR    B(01,00,01);  # DISK ERROR FLAG #
00035  M00S00035.comxccb +++|        ITEM CCBDFULL   B(01,01,01);  # DISK FULL FLAG #
00036  M00S00036.comxccb +++|        ITEM CCBDEOI    B(01,02,01);  # END-OF-INFORMATION FLAG #
00037  M00S00037.comxccb +++|        ITEM CCB1SSFLGS U(01,06,06);  # *1SS* FLAGS #
00038  M00S00038.comxccb +++|        ITEM CCBTPMARK  B(01,06,01);  # TAPE MARK #
00039  M00S00039.comxccb +++|        ITEM CCBENDVOL  B(01,07,01);  # END OF VOLUME #
00040  M00S00040.comxccb +++|        ITEM CCBHDWPM   B(01,08,01);  # HARDWARE PROBLEM #
00041  M00S00041.comxccb +++|        ITEM CCBRWDULD  B(01,09,01);  # REWIND/UNLOAD COMPLETED #
00042  M00S00042.comxccb +++|        ITEM CCBTAPPAR  B(01,10,01);  # TAPE PARITY ERROR #

Line S00001 Modification History
`M01` (Added by)	`common1`

Seq #  *Modification Id* Act 
----------------------------+
00043  M01S00001.common1 +++|        ITEM CCPPUDCK   B(01,11,01);  # PPU DATA CHECK #
00044  M00S00043.comxccb +++|        ITEM CCBRWCT    I(01,12,03);  # REWIND/UNLOAD COUNT #
00045  M00S00044.comxccb +++|        ITEM CCBLLRQ    U(01,42,18);  # ADDRESS OF *LLRQ* ENTRY #
00046  M00S00045.comxccb +++|        END
00047  M00S00046.comxccb +++|
00048  M00S00047.comxccb +++|      END  # COMXCCB #
00049  M00S00048.comxccb +++|
00050  M00S00049.comxccb +++|                                               CONTROL LIST;