• Abstract / Synopsis of DMKCFC
• Latest Source of DMKCFC
• Fixes Applied : 20
• Latest Source Date : Thursday, December 7, 1978
• Last Fix ID : [HRC068DK]

CMS File Input : DMKCFC ASSEMBLE
Date : 12/7/1978 4:55:00 PM
VM Context : MAINT(394)
File Name : DMKCFC.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:45 AM
Created : 1/16/2021 7:31:45 AM

1. R08928DK 601 CORRECT BAD COMMENTS
2. R09413DK 602 CHANGE RESERVE COMMENT
3. R10076DK 604 CP DUMP SERVICES SUPPORT
4. R10847DK 611 UV00464 ABENDFRE005 IF DIAL AFTER SPECIFY SLEEP INTERVAL
5. R12101DK 618 UV03456 CORE OVERLAY AND VARIOUS PROBLEMS DUE TO VM10847
6. R12794DK 621 UV04329 WRONG CODE DELETED BY VM12101
7. R13360DK 622 UV04596 CALL DMKCQH DIRECTLY FOR Q RDR, PRT, PU
8. R13648DK 623 UV05254 SUPPORT DMKCPS SPLIT INTO DMKCPR(SHUTDOWN)
9. R13704DK 623 UV04950 SPLIT DMKDIA FOR MAINTAINENCE
10. R12658DK 627 UV03601 ABENDPRG001 IF OPERATOR DISC DURING IPL
11. HRC010DK V01 ADD HCP COMMAND - ISSUE CP COMMAND FROM 2ND LEVEL
12. HRC013DK V01 UNIVERSITY OF MAINE P.E.R. TRACE FACILITY
13. HRC018DK V01 IMPLEMENT EXTENDED HRC SET FUNCTIONS
14. HRC019DK V01 IMPLEMENT EXTENDED HRC QUERY FUNCTIONS
15. HRC021DK V01 SUPPORT PREFIX PERIOD CONSOLE OUTPUT SUPPRESSION
16. HRC026DK V01 RE-CLASSIFY CERTAIN COMMAND PRIVILEGES
17. HRC030DK V01 ADD QUERY ALLOC COMMAND
18. HRC043DK H40 Fix QUERY PFnn for 13 ⇐ nn ⇐ 24
19. HRC107DK H40 Add QUERY USERID command
20. HRC068DK V01 Shadow table bypass support

Date Tuesday Jan 30, 1979 05:42:00 PM
Loaded from MAINT(294)

       R08928DK: ./ I 77000 $ 77500
       R08928DK: *        GPR  6 = SCRATCH
 BEGIN APPLY >>> ./ I 77000 $ 77500
   END APPLY >>> ./ I 77000 $ 77500
Update Succeeded
Update Execution Time 8 milliseconds.

Date Wednesday Mar 28, 1979 03:06:00 AM
Loaded from MAINT(294)

       R09413DK: ./ R 604600 $ 604610                                                    00001000
       R09413DK:          DC    A(0)           RESERVE FOR FUTURE USE           @VA09413 00002000
       R09413DK: ./ R 605600 $ 605610                                                    00003000
       R09413DK:          DC    A(0)           RESERVE FOR FUTURE USE           @VA09413 00004000
 BEGIN APPLY >>> ./ R 604600 $ 604610                                                    00001000
   END APPLY >>> ./ R 604600 $ 604610                                                    00001000
 BEGIN APPLY >>> ./ R 605600 $ 605610                                                    00003000
   END APPLY >>> ./ R 605600 $ 605610                                                    00003000
Update Succeeded
Update Execution Time 16 milliseconds.

Date Monday Jul 02, 1979 11:07:00 AM
Loaded from MAINT(294)

       R10076DK: ./ I 00257000          $ 257500 500                      04/12/79 08:01:59
       R10076DK:          COMND VMDUMP,G,3,DMKVMDEP                             @V67CAH7 00257100
 BEGIN APPLY >>> ./ I 00257000          $ 257500 500                      04/12/79 08:01:59
   END APPLY >>> ./ I 00257000          $ 257500 500                      04/12/79 08:01:59
Update Succeeded
Update Execution Time 8 milliseconds.

Date Monday Apr 07, 1980 03:13:00 AM
Loaded from MAINT(294)

       R10847DK: ./ I 00476000 $ 00476100 100                                            00001000
       R10847DK:          TM    VMRSTAT,VMLOGON IS USER LOGGED ON? ASSUME DIAL  @VA10847 00002000
       R10847DK:          BO    SLPEXIT         NO, DON'T GO TO DMKCFMWU.       @VA10847 00004000
 BEGIN APPLY >>> ./ I 00476000 $ 00476100 100                                            00001000
   END APPLY >>> ./ I 00476000 $ 00476100 100                                            00001000
Update Succeeded
Update Execution Time 16 milliseconds.

Date Tuesday Jan 13, 1981 01:13:00 AM
Loaded from MAINT(294)

       R12101DK: ./ D 00476000  00476100                                                 00001000
 BEGIN APPLY >>> ./ D 00476000  00476100                                                 00001000
   END APPLY >>> ./ D 00476000  00476100                                                 00001000
Update Succeeded
Update Execution Time 8 milliseconds.

Date Wednesday Jun 03, 1981 04:24:00 AM
Loaded from MAINT(294)

       R12794DK: ./ I 475000 $ 476000
       R12794DK:          STM   R2,R3,TRQBVAL          STORE WAKE UP TIME
       R12794DK: ./ D 476200 $
 BEGIN APPLY >>> ./ I 475000 $ 476000
   END APPLY >>> ./ I 475000 $ 476000
 BEGIN APPLY >>> ./ D 476200 $
   END APPLY >>> ./ D 476200 $
Update Succeeded
Update Execution Time 16 milliseconds.

Date Wednesday Jun 24, 1981 06:05:00 AM
Loaded from MAINT(294)

       R13360DK: ./ I 117750 $ 117850                                                    00001000
       R13360DK:          EXTRN DMKCQHQU                                        @VA13360 00002000
       R13360DK: ./ I 604700 $ 604800                                                    00003000
       R13360DK:          DC    A(DMKCQHQU)    INDEX 24 MODULE                  @VA13360 00004000
       R13360DK: ./ R 633000 639000 $ 633000                                             00005000
       R13360DK:          DC    C'VIRTUAL ',AL1(1,G,0,16) MODULE 00 = DMKCQGEN  @VA13360 00006000
       R13360DK: ./ R 659200 $ 659200 400                                                00007000
       R13360DK:          DC    C'JOURNAL ',AL1(2,A,20,0) MODULE 20 = DMKJRLQU  @VA13360 00008000
       R13360DK:          DC    C'READER  ',AL1(1,D+G,24,0) MOD 24 = DMKCQHQU   @VA13360 00009000
       R13360DK:          DC    C'RDR     ',AL1(3,D+G,24,0)                     @VA13360 00010000
       R13360DK:          DC    C'PRINTER ',AL1(1,D+G,24,4)                     @VA13360 00011000
       R13360DK:          DC    C'PRT     ',AL1(3,D+G,24,4)                     @VA13360 00012000
       R13360DK:          DC    C'PUNCH   ',AL1(2,D+G,24,8)                     @VA13360 00013000
       R13360DK: QRYLAST  DC    C'PCH     ',AL1(3,D+G,24,8)                     @VA13360 00014000
 BEGIN APPLY >>> ./ I 117750 $ 117850                                                    00001000
   END APPLY >>> ./ I 117750 $ 117850                                                    00001000
 BEGIN APPLY >>> ./ I 604700 $ 604800                                                    00003000
   END APPLY >>> ./ I 604700 $ 604800                                                    00003000
 BEGIN APPLY >>> ./ R 633000 639000 $ 633000                                             00005000
   END APPLY >>> ./ R 633000 639000 $ 633000                                             00005000
 BEGIN APPLY >>> ./ R 659200 $ 659200 400                                                00007000
   END APPLY >>> ./ R 659200 $ 659200 400                                                00007000
Update Succeeded
Update Execution Time 16 milliseconds.

Date Friday Aug 07, 1981 07:31:00 AM
Loaded from MAINT(294)

       R13648DK: ./ R 246000 $ 246000
       R13648DK:          COMND SHUTDOWN,A,8,DMKCPRSH                           @VA13648 00246000
 BEGIN APPLY >>> ./ R 246000 $ 246000
   END APPLY >>> ./ R 246000 $ 246000
Update Succeeded
Update Execution Time 8 milliseconds.

Date Friday Aug 07, 1981 07:31:00 AM
Loaded from MAINT(294)

       R13704DK: ./ R 00202000          $ 202000 1000                  06/26/81 07:57:27
       R13704DK:          COMND COUPLE,G,6,DMKDIBCP                             @VA13704 00202000
 BEGIN APPLY >>> ./ R 00202000          $ 202000 1000                  06/26/81 07:57:27
   END APPLY >>> ./ R 00202000          $ 202000 1000                  06/26/81 07:57:27
Update Succeeded
Update Execution Time 16 milliseconds.

Date Friday Jan 15, 1982 04:22:00 PM
Loaded from MAINT(294)

       R12658DK: ./ I 129000 $ 129100 100                                                00001000
       R12658DK:          TM    APSTAT1,CPINITD IS IPL IN PROGRESS ?            @VA12658 00002000
       R12658DK:          BZ    EXITNULL        YES... EXIT                     @VA12658 00003000
 BEGIN APPLY >>> ./ I 129000 $ 129100 100                                                00001000
   END APPLY >>> ./ I 129000 $ 129100 100                                                00001000
Update Succeeded
Update Execution Time 16 milliseconds.

Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)

       HRC010DK: ./ I 00217000          $ 217500 500                   05/23/03 19:03:41
       HRC010DK:          COMND HCP,A,3,DMKCPSCP                                HRC010DK 00217500
 BEGIN APPLY >>> ./ I 00217000          $ 217500 500                   05/23/03 19:03:41
   END APPLY >>> ./ I 00217000          $ 217500 500                   05/23/03 19:03:41
Update Succeeded
Update Execution Time 16 milliseconds.

Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)

       HRC013DK: ./ * *************                                               PER001 00001000
       HRC013DK: ./ * *                                                           PER001 00002000
       HRC013DK: ./ * *   PER001  10/24/77 ADD "P.E.R." TRACE FACILITY            PER001 00003000
       HRC013DK: ./ * *                                                           PER001 00004000
       HRC013DK: ./ * *************                                               PER001 00005000
       HRC013DK: ./ *                                                             PER001 00006000
       HRC013DK: ./ I 255000 $ 255500                                             PER001 00007000
       HRC013DK:          COMND PER,G,3,DMKPECMD                                  PER001 00008000
 BEGIN APPLY >>> ./ * *************                                               PER001 00001000
     Comment >>> ./ * *************                                               PER001 00001000
   END APPLY >>> ./ * *************                                               PER001 00001000
 BEGIN APPLY >>> ./ * *                                                           PER001 00002000
     Comment >>> ./ * *                                                           PER001 00002000
   END APPLY >>> ./ * *                                                           PER001 00002000
 BEGIN APPLY >>> ./ * *   PER001  10/24/77 ADD "P.E.R." TRACE FACILITY            PER001 00003000
     Comment >>> ./ * *   PER001  10/24/77 ADD "P.E.R." TRACE FACILITY            PER001 00003000
   END APPLY >>> ./ * *   PER001  10/24/77 ADD "P.E.R." TRACE FACILITY            PER001 00003000
 BEGIN APPLY >>> ./ * *                                                           PER001 00004000
     Comment >>> ./ * *                                                           PER001 00004000
   END APPLY >>> ./ * *                                                           PER001 00004000
 BEGIN APPLY >>> ./ * *************                                               PER001 00005000
     Comment >>> ./ * *************                                               PER001 00005000
   END APPLY >>> ./ * *************                                               PER001 00005000
 BEGIN APPLY >>> ./ *                                                             PER001 00006000
     Comment >>> ./ *                                                             PER001 00006000
   END APPLY >>> ./ *                                                             PER001 00006000
 BEGIN APPLY >>> ./ I 255000 $ 255500                                             PER001 00007000
   END APPLY >>> ./ I 255000 $ 255500                                             PER001 00007000
Update Succeeded
Update Execution Time 16 milliseconds.

Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)

       HRC018DK: ./ I 00665307          $ 665313 6                     02/09/06 08:48:03
       HRC018DK:          DC    C'PRIV    ',AL1(4,G,0,72)                       HRC018DK 00665308
       HRC018DK: ./ I 00665780          $ 665800 20                    02/09/06 08:48:03
       HRC018DK:          DC    C'MAX     ',AL1(3,A,4,36)                       HRC018DK 00665781
 BEGIN APPLY >>> ./ I 00665307          $ 665313 6                     02/09/06 08:48:03
   END APPLY >>> ./ I 00665307          $ 665313 6                     02/09/06 08:48:03
 BEGIN APPLY >>> ./ I 00665780          $ 665800 20                    02/09/06 08:48:03
   END APPLY >>> ./ I 00665780          $ 665800 20                    02/09/06 08:48:03
Update Succeeded
Update Execution Time 23 milliseconds.

Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)

       HRC019DK: ./ I 00117850          $ 117920 70                    02/09/06 08:53:04
       HRC019DK:          EXTRN HDKCQURY                                        HRC019DK 00117950
       HRC019DK: ./ I 00604800          $ 604900 100                   02/09/06 08:53:04
       HRC019DK:          DC    A(HDKCQURY)    INDEX 28 HRC QUERY MODULE        HRC019DK 00604900
       HRC019DK: ./ R 00661600          $ 661650 50                    02/09/06 08:53:04
       HRC019DK:          DC    C'PCH     ',AL1(3,D+G,24,8)                     HRC019DK 00661600
       HRC019DK:          DC    C'PRIV    ',AL1(4,G,28,0)  MODULE 28 = HDKCQURY HRC019DK 00661620
       HRC019DK:          DC    C'MAXIMUM ',AL1(3,A+C+E,28,4)                   HRC019DK 00661630
       HRC019DK:          DC    C'CPLEVEL ',AL1(2,G,28,8)                       HRC019DK 00661640
       HRC019DK: QRYLAST  EQU   *-12                                            HRC019DK 00661660
 BEGIN APPLY >>> ./ I 00117850          $ 117920 70                    02/09/06 08:53:04
   END APPLY >>> ./ I 00117850          $ 117920 70                    02/09/06 08:53:04
 BEGIN APPLY >>> ./ I 00604800          $ 604900 100                   02/09/06 08:53:04
   END APPLY >>> ./ I 00604800          $ 604900 100                   02/09/06 08:53:04
 BEGIN APPLY >>> ./ R 00661600          $ 661650 50                    02/09/06 08:53:04
   END APPLY >>> ./ R 00661600          $ 661650 50                    02/09/06 08:53:04
Update Succeeded
Update Execution Time 16 milliseconds.

Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)

       HRC021DK: ./ I 00118000          $ 118100 100                   02/09/06 08:54:06
       HRC021DK:          CLI   0(R1),C'.'     OUTPUT SUPPRESSION CHAR?         HRC021DK 00118100
       HRC021DK:          BNE   CHKLEN         NO...PROCEED AS NORMAL           HRC021DK 00118200
       HRC021DK:          OI    VMHRCFLG,VMTRMOFF   INHIBIT TERM OUTPUT         HRC021DK 00118300
       HRC021DK:          BCTR  R0,0           DECREMENT LENGTH BY ONE          HRC021DK 00118400
       HRC021DK:          LA    R1,1(,R1)      BUMP PAST SUPPRESSION CHAR       HRC021DK 00118500
       HRC021DK: CHKLEN   EQU   *                                               HRC021DK 00118600
 BEGIN APPLY >>> ./ I 00118000          $ 118100 100                   02/09/06 08:54:06
   END APPLY >>> ./ I 00118000          $ 118100 100                   02/09/06 08:54:06
Update Succeeded
Update Execution Time 23 milliseconds.

Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)

       HRC026DK: ./ R 00224000          $ 224490 490                   02/09/06 08:54:44
       HRC026DK:          COMND LOCK,C,4,DMKCPVLK                               HRC026DK 00224000
       HRC026DK: ./ R 00242000          $ 242490 490                   02/09/06 08:54:44
       HRC026DK:          COMND SAVESYS,C,7,DMKCFHSV                            HRC026DK 00242000
       HRC026DK: ./ R 00256000          $ 256490 490                   02/09/06 08:54:44
       HRC026DK:          COMND UNLOCK,C,6,DMKCPVUL                             HRC026DK 00256000
       HRC026DK: ./ R 00665320 00665560 $ 665360 40                    02/09/06 08:54:44
       HRC026DK:          DC    C'PRIORITY',AL1(5,C,4,00) MODULE 4 = DMKCFO     HRC026DK 00665320
       HRC026DK:          DC    C'FAVORED ',AL1(5,C,4,04)                       HRC026DK 00665380
       HRC026DK:          DC    C'RESERVE ',AL1(3,C,4,08)                       HRC026DK 00665440
       HRC026DK:          DC    C'SASSIST ',AL1(3,C,4,12)                       HRC026DK 00665500
       HRC026DK:          DC    C'CPASSIST',AL1(3,C,4,16)                       HRC026DK 00665560
       HRC026DK: ./ R 00665820          $ 665830 10                    02/09/06 08:54:44
       HRC026DK: SETLAST  DC    C'JOURNAL ',AL1(2,C,12,0)  MODULE 12 = DMKJRLSE HRC026DK 00665820
 BEGIN APPLY >>> ./ R 00224000          $ 224490 490                   02/09/06 08:54:44
   END APPLY >>> ./ R 00224000          $ 224490 490                   02/09/06 08:54:44
 BEGIN APPLY >>> ./ R 00242000          $ 242490 490                   02/09/06 08:54:44
   END APPLY >>> ./ R 00242000          $ 242490 490                   02/09/06 08:54:44
 BEGIN APPLY >>> ./ R 00256000          $ 256490 490                   02/09/06 08:54:44
   END APPLY >>> ./ R 00256000          $ 256490 490                   02/09/06 08:54:44
 BEGIN APPLY >>> ./ R 00665320 00665560 $ 665360 40                    02/09/06 08:54:44
   END APPLY >>> ./ R 00665320 00665560 $ 665360 40                    02/09/06 08:54:44
 BEGIN APPLY >>> ./ R 00665820          $ 665830 10                    02/09/06 08:54:44
   END APPLY >>> ./ R 00665820          $ 665830 10                    02/09/06 08:54:44
Update Succeeded
Update Execution Time 23 milliseconds.

Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)

       HRC030DK: ./ I 00117920          $ 117960 40                    02/15/06 14:13:37
       HRC030DK:          EXTRN HDKCQALO                                        HRC030DK
       HRC030DK: ./ I 00604900          $ 604950 50                    02/15/06 14:13:37
       HRC030DK:          DC    A(HDKCQALO)    INDEX 32 HRC QUERY MODULE        HRC030DK 00604900
       HRC030DK: ./ I 00661800          $ 661820 20                    02/15/06 14:13:37
       HRC030DK:          DC    C'ALLOC   ',AL1(5,A+C+E,32,0) MOD 32 = HDKCQALO HRC030DK
 BEGIN APPLY >>> ./ I 00117920          $ 117960 40                    02/15/06 14:13:37
   END APPLY >>> ./ I 00117920          $ 117960 40                    02/15/06 14:13:37
 BEGIN APPLY >>> ./ I 00604900          $ 604950 50                    02/15/06 14:13:37
   END APPLY >>> ./ I 00604900          $ 604950 50                    02/15/06 14:13:37
 BEGIN APPLY >>> ./ I 00661800          $ 661820 20                    02/15/06 14:13:37
   END APPLY >>> ./ I 00661800          $ 661820 20                    02/15/06 14:13:37
Update Succeeded
Update Execution Time 16 milliseconds.

Date Wednesday Feb 22, 2017 12:13:00 AM
Loaded from MAINT(094)

       HRC043DK: ./ R 00574000          $ 00574100 100
       HRC043DK:          CH    R1,=H'24'      Is converted number GT 24?       HRC043DK
 BEGIN APPLY >>> ./ R 00574000          $ 00574100 100
   END APPLY >>> ./ R 00574000          $ 00574100 100
Update Succeeded
Update Execution Time 23 milliseconds.

Date Thursday Feb 23, 2017 10:19:00 AM
Loaded from MAINT(094)

       HRC107DK: ./ I 00658200          $ 00658300 100
       HRC107DK:          DC    C'USERID  ',AL1(5,G,12,32)                      HRC107DK
 BEGIN APPLY >>> ./ I 00658200          $ 00658300 100
   END APPLY >>> ./ I 00658200          $ 00658300 100
Update Succeeded
Update Execution Time 16 milliseconds.

Date Friday Mar 17, 2017 07:16:00 PM
Loaded from MAINT(094)

       HRC068DK: ./ I 00665800          $ 665810 10
       HRC068DK:          DC    C'STBYPASS',AL1(3,G,4,40)                       HRC068DK
 BEGIN APPLY >>> ./ I 00665800          $ 665810 10
   END APPLY >>> ./ I 00665800          $ 665810 10
Update Succeeded
Update Execution Time 16 milliseconds.