DMKLOG History
References
-
-
Fixes Applied : 28
-
Last Fix ID : [HRC065DK]
Update History
CMS File Input : DMKLOG ASSEMBLE
Date : 12/14/1978 8:51:00 AM
VM Context : MAINT(394)
File Name : DMKLOG.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:47 AM
Created : 1/16/2021 7:31:47 AM
Update Order
R09296DK 601 REASSEMBLE FOR V09296
R09302DK 601 CLEAN UP APAR TO MEET STANDARDS
R09319DK 601 REMOVE DMKSSS FROM LOAD LIST WHEN NO MSS
R09087DK 601 DMKLOG FRETS VMBLOK WITHOUT ZEROING STACKVM WHEN OPERATOR LOGS ON
R08845DK 602 DEFAULT CHARACTER (LEFT BRACKET) FOR
ASCII TERMINAL SET UP
R09593DK 602 MOVE CODE FROM DMKLOG TO DMKLOH FOR SERVICE
R09957DK - CORRECT IOBLOK CONFLICT IN MSS SUPPORT
R10024DK 608 INVOCATION OF DMKJRLLO FROM DMKLOG WHEN LOGGING ON OPERATOR
R09682DK 609 REMOVE CODE OF V08845 FOR RESETTING OF LINEDEL CHARACTER
R09172DK 609 PARALLEL EXECUTION IF STACKED LOGOFF CMD AND RECONNECTING
R10462DK 611 UV00555 ABENDLOK001 DMKDSP LABEL LOCKVM TRYING TO LOC VMBLOK
R10511DK 613 UV00740 PE VM09319 'DED CUU RDEV 3330V'IN COMMUNICATOR VM DIRECTORY
R11411DK 613 UV00955 CHECK UDEVLINK SPECIFIED BY A NEGATIVE R1
R11558DK 616 UV01837 TURN ON VDEVFLG2 IN CASE OF 3330V PARM ON DED
R11344DK 618 UV01215 DESTAGE MODIFIED DATA TO MINIMIZE DATA LOSSES
R12708DK 620 UV03859 VIRT TIMER ASSIST NOT ACTIVE FOR V=R USER
R12982DK 620 UV04415 ABENDLOK001 OR PRG005, TRQ POINTING TO FRET'D VMBLK
R13304DK 622 UV04571 VCNCTL VSPXBLK NOT FRETTED WITH NON 0 FROM DMKACON
R12564DK 623 UV04424 DMKLOG CHANGED VMSTATUS-NO VMBLOK LOCK
R13723DK 623 UV05095 SPLIT DMKLOG FOR MAINTENANCE
R13026DK 624 UV04977 APARS DO NOT COMPLETELY FIX PROBLEM IN USO FOR R2
R14280DK 624 UV05427 MICROCODE UPDATE FOR TCH AND FREE/FRET
HRC013DK V01 UNIVERSITY OF MAINE P.E.R. TRACE FACILITY
HRC014DK V01 LNKNOPAS DIRECTORY OPTION
HRC018DK V01 IMPLEMENT EXTENDED HRC SET FUNCTIONS
HRC029DK V01 UPDATE TO SUPPORT 24 PFS AND LARGER LOGO
HRC101DK V02 TERMINAL ENHANCEMENTS LIKE Z/VM
HRC065DK V01 Logical Device Support Facility
R09296DK
Date Monday Jan 29, 1979 02:39:00 PM
Loaded from MAINT(294)
R09296DK: ./ * REASSEMBLE FOR V09296 00001000
BEGIN APPLY >>> ./ * REASSEMBLE FOR V09296 00001000
Comment >>> ./ * REASSEMBLE FOR V09296 00001000
END APPLY >>> ./ * REASSEMBLE FOR V09296 00001000
Update Succeeded
Update Execution Time 8 milliseconds.
R09302DK
Date Friday Feb 02, 1979 05:16:00 PM
Loaded from MAINT(294)
R09302DK: ./ R 01191000 1191000 $ 1191000 100 00001000
R09302DK: TM MSSFLAG2-OSVSCOM(R1),MSGPROC IS MOUNT NOW @VA09302 00002000
R09302DK: ./ R 01194000 1194000 $ 1194000 100 00003000
R09302DK: NI MSSFLAG2-OSVSCOM(R1),X'FF'-MSGPROC @VA09302 00004000
R09302DK: ./ D 01717000 00005000
BEGIN APPLY >>> ./ R 01191000 1191000 $ 1191000 100 00001000
END APPLY >>> ./ R 01191000 1191000 $ 1191000 100 00001000
BEGIN APPLY >>> ./ R 01194000 1194000 $ 1194000 100 00003000
END APPLY >>> ./ R 01194000 1194000 $ 1194000 100 00003000
BEGIN APPLY >>> ./ D 01717000 00005000
END APPLY >>> ./ D 01717000 00005000
Update Succeeded
Update Execution Time 23 milliseconds.
R09319DK
Date Monday Feb 05, 1979 02:49:00 PM
Loaded from MAINT(294)
R09319DK: ./ I 01140000 $ 01140010 10 00001000
R09319DK: TM PSAMSS,MSSPRES IS MSS PRESENT IN THIS SYSTEM? @VA09319 00002000
R09319DK: BZ ERROR90 NO,INDICATE DEVICE NOT AVAIL. @VA09319 00003000
R09319DK: ./ I 01164000 $ 01164010 10 00004000
R09319DK: TM PSAMSS,MSSPRES IS MSS PRESENT IN THIS SYSTEM? @VA09319 00005000
R09319DK: BZ ERROR90 NO,INDICATE DEVICE NOT AVAIL. @VA09319 00006000
R09319DK: ./ I 01168000 $ 01168010 10 00007000
R09319DK: TM PSAMSS,MSSPRES IS MSS PRESENT IN THIS SYSTEM? @VA09319 00008000
R09319DK: BZ ERROR90 NO,INDICATE DEVICE NOT AVAIL? @VA09319 00009000
BEGIN APPLY >>> ./ I 01140000 $ 01140010 10 00001000
END APPLY >>> ./ I 01140000 $ 01140010 10 00001000
BEGIN APPLY >>> ./ I 01164000 $ 01164010 10 00004000
END APPLY >>> ./ I 01164000 $ 01164010 10 00004000
BEGIN APPLY >>> ./ I 01168000 $ 01168010 10 00007000
END APPLY >>> ./ I 01168000 $ 01168010 10 00007000
Update Succeeded
Update Execution Time 16 milliseconds.
R09087DK
Date Monday Feb 26, 1979 04:10:00 PM
Loaded from MAINT(294)
R09087DK: ./ I 735000 $ 735100 200 00001000
R09087DK: C R1,STACKVM STACKVM = THIS VMBLOK? @VA09087 00002000
R09087DK: BNE LOGSVM NO - LET IT BE. @VA09087 00003000
R09087DK: MVC STACKVM,ZEROES YES - ZERO THE FIELD @VA09087 00004000
R09087DK: LOGSVM EQU * @VA09087 00005000
BEGIN APPLY >>> ./ I 735000 $ 735100 200 00001000
END APPLY >>> ./ I 735000 $ 735100 200 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R08845DK
Date Monday Apr 02, 1979 03:30:00 AM
Loaded from MAINT(294)
R08845DK: ./ I 680000 $ 680100 100 00001000
R08845DK: TM SAVEWRK1,RECON WAS THIS A RECONNECT? @VA08845 00002000
R08845DK: BZ NOTASC IF NO, DON'T WORRY ABOUT IT @VA08845 00003000
R08845DK: MVI VMTLDEL-VMBLOK(R10),X'4A' DEFAULT LINEDEL TO @VA08845 00004000
R08845DK: * CENT 00005000
R08845DK: TM RDEVTMCD,RDEVUSC8 IS IT ASCII TYPE? @VA08845 00006000
R08845DK: BZ NOTASC NO, ALWAYS SET @VA08845 00007000
R08845DK: MVI VMTLDEL-VMBLOK(R10),X'AD' DEFAULT TO LEFT @VA08845 00008000
R08845DK: * BRACKET 00009000
R08845DK: NOTASC EQU * @VA08845 00010000
BEGIN APPLY >>> ./ I 680000 $ 680100 100 00001000
END APPLY >>> ./ I 680000 $ 680100 100 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R09593DK
Date Wednesday Apr 18, 1979 03:21:00 AM
Loaded from MAINT(294)
R09593DK: ./ D 1211000 1275000 $ DMK00010
BEGIN APPLY >>> ./ D 1211000 1275000 $ DMK00010
END APPLY >>> ./ D 1211000 1275000 $ DMK00010
Update Succeeded
Update Execution Time 16 milliseconds.
R09957DK
Date Thursday Jul 12, 1979 09:52: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.
R10024DK
Date Friday Jan 11, 1980 08:13:00 AM
Loaded from MAINT(294)
R10024DK: ./ R 1433000 1434000 $ 1433100 100 00001000
R10024DK: TM SAVEWRK1,AUTOLOG+PSWRDCK LOGGING ON OPERATOR @VA10024 00002000
R10024DK: BNO CALLJRL2 FROM DMKCPI....YES @VA10024 00003000
BEGIN APPLY >>> ./ R 1433000 1434000 $ 1433100 100 00001000
END APPLY >>> ./ R 1433000 1434000 $ 1433100 100 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R09682DK
Date Tuesday Jan 29, 1980 10:12:00 AM
Loaded from MAINT(294)
R09682DK: ./ D 00680100 00680900
BEGIN APPLY >>> ./ D 00680100 00680900
END APPLY >>> ./ D 00680100 00680900
Update Succeeded
Update Execution Time 16 milliseconds.
R09172DK
Date Tuesday Feb 05, 1980 12:11:00 PM
Loaded from MAINT(294)
R09172DK: ./ I 646000 $ 646100 00001000
R09172DK: TM SAVEWRK1,AUTOLOG+PSWRDCK AUTOLOG CMD? @VA09172 00002000
R09172DK: BNZ LOG070AA YES, BYPASS FOLLOWING CHECKS @VA09172 00003000
R09172DK: CALL DMKQCNSY FINISH UP ALL CONSOLE REQUESTS @VA09172 00004000
R09172DK: L R8,VMTERM GET TERMINAL RDEVBLOK ADDRESS @VA09172 00005000
R09172DK: LTR R8,R8 TERMINAL STILL THERE? @VA09172 00006000
R09172DK: BZ LOGEXIT NO, ABORT LOGON @VA09172 00007000
R09172DK: LOG070AA DS 0H @VA09172 00008000
R09172DK: ./ R 672000 675000 $ 672100 100 00009000
R09172DK: LOG07A1 DS 0H @VA09172 00010000
R09172DK: ./ R 854000 $ 854100 100 00011000
R09172DK: TM SAVEWRK1,AUTOLOG+PSWRDCK AUTOLOG CMD? @VA09172 00012000
R09172DK: BNZ LOG07AB YES, BYPASS FOLLOWING CHECKS @VA09172 00013000
R09172DK: NI VMOSTAT-VMBLOK(R10),X'FF'-VMDISC PREVENT 2ND @VA09172 00014000
R09172DK: * USER FROM RECONNECTING 00015000
R09172DK: CALL DMKQCNSY FINISH UP ALL CONSOLE REQUESTS @VA09172 00016000
R09172DK: OI VMOSTAT-VMBLOK(R10),VMDISC RESET VMDISC @VA09172 00017000
R09172DK: BAL R6,LOG07A1 CONTINUE CONNECT PROCESSING @VA09172 00018000
BEGIN APPLY >>> ./ I 646000 $ 646100 00001000
END APPLY >>> ./ I 646000 $ 646100 00001000
BEGIN APPLY >>> ./ R 672000 675000 $ 672100 100 00009000
END APPLY >>> ./ R 672000 675000 $ 672100 100 00009000
BEGIN APPLY >>> ./ R 854000 $ 854100 100 00011000
END APPLY >>> ./ R 854000 $ 854100 100 00011000
Update Succeeded
Update Execution Time 23 milliseconds.
R10462DK
Date Thursday Apr 03, 1980 03:27:00 AM
Loaded from MAINT(294)
R10462DK: ./ I 563000 $ 563500 00001000
R10462DK: OI RDEVSTA3,RDEVATSW PREVENT ATTN DURING SWITCH @VA10462 00002000
R10462DK: ./ I 564000 $ 564500 00003000
R10462DK: NI RDEVSTA3,X'FF'-RDEVATSW ALLOW ATTN AFTER SWITCH @VA10462 00004000
R10462DK: ./ I 682000 $ 682500 00005000
R10462DK: OI RDEVSTA3,RDEVATSW PREVENT ATTN DURING SWITCH @VA10462 00006000
R10462DK: ./ I 683000 $ 683500 00007000
R10462DK: NI RDEVSTA3,X'FF'-RDEVATSW ALLOW ATTN AFTER SWITCH @VA10462 00008000
BEGIN APPLY >>> ./ I 563000 $ 563500 00001000
END APPLY >>> ./ I 563000 $ 563500 00001000
BEGIN APPLY >>> ./ I 564000 $ 564500 00003000
END APPLY >>> ./ I 564000 $ 564500 00003000
BEGIN APPLY >>> ./ I 682000 $ 682500 00005000
END APPLY >>> ./ I 682000 $ 682500 00005000
BEGIN APPLY >>> ./ I 683000 $ 683500 00007000
END APPLY >>> ./ I 683000 $ 683500 00007000
Update Succeeded
Update Execution Time 16 milliseconds.
R10511DK
Date Tuesday Jun 03, 1980 04:02:00 AM
Loaded from MAINT(294)
R10511DK: ./ D 1036000 1038000 $ 00001000
R10511DK: ./ R 1042000 1045000 $ 1042000 500 00002000
R10511DK: BE LOGDEV 'RADDR',NO VOLSER @VA10511 00003000
R10511DK: TM UDEVFTR,VIRTUAL VIRTUAL MACHINE WANTS VUA @VA10511 00004000
R10511DK: BO CALLMSSA CALL DMKSSSL1 @VA10511 00005000
R10511DK: B CALLMSSB CALL DMKSSSL2 @VA10511 00006000
R10511DK: NORADDR EQU * NO RADDR GIVEN @VA10511 00007000
R10511DK: TM UDEVFTR,VIRTUAL VIRTUAL MACHINE WANTS VUA @VA10511 00008000
R10511DK: BO ERROR93 DIRECTORY ERROR @VA10511 00009000
BEGIN APPLY >>> ./ D 1036000 1038000 $ 00001000
END APPLY >>> ./ D 1036000 1038000 $ 00001000
BEGIN APPLY >>> ./ R 1042000 1045000 $ 1042000 500 00002000
END APPLY >>> ./ R 1042000 1045000 $ 1042000 500 00002000
Update Succeeded
Update Execution Time 16 milliseconds.
R11411DK
Date Tuesday Jun 03, 1980 04:22:00 AM
Loaded from MAINT(294)
R11411DK: ./ R 1040000 $ 1040010 00001000
R11411DK: BM NORADDR NO, CHECK FOR VOLSER @VA11411 00002000
R11411DK: ./ R 1149000 $ 1149010 00003000
R11411DK: BNM GETRBLOK YES, GO GET IT @VA11411 00004000
BEGIN APPLY >>> ./ R 1040000 $ 1040010 00001000
END APPLY >>> ./ R 1040000 $ 1040010 00001000
BEGIN APPLY >>> ./ R 1149000 $ 1149010 00003000
END APPLY >>> ./ R 1149000 $ 1149010 00003000
Update Succeeded
Update Execution Time 23 milliseconds.
R11558DK
Date Monday Sep 15, 1980 07:25:00 AM
Loaded from MAINT(294)
R11558DK: ./ R 1095000 1095000 $ 1095100 75 00001000
R11558DK: BNZ NOCHEK NO NEED TO CHECK @VA11558 00002000
R11558DK: TM UDEVFTR,VIRTUAL IS 3330V PARM NEEDED @VA11558 00003000
R11558DK: BNO LOG20 NO @VA11558 00004000
R11558DK: LH R1,UDEVADD GET VIRTUAL DEVICE ADDRESS @VA11558 00005000
R11558DK: CALL DMKSCNVU @VA11558 00006000
R11558DK: OI VDEVFLG2-VDEVBLOK(R8),VDEVVIRT CYL FAULT TO USER@VA11558 00008000
R11558DK: OI RDEVFLAG-RDEVBLOK(R5),RDEV333V DED AS 3330V @VA11558 00010000
R11558DK: B LOG20 GET NEXT DEVICE @VA11558 00011000
R11558DK: NOCHEK EQU * @VA11558 00012000
BEGIN APPLY >>> ./ R 1095000 1095000 $ 1095100 75 00001000
END APPLY >>> ./ R 1095000 1095000 $ 1095100 75 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R11344DK
Date Friday Jan 16, 1981 01:16:00 AM
Loaded from MAINT(294)
R11344DK: ./ I 01030000 $ 1030500 500 10/01/80 08:35:38
R11344DK: XC SAVEWRK9,SAVEWRK9 CLEAR A FLAG FIELD @VA11344 01030500
R11344DK: ./ I 01064000 $ 1064100 100 10/01/80 08:35:38
R11344DK: LR R5,R8 GET RDEVBLOK ADDR INTO R5 @VA11344 01064100
R11344DK: TM RDEVFTR,VIRTUAL THIS AN MSS VIRTUAL VUA? @VA11344 01064200
R11344DK: BZ CHK3330V NO - THEN DON'T TURN OFF FLAG @VA11344 01064300
R11344DK: L R5,F4 PUT 'TURN OFF MTD-BY-CP FLAG' @VA11344 01064400
R11344DK: ST R5,SAVEWRK9 INDICATOR INTO FLAG FIELD @VA11344 01064500
R11344DK: ./ R 01091000 $ 1091000 100 10/01/80 08:35:38
R11344DK: SETVDS DS 0H @VA11344 01091000
R11344DK: CLC SAVEWRK9(4),F4 WE NEED TO TURN OFF 'MTD-BY-CP'? @VA11344 01091100
R11344DK: BNE SETVDS1 NO - THEN DON'T DO IT! @VA11344 01091200
R11344DK: NI RDEVFLAG,X'FF'-RDEVVMNT ELSE TURN IT OFF @VA11344 01091300
R11344DK: SETVDS1 DS 0H @VA11344 01091400
R11344DK: LR R1,R5 BASE RDEVBLOK TO R1 FOR VDS @VA11344 01091500
BEGIN APPLY >>> ./ I 01030000 $ 1030500 500 10/01/80 08:35:38
END APPLY >>> ./ I 01030000 $ 1030500 500 10/01/80 08:35:38
BEGIN APPLY >>> ./ I 01064000 $ 1064100 100 10/01/80 08:35:38
END APPLY >>> ./ I 01064000 $ 1064100 100 10/01/80 08:35:38
BEGIN APPLY >>> ./ R 01091000 $ 1091000 100 10/01/80 08:35:38
END APPLY >>> ./ R 01091000 $ 1091000 100 10/01/80 08:35:38
Update Succeeded
Update Execution Time 16 milliseconds.
R12708DK
Date Wednesday Apr 08, 1981 04:07:00 AM
Loaded from MAINT(294)
R12708DK: ./ R 1369000 $ 1369100 100 00001000
R12708DK: MICVR EQU * @VA12708 00002000
R12708DK: OI VMMCR6,VMMVTMR VIRT INTERVAL TMR FEAT EN @VA12708 00003000
R12708DK: ./ D 1370000
BEGIN APPLY >>> ./ R 1369000 $ 1369100 100 00001000
END APPLY >>> ./ R 1369000 $ 1369100 100 00001000
BEGIN APPLY >>> ./ D 1370000
END APPLY >>> ./ D 1370000
Update Succeeded
Update Execution Time 16 milliseconds.
R12982DK
Date Thursday May 07, 1981 04:13:00 AM
Loaded from MAINT(294)
R12982DK: ./ R 702000 $ 701100 00001000
R12982DK: DROP R7 @VA12982 00002000
R12982DK: ./ I 735700 $ 735710 10 00003000
R12982DK: TM RDEVTFLG,RDEVTRQ IS THERE A TRQ ? @VA12982 00004000
R12982DK: BZ LOGSVM1 NO...CONTINUE @VA12982 00005000
R12982DK: L R6,RDEVAIRA GET TRQBLOK POINTER @VA12982 00006000
R12982DK: USING TRQBLOK,R6 @VA12982 00007000
R12982DK: C R1,TRQBUSER IS IT FOR PSEUDO VMBLOK ? @VA12982 00008000
R12982DK: BNE LOGSVM1 NO...BRANCH @VA12982 00009000
R12982DK: LR R5,R1 SAVE VMBLOK FOR LATER USE @VA12982 00010000
R12982DK: LR R1,R6 GET READY TO FRET THE TRQBLOK @VA12982 00011000
R12982DK: CALL DMKSCHRT TAKE OFF THE CHAIN @VA12982 00012000
R12982DK: LR R1,R5 RESTORE VMBLOK @VA12982 00013000
R12982DK: ST R10,TRQBUSER UPDATE TRQBLOK USER @VA12982 00014000
R12982DK: NI RDEVTFLG,X'FF'-RDEVTRQ RESET TRQ INDICATOR @VA12982 00015000
R12982DK: DROP R6,R8 @VA12982 00016000
R12982DK: LOGSVM1 DS 0H @VA12982 00017000
BEGIN APPLY >>> ./ R 702000 $ 701100 00001000
END APPLY >>> ./ R 702000 $ 701100 00001000
BEGIN APPLY >>> ./ I 735700 $ 735710 10 00003000
END APPLY >>> ./ I 735700 $ 735710 10 00003000
Update Succeeded
Update Execution Time 16 milliseconds.
R13304DK
Date Wednesday Jun 24, 1981 06:03:00 AM
Loaded from MAINT(294)
R13304DK: ./ I 992000 $ 992500 00001000
R13304DK: OI VMSPMFLG,VMLOGON2 INDICATE VDEV GOTTEN ON LOGON @VA13304 00002000
BEGIN APPLY >>> ./ I 992000 $ 992500 00001000
END APPLY >>> ./ I 992000 $ 992500 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R12564DK
Date Wednesday Sep 23, 1981 09:20:00 AM
Loaded from MAINT(294)
R12564DK: ./ I 737000 $ 737100 100
R12564DK: * SWITCH TO REAL VMBLOK AND GET VMBLOK LOCK
R12564DK: DROP R10 @VA12564
R12564DK: LR R1,R10 SWITCH TO REAL RECONN VMBLOK@VA12564
R12564DK: USING VMBLOK,R11 @VA12564
R12564DK: BAL R5,SWVM GO TO SWITCH VMBLOKS @VA12564
R12564DK: ST R11,SAVER11 RETURN VMBLOK TO CALLER @VA12564
R12564DK: ./ D 739000 $
R12564DK: ./ D 745000 748000 $
R12564DK: ./ D 759000 760000 $
R12564DK: ./ D 776000 779000 $
BEGIN APPLY >>> ./ I 737000 $ 737100 100
END APPLY >>> ./ I 737000 $ 737100 100
BEGIN APPLY >>> ./ D 739000 $
END APPLY >>> ./ D 739000 $
BEGIN APPLY >>> ./ D 745000 748000 $
END APPLY >>> ./ D 745000 748000 $
BEGIN APPLY >>> ./ D 759000 760000 $
END APPLY >>> ./ D 759000 760000 $
BEGIN APPLY >>> ./ D 776000 779000 $
END APPLY >>> ./ D 776000 779000 $
Update Succeeded
Update Execution Time 23 milliseconds.
R13723DK
Date Thursday Aug 27, 1981 08:04:00 AM
Loaded from MAINT(294)
R13723DK: ./ R 00085000 $ 85000 500 07/24/81 16:26:06
R13723DK: * DMKLOHRC - SPLIT FROM THIS ROUTINE. RECONNECT DISC USER 00085000
R13723DK: * 00085500
R13723DK: ./ I 00475000 $ 475500 500 07/24/81 16:26:06
R13723DK: EXTRN DMKLOHRC RECONNECT DISC USER @VA13723 00475500
R13723DK: ./ R 00669000 00780000 $ 669000 10000 07/24/81 16:26:06
R13723DK: LOG07A DS 0H @VA13723 00669000
R13723DK: L R2,SAVEWRK1 LOAD STATUS BITS FOR DMKLOHRC @VA13723 00679000
R13723DK: LR R1,R10 ADDR OF DISCONNECTED VMBLOK @VA13723 00689000
R13723DK: CALL DMKLOHRC GO RECONNECT THE USER @VA13723 00699000
R13723DK: ST R11,SAVER11 PASS RETURNED VMBLOK TO CALLER @VA13723 00709000
R13723DK: B *+4(R1) BRANCH ON RETURN CODE @VA13723 00719000
R13723DK: B LOG50 RC=0, CONTINUE RECONNECT @VA13723 00729000
R13723DK: B LOGEXIT RC=4, TERMINAL GONE, ABORT @VA13723 00739000
R13723DK: B 0(R6) RC=8, OPERATOR IS LOGGING ON @VA13723 00749000
R13723DK: DROP R7,R8 @VA13723 00759000
R13723DK: ./ D 00854100 00854300 07/24/81 16:26:06
R13723DK: ./ R 00854600 00854700 $ 854600 400 07/24/81 16:26:06
R13723DK: BAL R6,LOG07A CONTINUE CONNECT PROCESSING @VA13723 00854600
R13723DK: ./ D 01678000 07/24/81 16:26:06
BEGIN APPLY >>> ./ R 00085000 $ 85000 500 07/24/81 16:26:06
END APPLY >>> ./ R 00085000 $ 85000 500 07/24/81 16:26:06
BEGIN APPLY >>> ./ I 00475000 $ 475500 500 07/24/81 16:26:06
END APPLY >>> ./ I 00475000 $ 475500 500 07/24/81 16:26:06
BEGIN APPLY >>> ./ R 00669000 00780000 $ 669000 10000 07/24/81 16:26:06
END APPLY >>> ./ R 00669000 00780000 $ 669000 10000 07/24/81 16:26:06
BEGIN APPLY >>> ./ D 00854100 00854300 07/24/81 16:26:06
END APPLY >>> ./ D 00854100 00854300 07/24/81 16:26:06
BEGIN APPLY >>> ./ R 00854600 00854700 $ 854600 400 07/24/81 16:26:06
END APPLY >>> ./ R 00854600 00854700 $ 854600 400 07/24/81 16:26:06
BEGIN APPLY >>> ./ D 01678000 07/24/81 16:26:06
END APPLY >>> ./ D 01678000 07/24/81 16:26:06
Update Succeeded
Update Execution Time 23 milliseconds.
R13026DK
Date Wednesday Sep 23, 1981 09:02:00 AM
Loaded from MAINT(294)
R13026DK: ./ I 1586000 $ 1586500 500 00001000
R13026DK: OI VMSVSTAT,VMLGFORC INDICATE USER WAS FORCED OFF @VA13026 00002000
BEGIN APPLY >>> ./ I 1586000 $ 1586500 500 00001000
END APPLY >>> ./ I 1586000 $ 1586500 500 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R14280DK
Date Wednesday Nov 04, 1981 01:37:00 PM
Loaded from MAINT(294)
R14280DK: ./ R 1341000 $ 1341100 500
R14280DK: L R15,PREFIXA POINT TO ABSOLUTE PSA @VA14280 01341000
R14280DK: MVC MICEVMA,PSAEVMA-PSA(R15) COPY EVMA CONTROLS @VA14280 01341500
BEGIN APPLY >>> ./ R 1341000 $ 1341100 500
END APPLY >>> ./ R 1341000 $ 1341100 500
Update Succeeded
Update Execution Time 16 milliseconds.
HRC013DK
Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
HRC013DK: ./ * ************* PER001 00001000
HRC013DK: ./ * * PER001 00002000
HRC013DK: ./ * * PER001 08/07/79 ADD "P.E.R." TRACE FACILITY PER001 00003000
HRC013DK: ./ * * PER001 00004000
HRC013DK: ./ * ************* PER001 00005000
HRC013DK: ./ * PER001 00006000
HRC013DK: ./ I 872000 $ 872100 100 PER001 00007000
HRC013DK: XC VMPERCTL(4),VMPERCTL CLEAR PER BLOCK POINTER PER001 00008000
HRC013DK: MVI VMPERFLG,X'00' CLEAR PER FLAGS PER001 00009000
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 08/07/79 ADD "P.E.R." TRACE FACILITY PER001 00003000
Comment >>> ./ * * PER001 08/07/79 ADD "P.E.R." TRACE FACILITY PER001 00003000
END APPLY >>> ./ * * PER001 08/07/79 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 872000 $ 872100 100 PER001 00007000
END APPLY >>> ./ I 872000 $ 872100 100 PER001 00007000
Update Succeeded
Update Execution Time 16 milliseconds.
HRC014DK
Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
HRC014DK: ./ I 00868000 $ 868200 200 02/07/06 21:28:31
HRC014DK: TM UMACOPT2,UMADLNKN LINK NO PASS OPTION ON ? HRC011DK 00865000
HRC014DK: BZ *+8 NO - HRC011DK 00867000
HRC014DK: OI VMFSTAT,VMFDLNKN YES,SET FLAG BIT IN VMBLOK HRC011DK 00868000
BEGIN APPLY >>> ./ I 00868000 $ 868200 200 02/07/06 21:28:31
END APPLY >>> ./ I 00868000 $ 868200 200 02/07/06 21:28:31
Update Succeeded
Update Execution Time 23 milliseconds.
HRC018DK
Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
HRC018DK: ./ D 00486000 00491000
HRC018DK: ./ I 00788000
HRC018DK: L R10,ASYSOP A(OPERATOR VMBLOK) HRC018DK 00788100
HRC018DK: CLR R10,R11 SAME AS THIS ONE? HRC018DK 00788200
HRC018DK: BE LOG10A YES,ALWAYS ALLOW HIM ON HRC018DK 00788300
HRC018DK: ./ I 00860000
HRC018DK: MVC VMHRCPRV,UMACCLEV SAVE FOR SET PRIV FUNCTION HRC018DK 00860100
BEGIN APPLY >>> ./ D 00486000 00491000
END APPLY >>> ./ D 00486000 00491000
BEGIN APPLY >>> ./ I 00788000
***WARNING*** >>> Automatic Resequencing Suppressed
END APPLY >>> ./ I 00788000
BEGIN APPLY >>> ./ I 00860000
***WARNING*** >>> Automatic Resequencing Suppressed
END APPLY >>> ./ I 00860000
Update Succeeded
Update Execution Time 23 milliseconds.
HRC029DK
Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
HRC029DK: ./ I 00663000 $ 663500 500 02/22/06 12:41:41
HRC029DK: NI VMSVSTAT,X'FF'-VMLGHOLD RESET HOLD FLAG HRC029DK
BEGIN APPLY >>> ./ I 00663000 $ 663500 500 02/22/06 12:41:41
END APPLY >>> ./ I 00663000 $ 663500 500 02/22/06 12:41:41
Update Succeeded
Update Execution Time 23 milliseconds.
HRC101DK
Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
HRC101DK: ./ I 00821000 $ 821300 300 03/13/06 10:18:04
HRC101DK: ICM R15,B'0011',=XL2'320A' HRC101DK 00821300
HRC101DK: STH R15,VMMORETM SET DEFAULT TIMES FOR CRT HRC101DK 00821600
HRC101DK: ./ I 01279000 $ 1279100 100 03/13/06 10:18:04
HRC101DK: TM SAVEWRK1,RECON RECONNECTING? HRC101DK
HRC101DK: BNO RESCNT RESET COUNT HRC101DK
HRC101DK: NI VMMLVL2,X'FF'-VMMHLITE TURN OFF HILIGHT HRC101DK
HRC101DK: B SKIPCNT HRC101DK
HRC101DK: RESCNT DS 0H HRC101DK
HRC101DK: ./ I 01280000 $ 1280500 500 03/13/06 10:18:04
HRC101DK: SKIPCNT DS 0H HRC101DK
BEGIN APPLY >>> ./ I 00821000 $ 821300 300 03/13/06 10:18:04
END APPLY >>> ./ I 00821000 $ 821300 300 03/13/06 10:18:04
BEGIN APPLY >>> ./ I 01279000 $ 1279100 100 03/13/06 10:18:04
END APPLY >>> ./ I 01279000 $ 1279100 100 03/13/06 10:18:04
BEGIN APPLY >>> ./ I 01280000 $ 1280500 500 03/13/06 10:18:04
END APPLY >>> ./ I 01280000 $ 1280500 500 03/13/06 10:18:04
Update Succeeded
Update Execution Time 23 milliseconds.
HRC065DK
Date Friday May 19, 2017 07:03:00 PM
Loaded from MAINT(094)
HRC065DK: ./ I 00661000 $ 00661020 20
HRC065DK: LTR R8,R8 Logon user's term avail?HRC065DK
HRC065DK: BZ LOG070A1 No, skip LDEV checks HRC065DK
HRC065DK: TM RDEVADD,RDEVLDEV Is user trying to HRC065DK
HRC065DK: BZ LOG070A1 logon via LDEV? No... HRC065DK
HRC065DK: PUSH USING HRC065DK
HRC065DK: USING LDEVBLOK,R8 HRC065DK
HRC065DK: C R1,LDEVUSER Is LDEV user trying to HRC065DK
HRC065DK: * connect to LDEV creator?HRC065DK
HRC065DK: BE ERROR66 Yes, this is not allowedHRC065DK
HRC065DK: POP USING LDEVBLOK HRC065DK
HRC065DK: LOG070A1 EQU * HRC065DK
HRC065DK: ./ I 01482000 $ 01482100 100
HRC065DK: TM RDEVADD,RDEVLDEV Is this an LDEV? HRC065DK
HRC065DK: BO TERMLDEV Yes, special handling HRC065DK
HRC065DK: ./ I 01490000 $ 01490100 100
HRC065DK: TERMLDEV EQU * HRC065DK
HRC065DK: LH R1,RDEVADD Get the LDEV address HRC065DK
HRC065DK: N R1,F4095 Keep only the dev num HRC065DK
HRC065DK: CALL DMKCVTBH Make it displayable HRC065DK
HRC065DK: ICM R1,8,=C'L' Insert LDEV identifier HRC065DK
HRC065DK: L R0,=C'GRF ' Use short GRAF name HRC065DK
HRC065DK: BR R4 Return with R0/R1 filledHRC065DK
HRC065DK: ./ I 01609000 $ 01609100 100
HRC065DK: ERROR66 EQU * Cant connect to host VM HRC065DK
HRC065DK: LA R2,66 -> message num DMKEMA HRC065DK
HRC065DK: B ERRJOIN1 Go display msg HRC065DK
BEGIN APPLY >>> ./ I 00661000 $ 00661020 20
END APPLY >>> ./ I 00661000 $ 00661020 20
BEGIN APPLY >>> ./ I 01482000 $ 01482100 100
END APPLY >>> ./ I 01482000 $ 01482100 100
BEGIN APPLY >>> ./ I 01490000 $ 01490100 100
END APPLY >>> ./ I 01490000 $ 01490100 100
BEGIN APPLY >>> ./ I 01609000 $ 01609100 100
END APPLY >>> ./ I 01609000 $ 01609100 100
Update Succeeded
Update Execution Time 23 milliseconds.