DMSTPE History
References
-
-
Fixes Applied : 7
-
Last Fix ID : [HRC002DS]
Update History
CMS File Input : DMSTPE ASSEMBLE
Date : 12/12/1978 8:36:00 AM
VM Context : MAINT(393)
File Name : DMSTPE.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:32 AM
Created : 1/16/2021 7:31:32 AM
Update Order
R11305DS 613 UV01191 DMSTPE RC=28 NOT GIVEN ON 'TAPE SCAN FN FT'
R11834DS 618 UV02018 TAPE MAP WRITTEN AS A1 INSTEAD OF A5
R11948DS 618 UV02795 GET RC0 WHEN TAPE SCAN A BLANK TAPE
R13090DS 620 UV04009 PE11305 TAPE SKIP RECEIVES RETURN CODE 28.
R14196DS 625 UV05588 DMSTPE NO MSDMSTPE069E DISK NOT ACCESSED.
R14821DS 628 UV06194 DMSTPE NO MSDMSSTT062E INVALID FN STARTS WITH *.
HRC002DS V01 ADD MORE MINIDISKS & TAPES TO MATCH VM/SP - TAPE
R11305DS
Date Friday Jun 06, 1980 05:23:00 AM
Loaded from MAINT(193)
R11305DS: ./ R 1061000 $ 1061000 100
R11305DS: TM TPEFLG,MATCHFN+MATCHFT+MATCHFM ANY MATCH ? @VA11305
R11305DS: BZ PRTFILID NO MATCH, DON'T SET FLAG @VA11305
R11305DS: OI TPEFLG,INPUT NOTE THAT A FILE WAS FOUND @VA11305
R11305DS: PRTFILID EQU * @VA11305
R11305DS: ./ I 1211000 $ 1211100
R11305DS: TM FLAGS,SCNSWT+LOADSWT SCAN/LOAD W/NO FILEID @VA11305
R11305DS: BM RETURN WE DON"T CARE @VA11305
BEGIN APPLY >>> ./ R 1061000 $ 1061000 100
END APPLY >>> ./ R 1061000 $ 1061000 100
BEGIN APPLY >>> ./ I 1211000 $ 1211100
END APPLY >>> ./ I 1211000 $ 1211100
Update Succeeded
Update Execution Time 23 milliseconds.
R11834DS
Date Tuesday Dec 16, 1980 12:15:00 PM
Loaded from MAINT(193)
R11834DS: ./ R 418000 $ 418000
R11834DS: LA R1,PERASE ERASE 'TAPE MAP A5' IF IT EXISTS @VA11834
R11834DS: ./ R 1657000 $ 1657000
R11834DS: OUTDISK DS 0D OUTPUT TO FILE TAPE MAP A5 @VA11834
R11834DS: ./ R 1661000 $ 1661000
R11834DS: OUTMODE DC CL2'A5' FILE MODE @VA11834
R11834DS: ./ R 1715000 $ 1715000
R11834DS: DC CL2'A5' A DISK ONLY @VA11834
BEGIN APPLY >>> ./ R 418000 $ 418000
END APPLY >>> ./ R 418000 $ 418000
BEGIN APPLY >>> ./ R 1657000 $ 1657000
END APPLY >>> ./ R 1657000 $ 1657000
BEGIN APPLY >>> ./ R 1661000 $ 1661000
END APPLY >>> ./ R 1661000 $ 1661000
BEGIN APPLY >>> ./ R 1715000 $ 1715000
END APPLY >>> ./ R 1715000 $ 1715000
Update Succeeded
Update Execution Time 23 milliseconds.
R11948DS
Date Tuesday Dec 16, 1980 12:15:00 PM
Loaded from MAINT(193)
R11948DS: ./ I 1060000 $ 1060500 @VA11948 00003000
R11948DS: OI FLAGS2,NOTBLANK TAPE IS NOT A BLANK. @VA11948 00004000
R11948DS: ./ R 1208000 $ 1207500 100 @VA11948 00007000
R11948DS: CHKINPUT EQU * @VA11948
R11948DS: TM FLAGS2,NOTBLANK IS TAPE A BLANK TAPE? @VA11948 00008000
R11948DS: BNO ERR2RC GIVE RETURN CODE. @VA11948 00009000
R11948DS: TM TPEFLG,INPUT ANYTHING LOADED? @VA11948 00009000
R11948DS: ./ I 1746000 $ 1746100 100 @VA11948 00011000
R11948DS: FLAGS2 DC X'00' SECOND INTERNAL FLAG BYTE. @VA11948 00012000
R11948DS: NOTBLANK EQU X'40' TAPE IS NOT BLANK. @VA11948 00012000
BEGIN APPLY >>> ./ I 1060000 $ 1060500 @VA11948 00003000
END APPLY >>> ./ I 1060000 $ 1060500 @VA11948 00003000
BEGIN APPLY >>> ./ R 1208000 $ 1207500 100 @VA11948 00007000
END APPLY >>> ./ R 1208000 $ 1207500 100 @VA11948 00007000
BEGIN APPLY >>> ./ I 1746000 $ 1746100 100 @VA11948 00011000
END APPLY >>> ./ I 1746000 $ 1746100 100 @VA11948 00011000
Update Succeeded
Update Execution Time 16 milliseconds.
R13090DS
Date Friday Apr 10, 1981 04:10:00 AM
Loaded from MAINT(193)
R13090DS: ./ R 1211100 $ 1211100 5
R13090DS: TM FLAGS,SCNSWT+LOADSWT+SKPSWT WITH NO FILEID @VA13090
BEGIN APPLY >>> ./ R 1211100 $ 1211100 5
END APPLY >>> ./ R 1211100 $ 1211100 5
Update Succeeded
Update Execution Time 23 milliseconds.
R14196DS
Date Thursday Oct 15, 1981 05:01:00 PM
Loaded from MAINT(193)
R14196DS: ./ I 00067000 $ 00067500 100
R14196DS: * 36 : TARGET DISK NOT ACCESSED @VA14196
R14196DS: ./ I 00753000 $ 00753500 50
R14196DS: CH R15,=H'36' DISK NOT ACCESSED @VA14196
R14196DS: BE ERROR069 YES, ISSUE ERROR MSG @VA14196
R14196DS: ./ I 00981000 $ 00981500 50
R14196DS: CH R15,=H'36' DISK NOT ACCESSED @VA14196
R14196DS: BE ERROR069 YES, ISSUE ERROR MSG @VA14196
R14196DS: ./ I 01400000 $ 01400500 20
R14196DS: * @VA14196
R14196DS: ERROR069 EQU * @VA14196
R14196DS: DMSERR TEXT='DISK ''..'' NOT ACCESSED',NUM=69, X
R14196DS: LET=E,SUB=(CHARA,(STATFM,1)) @VA14196
R14196DS: LA R15,36 RETURN CODE = 36 @VA14196
R14196DS: B ERRET30 @VA14196
BEGIN APPLY >>> ./ I 00067000 $ 00067500 100
END APPLY >>> ./ I 00067000 $ 00067500 100
BEGIN APPLY >>> ./ I 00753000 $ 00753500 50
END APPLY >>> ./ I 00753000 $ 00753500 50
BEGIN APPLY >>> ./ I 00981000 $ 00981500 50
END APPLY >>> ./ I 00981000 $ 00981500 50
BEGIN APPLY >>> ./ I 01400000 $ 01400500 20
END APPLY >>> ./ I 01400000 $ 01400500 20
Update Succeeded
Update Execution Time 23 milliseconds.
R14821DS
Date Monday Feb 15, 1982 09:30:00 AM
Loaded from MAINT(193)
R14821DS: ./ I 00745000 $ 745500 100
R14821DS: MVC STATFN(16),SAVEFN HAVE STATE CHECK FN AND FT @VA14821
R14821DS: ./ I 00975000 $ 975500 100
R14821DS: MVC STATFN(16),SAVEFN HAVE STATE CHECK FN AND FT @VA14821
R14821DS: ./ R 01709000 $ 1709500 100
R14821DS: STATFN DC CL8' ' @VA14821
BEGIN APPLY >>> ./ I 00745000 $ 745500 100
END APPLY >>> ./ I 00745000 $ 745500 100
BEGIN APPLY >>> ./ I 00975000 $ 975500 100
END APPLY >>> ./ I 00975000 $ 975500 100
BEGIN APPLY >>> ./ R 01709000 $ 1709500 100
END APPLY >>> ./ R 01709000 $ 1709500 100
Update Succeeded
Update Execution Time 23 milliseconds.
HRC002DS
Date Thursday Feb 09, 2006 09:23:00 PM
Loaded from MAINT(093)
HRC002DS: ./ R 00132000 $ 132490 490 01/01/06 12:32:36
HRC002DS: * IN RANGE OF 180-187, 288-28F (TAP0-TAP7, TAP8-TAPF) ARHRC002DS 00132490
HRC002DS: ./ R 00305000 $ 305190 190 01/01/06 12:32:36
HRC002DS: DC CL8'TAP0' TAP0 HRC002DS 00305190
HRC002DS: DC AL1(4),AL3(TAPE50) HRC002DS 00305380
HRC002DS: TAP1 DC CL8'TAP1' TAP1 HRC002DS 00305570
HRC002DS: ./ R 00312000 $ 312030 30 01/01/06 12:32:36
HRC002DS: DC AL1(4),AL3(TAPE50) HRC002DS 00312030
HRC002DS: DC CL8'TAP5' TAP5 HRC002DS 00312060
HRC002DS: DC AL1(4),AL3(TAPE50) HRC002DS 00312090
HRC002DS: DC CL8'TAP6' TAP6 HRC002DS 00312120
HRC002DS: DC AL1(4),AL3(TAPE50) HRC002DS 00312150
HRC002DS: DC CL8'TAP7' TAP7 HRC002DS 00312180
HRC002DS: DC AL1(4),AL3(TAPE50) HRC002DS 00312210
HRC002DS: DC CL8'TAP8' TAP8 HRC002DS 00312240
HRC002DS: DC AL1(4),AL3(TAPE50) HRC002DS 00312270
HRC002DS: DC CL8'TAP9' TAP9 HRC002DS 00312300
HRC002DS: DC AL1(4),AL3(TAPE50) HRC002DS 00312330
HRC002DS: DC CL8'TAPA' TAPA HRC002DS 00312360
HRC002DS: DC AL1(4),AL3(TAPE50) HRC002DS 00312390
HRC002DS: DC CL8'TAPB' TAPB HRC002DS 00312420
HRC002DS: DC AL1(4),AL3(TAPE50) HRC002DS 00312450
HRC002DS: DC CL8'TAPC' TAPC HRC002DS 00312480
HRC002DS: DC AL1(4),AL3(TAPE50) HRC002DS 00312510
HRC002DS: DC CL8'TAPD' TAPD HRC002DS 00312540
HRC002DS: DC AL1(4),AL3(TAPE50) HRC002DS 00312570
HRC002DS: DC CL8'TAPE' TAPE HRC002DS 00312600
HRC002DS: DC AL1(4),AL3(TAPE50) HRC002DS 00312630
HRC002DS: DC CL8'TAPF' TAPF HRC002DS 00312660
HRC002DS: DC AL1(4),AL3(TAPE50) HRC002DS 00312690
BEGIN APPLY >>> ./ R 00132000 $ 132490 490 01/01/06 12:32:36
END APPLY >>> ./ R 00132000 $ 132490 490 01/01/06 12:32:36
BEGIN APPLY >>> ./ R 00305000 $ 305190 190 01/01/06 12:32:36
END APPLY >>> ./ R 00305000 $ 305190 190 01/01/06 12:32:36
BEGIN APPLY >>> ./ R 00312000 $ 312030 30 01/01/06 12:32:36
END APPLY >>> ./ R 00312000 $ 312030 30 01/01/06 12:32:36
Update Succeeded
Update Execution Time 39 milliseconds.