ibm:vm370-lib:cp:dmklog.assemble_hst
Table of Contents
DMKLOG History
References
- Fixes Applied : 28
- Latest Source Date : Thursday, December 14, 1978
- 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.
ibm/vm370-lib/cp/dmklog.assemble_hst.txt · Last modified: 2023/08/06 13:37 by Site Administrator