Table of Contents

VBLOKS History

References

Update History

CMS File Input : VBLOKS COPY
Date : 12/8/1978 4:39:00 PM
VM Context : MAINT(394)
File Name : VBLOKS.COPY.Z1.txt
Modified : 1/16/2021 7:31:49 AM
Created : 1/16/2021 7:31:49 AM

Update Order

  1. R09273DK 601 3800 VSPXBLOK REORGANIZED FOR PERFORMANCE
  2. R08629DK 603 2250/3250
  3. R09137DK 606 MISSING LINE ON 3203 MOD 4
  4. R09758DK 609 DEFINE BIT IN VDEVBLOK
  5. R13280DK 622 UV04520 RESET DEDICATED CHANNEL FLAG AT LOGOFF TIME.
  6. HRC003DK V01 LEAVE OPTION ON DETACH COMMAND
  7. HRC062DK V02 DIAG58 Queued message support

R09273DK

Date Tuesday Jan 23, 1979 01:46:00 PM
Loaded from MAINT(294)
       R09273DK: ./ R 221000 223000 $ 221000 1000                                        VBL00010
       R09273DK: *              +----+----+----+----+-------------------+                VBL00020
       R09273DK: *              |V*1 |V*2 |V*3 |V*4 |     VSPXSPAR      |                VBL00030
       R09273DK: *              +----+----+----+----+-------------------+                VBL00040
       R09273DK: ./ R 227000 $ 227000 50                                                 VBL00050
       R09273DK: *              +-------------------+-------------------+                VBL00060
       R09273DK: *              |     VSPXCHAR      |     VSPXFCB       |                VBL00070
       R09273DK: *              +-------------------+-------------------+                VBL00080
       R09273DK: *              |     VSPXCMOD      |    VSPXOVLY       |                VBL00090
       R09273DK: *              +-------------------+-------------------+                VBL00100
       R09273DK: ./ D 230000 230110                                                      VBL00110
       R09273DK: ./ I 237000 $ 237100 100                                                VBL00120
       R09273DK: VSPXFLSH DS    X              V*3 3800 FLASH COUNT             @VA09273 VBL00130
       R09273DK: VSPXFLG1 DS    X              V*4 3800 FLAG BYTE               @VA09273 VBL00140
       R09273DK: VSPXCPYF EQU   X'80'          IF SET, MULT COPIES IN 1 XMISSION@VA09273 VBL00150
       R09273DK: ./ R 238000 $ 238000                                                    VBL00160
       R09273DK: VSPXSPAR DS    XL4            SPARE                            @VA09273 VBL00170
       R09273DK: ./ I 240000 $ 240100 100                                                VBL00180
       R09273DK: VSPXCHAR DS    CL4            3800 CHAR ARRANGEMENT TABLE      @VA09273 VBL00190
       R09273DK: VSPXFCB  DS    CL4            3800 FCB                         @VA09273 VBL00200
       R09273DK: VSPXCMOD DS    CL4            3800 COPY MODIFICATION           @VA09273 VBL00210
       R09273DK: VSPXOVLY DS    CL4            NAME OF FLASH OVERLAY TO BE USED @VA09273 VBL00220
       R09273DK: VSPXSIZ1 EQU   (*-VSPXBLOK)/8 VSPXBLOK HDR  IN DOUBLE WORDS    @VA09273 VBL00230
       R09273DK: ./ D 241010 241100                                                      VBL00240
       R09273DK: ./ R 243000 $ 243000                                                    VBL00250
       R09273DK: VSPXSIZ2 EQU   (*-VSPXBLOK)/8 VSPXBLOK SIZE IN DOUBLE WORDS    @VA09273 VBL00260
 BEGIN APPLY >>> ./ R 221000 223000 $ 221000 1000                                        VBL00010
   END APPLY >>> ./ R 221000 223000 $ 221000 1000                                        VBL00010
 BEGIN APPLY >>> ./ R 227000 $ 227000 50                                                 VBL00050
   END APPLY >>> ./ R 227000 $ 227000 50                                                 VBL00050
 BEGIN APPLY >>> ./ D 230000 230110                                                      VBL00110
   END APPLY >>> ./ D 230000 230110                                                      VBL00110
 BEGIN APPLY >>> ./ I 237000 $ 237100 100                                                VBL00120
   END APPLY >>> ./ I 237000 $ 237100 100                                                VBL00120
 BEGIN APPLY >>> ./ R 238000 $ 238000                                                    VBL00160
   END APPLY >>> ./ R 238000 $ 238000                                                    VBL00160
 BEGIN APPLY >>> ./ I 240000 $ 240100 100                                                VBL00180
   END APPLY >>> ./ I 240000 $ 240100 100                                                VBL00180
 BEGIN APPLY >>> ./ D 241010 241100                                                      VBL00240
   END APPLY >>> ./ D 241010 241100                                                      VBL00240
 BEGIN APPLY >>> ./ R 243000 $ 243000                                                    VBL00250
   END APPLY >>> ./ R 243000 $ 243000                                                    VBL00250
Update Succeeded
Update Execution Time 16 milliseconds.

R08629DK

Date Thursday May 10, 1979 04:51:00 PM
Loaded from MAINT(294)
       R08629DK: ./ R 94200 94200 $ 94200 100                                            00001000
       R08629DK: *              | V*5 |    VDEVIO       |        VDEVRRB        |        00002000
       R08629DK: ./ R 117400 117400 $ 117400 100                                         00003000
       R08629DK: VDEVIO   DS    3X             POINTER TO QUEUE OF PENDING      @VA08629 00004000
       R08629DK: *                             INTERRUPTS                                00005000
 BEGIN APPLY >>> ./ R 94200 94200 $ 94200 100                                            00001000
   END APPLY >>> ./ R 94200 94200 $ 94200 100                                            00001000
 BEGIN APPLY >>> ./ R 117400 117400 $ 117400 100                                         00003000
   END APPLY >>> ./ R 117400 117400 $ 117400 100                                         00003000
Update Succeeded
Update Execution Time 16 milliseconds.

R09137DK

Date Wednesday Oct 31, 1979 10:31:00 AM
Loaded from MAINT(294)
       R09137DK: ./ I 182250 $ 182255                                                    00001000
       R09137DK: VDEVPST  EQU   X'08'          PASS INTERRUPT TO USER           @VA09137 00002000
 BEGIN APPLY >>> ./ I 182250 $ 182255                                                    00001000
   END APPLY >>> ./ I 182250 $ 182255                                                    00001000
Update Succeeded
Update Execution Time 16 milliseconds.

R09758DK

Date Wednesday Jan 23, 1980 01:17:00 AM
Loaded from MAINT(294)
       R09758DK: ./ I 182255 $ 182257                                                    00001000
       R09758DK: VDEVVIRT EQU   X'04'          VIRTUAL 3330V                    @VA09758 00002000
 BEGIN APPLY >>> ./ I 182255 $ 182257                                                    00001000
   END APPLY >>> ./ I 182255 $ 182257                                                    00001000
Update Succeeded
Update Execution Time 16 milliseconds.

R13280DK

Date Wednesday Jun 24, 1981 05:27:00 AM
Loaded from MAINT(294)
       R13280DK: ./ R 16000 $ 16100 200                                                  00001000
       R13280DK: *         28   +-----------------------+-----------------------+        00002000
       R13280DK: *              |        VCHRSVD        |       VCHRCHAD        |        00003000
       R13280DK: *         30   +-----------------------+-----------------------+        00004000
       R13280DK: ./ I 27000 $ 27001 1                                                    00005000
       R13280DK: VCHRSVD  DS    1F             RESERVED                         @VA13280 00006000
       R13280DK: VCHRCHAD DS    1F             RCHBLOK ADDRESS                  @VA13280 00007000
 BEGIN APPLY >>> ./ R 16000 $ 16100 200                                                  00001000
   END APPLY >>> ./ R 16000 $ 16100 200                                                  00001000
 BEGIN APPLY >>> ./ I 27000 $ 27001 1                                                    00005000
   END APPLY >>> ./ I 27000 $ 27001 1                                                    00005000
Update Succeeded
Update Execution Time 16 milliseconds.

HRC003DK

Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
       HRC003DK: ./ I 00182257          $ 182258 1                     02/07/02 19:34:26
       HRC003DK: VDEVTNR  EQU   X'02'          DETACH TAPE WITHOUT RUN          HRC003DK
 BEGIN APPLY >>> ./ I 00182257          $ 182258 1                     02/07/02 19:34:26
   END APPLY >>> ./ I 00182257          $ 182258 1                     02/07/02 19:34:26
Update Succeeded
Update Execution Time 16 milliseconds.

HRC062DK

Date Friday May 19, 2017 07:02:00 PM
Loaded from MAINT(094)
       HRC062DK: ./ I 00117500 $ 00117550
       HRC062DK: VDEVQMB  DS    0A             -> QMBLOK chain (virt cons only) HRC062DK
       HRC062DK: ./ R 00244000 00246000 $ 00244000 1000
       HRC062DK:          EJECT                                                 HRC062DK
       HRC062DK: *                                                              HRC062DK
       HRC062DK: *                                                              HRC062DK
       HRC062DK: QMBLOK   DSECT                                                 HRC062DK
       HRC062DK: ***                QMBLOK  -  DIAG58 QUEUED MESSAGE BLOCK      HRC062DK
       HRC062DK: *                                                              HRC062DK
       HRC062DK: *        0   +-----------+-----+-----+-----------------------+ HRC062DK
       HRC062DK: *            |        QMNEXT         |        QMSIZE         | HRC062DK
       HRC062DK: *        8   +-----------+-----+-----+-----------------------+ HRC062DK
       HRC062DK: *            |        QMQCNR0        |        QMQCNR2        | HRC062DK
       HRC062DK: *       10   +-----------+-----------+-----------------------+ HRC062DK
       HRC062DK: *               Begin QMMSGTXT area                            HRC062DK
       HRC062DK: *                                                              HRC062DK
       HRC062DK: *                                                              HRC062DK
       HRC062DK: ***                QMBLOK  -  DIAG58 QUEUED MESSAGE BLOCK      HRC062DK
       HRC062DK:          SPACE 1                                               HRC062DK
       HRC062DK: QMNEXT   DS    A              -> next QMBLOK or zero           HRC062DK
       HRC062DK: QMSIZE   DS    F              Size of QMBLOK+msg txt in dwords HRC062DK
       HRC062DK: QMQCNR0  DS    F              R0 at entry to DMKQCNWT = msg lenHRC062DK
       HRC062DK: QMQCNR2  DS    F              R2 at entry to DMKQCNWT = msg flgHRC062DK
       HRC062DK: QMMSGTXT DS    0C             Start of message text (up to 256)HRC062DK
       HRC062DK: *                                                              HRC062DK
       HRC062DK: QMBSIZE  EQU   (*-QMBLOK)/8   QMBLOK FIXED SIZE IN DOUBLE WORDSHRC062DK
       HRC062DK: *                                                              HRC062DK
       HRC062DK:          POP   PRINT                                           HRC062DK
       HRC062DK:          SPACE 1                                               HRC062DK
 BEGIN APPLY >>> ./ I 00117500 $ 00117550
   END APPLY >>> ./ I 00117500 $ 00117550
 BEGIN APPLY >>> ./ R 00244000 00246000 $ 00244000 1000
   END APPLY >>> ./ R 00244000 00246000 $ 00244000 1000
Update Succeeded
Update Execution Time 23 milliseconds.