Table of Contents

DMKVSC History

References

Update History

CMS File Input : DMKVSC ASSEMBLE
Date : 3/28/1979 3:23:00 AM
VM Context : MAINT(394)
File Name : DMKVSC.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:48 AM
Created : 1/16/2021 7:31:48 AM

Update Order

  1. R08629DK 603 2250/3250
  2. R09957DK - CORRECT IOBLOK CONFLICT IN MSS SUPPORT
  3. R09849DK 607 FAILURE TO OBTAIN SYSTEM LOCK BEFORE CALLING DMKVSC
  4. R09758DK 609 INCORRECT FLAG DEFINITION
  5. R09352DK 609 V=R NOT SETTING PROPER POLLING LOOP
  6. R14146DK 624 UV05428 RESTORE CORRECT CCW FLAGS WHEN DOING TIC
  7. R15317DK 629 UV06338 PEVM12941 IOERBLOK CHANGED BUT DMKVSC NOT COGNIZANT
  8. HRC011DK V01 ADD 3380 MDISK/DEDICATED DEVICE SUPPORT

R08629DK

Date Thursday May 10, 1979 04:51:00 PM
Loaded from MAINT(294)
       R08629DK: ./ I 225000 $ 225050 050                                                00001000
       R08629DK: UNSTKIO  ICM   R1,7,VDEVIO    ANY I/O PENDING?                 @VA08629 00002000
       R08629DK:          BZR   R2             NO, NOTHING TO UNSTACK           @VA08629 00003000
       R08629DK: VIORUNQ  L     R10,IOBFPNT-IOBLOK(R1) GET POINTER TO NEXT      @VA08629 00004000
       R08629DK: *                             PRIOR                                     00005000
       R08629DK:          LA    R0,IOBSIZE     SIZE TO RETURN IN DBLWORDS.      @VA08629 00006000
       R08629DK:          CALL  DMKFREE        RELEASE PENDING INTERRUPTS       @VA08629 00007000
       R08629DK:          LTR   R10,R10        ANYMORE ON CHAIN?                @VA08629 00008000
       R08629DK:          BZR   R2             NO, RETURN                       @VA08629 00009000
       R08629DK:          LR    R1,R10         CONTINUE TO STACK                @VA08629 00010000
       R08629DK:          B     VIORUNQ        ...                              @VA08629 00011000
 BEGIN APPLY >>> ./ I 225000 $ 225050 050                                                00001000
   END APPLY >>> ./ I 225000 $ 225050 050                                                00001000
Update Succeeded
Update Execution Time 16 milliseconds.

R09957DK

Date Thursday Jul 12, 1979 09:54:00 AM
Loaded from MAINT(294)
       R09957DK: ./ * FORCE RE-ASSEMBLY FOR APAR VM09957
 BEGIN APPLY >>> ./ * FORCE RE-ASSEMBLY FOR APAR VM09957
     Comment >>> ./ * FORCE RE-ASSEMBLY FOR APAR VM09957
   END APPLY >>> ./ * FORCE RE-ASSEMBLY FOR APAR VM09957
Update Succeeded
Update Execution Time 8 milliseconds.

R09849DK

Date Friday Nov 30, 1979 05:29:00 AM
Loaded from MAINT(294)
       R09849DK: ./ R 122000 $ 122100 100                                                00001000
       R09849DK: DMKVSCVR DS    0D                                              @VA09849 00002000
       R09849DK:          STM   R0,R14,BALRSAVE SAVE REGS (R0-R14)              @VA09849 00004000
       R09849DK:          LR    R12,R15        USE R12 AS BASE                  @VA09849 00003000
       R09849DK: ./ R 214000 $ 214100 100                                                00005000
       R09849DK:          LM    R0,R14,BALRSAVE RESTORE REGS (R0-R14)           @VA09849 00006000
       R09849DK:          BR    R14                                             @VA09849 00007000
       R09849DK: ./ R 217000 $ 217100 100                                                00008000
       R09849DK:          LM    R0,R14,BALRSAVE RESTORE REGS (R0-R14)           @VA09849 00009000
       R09849DK:          BR    R14                                             @VA09849 00010000
       R09849DK: ./ R 375000 $ 375100 100                                                00011000
       R09849DK: DMKVSCAN STM   R0,R9,TEMPSAVE SAVE REGS (R0-R9)                @VA09849 00012000
       R09849DK: ./ R 514000 $ 514100 100                                                00013000
       R09849DK:          LM    R0,R9,TEMPSAVE RESTORE REGS (R0-R9)             @VA09849 00014000
 BEGIN APPLY >>> ./ R 122000 $ 122100 100                                                00001000
   END APPLY >>> ./ R 122000 $ 122100 100                                                00001000
 BEGIN APPLY >>> ./ R 214000 $ 214100 100                                                00005000
   END APPLY >>> ./ R 214000 $ 214100 100                                                00005000
 BEGIN APPLY >>> ./ R 217000 $ 217100 100                                                00008000
   END APPLY >>> ./ R 217000 $ 217100 100                                                00008000
 BEGIN APPLY >>> ./ R 375000 $ 375100 100                                                00011000
   END APPLY >>> ./ R 375000 $ 375100 100                                                00011000
 BEGIN APPLY >>> ./ R 514000 $ 514100 100                                                00013000
   END APPLY >>> ./ R 514000 $ 514100 100                                                00013000
Update Succeeded
Update Execution Time 16 milliseconds.

R09758DK

Date Wednesday Jan 23, 1980 01:15:00 AM
Loaded from MAINT(294)
       R09758DK: ./ R 130000 $ 130010                                                    00001000
       R09758DK:          TM    VDEVFLG2,VDEVVIRT IS VDEV A 3330V ?             @VA09758 00002000
 BEGIN APPLY >>> ./ R 130000 $ 130010                                                    00001000
   END APPLY >>> ./ R 130000 $ 130010                                                    00001000
Update Succeeded
Update Execution Time 16 milliseconds.

R09352DK

Date Saturday Feb 09, 1980 05:16:00 AM
Loaded from MAINT(294)
       R09352DK: ./ I 438000 $ 438100 100                                                00001000
       R09352DK:          CLI   VDEVTYPC,CLASTERM TERMINAL ?                    @VA09352 00002000
       R09352DK:          BNE   NOTERM         NO                               @VA09352 00003000
       R09352DK:          CLI   PRVCOMND,X'09' AUTOPOLL CCW ?                   @VA09352 00004000
       R09352DK:          BE    NOTERM         YES,IT SETS STATUS               @VA09352 00005000
       R09352DK:          CLI   PRVCOMND,X'1E' PREPARE CCW ?                    @VA09352 00006000
       R09352DK:          BNE   CCWNXT11       NO, THIS IS END OF CCWS          @VA09352 00007000
       R09352DK: NOTERM   EQU   *                                               @VA09352 00008000
       R09352DK: ./ I 473000 $ 473200 200                                                00009000
       R09352DK:          C     R1,=V(DMKSLC)  IS IDAL TO HIGH ?                @VA09352 00010000
       R09352DK:          BNL   VIOSCERX       YES, BAD                         @VA09352 00011000
       R09352DK:          C     R1,F4096       IS IDAL IN PAGE 0 ?              @VA09352 00012000
       R09352DK:          BL    VIOSCERX       YES, BAD                         @VA09352 00013000
       R09352DK: ./ R 490000 493000 $ 490100 600                                         00014000
       R09352DK:          BZ    CCWNXT8        NOT THIS TIME                    @VA09352 00015000
       R09352DK:          C     R1,=V(DMKSLC)  IS IDAL TO HIGH ?                @VA09352 00016000
       R09352DK:          BNL   VIOSCERX       YES, BAD                         @VA09352 00017000
       R09352DK:          C     R1,F4096       IS IDAL IN PAGE 0 ?              @VA09352 00018000
       R09352DK:          BL    VIOSCERX       YES, BAD                         @VA09352 00019000
       R09352DK:          L     R1,0(,R1)      GET REAL ADDRESS                 @VA09352 00020000
 BEGIN APPLY >>> ./ I 438000 $ 438100 100                                                00001000
   END APPLY >>> ./ I 438000 $ 438100 100                                                00001000
 BEGIN APPLY >>> ./ I 473000 $ 473200 200                                                00009000
   END APPLY >>> ./ I 473000 $ 473200 200                                                00009000
 BEGIN APPLY >>> ./ R 490000 493000 $ 490100 600                                         00014000
   END APPLY >>> ./ R 490000 493000 $ 490100 600                                         00014000
Update Succeeded
Update Execution Time 8 milliseconds.

R14146DK

Date Wednesday Sep 23, 1981 08:50:00 AM
Loaded from MAINT(294)
       R14146DK: ./ R 438200 $ 438210                                                    00001000
       R14146DK:          BNE   CCWNXT2        NO                               @VA14146 00002000
       R14146DK: ./ R 438400 $ 438410                                                    00003000
       R14146DK:          BE    CCWNXT2        YES, IT SETS STATUS              @VA14146 00004000
       R14146DK: ./ R 438700 440000 $ 438710                                             00005000
       R14146DK:          B     CCWNXT2        LOOK AT NEXT CCW IN STRING       @VA14146 00006000
 BEGIN APPLY >>> ./ R 438200 $ 438210                                                    00001000
   END APPLY >>> ./ R 438200 $ 438210                                                    00001000
 BEGIN APPLY >>> ./ R 438400 $ 438410                                                    00003000
   END APPLY >>> ./ R 438400 $ 438410                                                    00003000
 BEGIN APPLY >>> ./ R 438700 440000 $ 438710                                             00005000
   END APPLY >>> ./ R 438700 440000 $ 438710                                             00005000
Update Succeeded
Update Execution Time 16 milliseconds.

R15317DK

Date Monday Mar 15, 1982 08:44:00 AM
Loaded from MAINT(294)
       R15317DK: ./ * FORCE RE-ASSEMBLY FOR IOERBLOK CHANGE BY VM12941
 BEGIN APPLY >>> ./ * FORCE RE-ASSEMBLY FOR IOERBLOK CHANGE BY VM12941
     Comment >>> ./ * FORCE RE-ASSEMBLY FOR IOERBLOK CHANGE BY VM12941
   END APPLY >>> ./ * FORCE RE-ASSEMBLY FOR IOERBLOK CHANGE BY VM12941
Update Succeeded
Update Execution Time 8 milliseconds.

HRC011DK

Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
       HRC011DK: ./ R 00185000          $ 185490 490                   01/26/06 19:35:14
       HRC011DK:          BNE   DASD3380       NO, TRY 3380                     HRC011DK 00185000
       HRC011DK: ./ I 00188000          $ 188050 50                    01/26/06 19:35:14
       HRC011DK: DASD3380 CLI   VDEVTYPE,TYP3380 3380?                          HRC011DK
       HRC011DK:          BNE   DASD2314       NO, TRY 2314                     HRC011DK
       HRC011DK:          TM    RDEVMDL,RDEVMD83 IS THIS A -3                   HRC011DK
       HRC011DK:          BNO   DASD3382       TRY -2                           HRC011DK
       HRC011DK:          CLC   VDEVBND(2),=H'2655' ALL CYLS USED ?             HRC011DK
       HRC011DK:          BNL   TSTSENSE       YES, HOPEFULLY BYPASS CCWTRANS   HRC011DK
       HRC011DK:          B     CCWTR2         NO, DO CCW TRANS                 HRC011DK
       HRC011DK: DASD3382 DS    0H                                              HRC011DK
       HRC011DK:          TM    RDEVMDL,RDEVMD82 IS THIS A -2                   HRC011DK
       HRC011DK:          BNO   DASD3381       ASSUME - 1                       HRC011DK
       HRC011DK:          CLC   VDEVBND(2),=H'1770' ALL CYLS USED ?             HRC011DK
       HRC011DK:          BNL   TSTSENSE       YES, HOPEFULLY BYPASS CCWTRANS   HRC011DK
       HRC011DK:          B     CCWTR2         NO, DO CCW TRANS                 HRC011DK
       HRC011DK: DASD3381 DS    0H                                              HRC011DK
       HRC011DK:          CLC   VDEVBND(2),=H'0885' ALL CYLS USED ?             HRC011DK
       HRC011DK:          BNL   TSTSENSE       YES, HOPEFULLY BYPASS CCWTRANS   HRC011DK
       HRC011DK:          B     CCWTR2         NO, DO CCW TRANS                 HRC011DK
 BEGIN APPLY >>> ./ R 00185000          $ 185490 490                   01/26/06 19:35:14
   END APPLY >>> ./ R 00185000          $ 185490 490                   01/26/06 19:35:14
 BEGIN APPLY >>> ./ I 00188000          $ 188050 50                    01/26/06 19:35:14
   END APPLY >>> ./ I 00188000          $ 188050 50                    01/26/06 19:35:14
Update Succeeded
Update Execution Time 16 milliseconds.