DMSXCP History
- - References
  - Update History
    - Update Order
    - R08678DS
    - R10745DS
    - R10244DS
    - R12729DS
    - R12870DS
    - R15315DS

DMSXCP History

References

Abstract / Synopsis of DMSXCP
Latest Source of DMSXCP
Fixes Applied : 6
Latest Source Date : Tuesday, December 12, 1978
Last Fix ID : [R15315DS]

Update History

CMS File Input : DMSXCP ASSEMBLE
Date : 12/12/1978 8:37:00 AM
VM Context : MAINT(393)
File Name : DMSXCP.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:33 AM
Created : 1/16/2021 7:31:32 AM

Update Order

R08678DS 601 POOR PERFORMANCE OF SVC0 IN DMSXCP
R10745DS 613 UV01065 ACTION ERROR ON REPRO FIXED FILE
R10244DS 613 UV01074 DROPS 60TH RECORD ON IMPORT FILE
R12729DS 619 UV03865 PASS RESIDUAL COUNT ON INCORRECT LENGTH.
R12870DS 620 UV04137 INCORRECT LENGTH REPRO OF VARIABLE INPUT CMS FILE.
R15315DS 629 UV06157 MSDMSXCP104S ERROR CODE 26.

R08678DS

Date Wednesday Feb 21, 1979 09:52:00 AM
Loaded from MAINT(193)

       R08678DS: ./ R 579000 585000 $ 579050 50
       R08678DS:          SR    R4,R4               CLEAR                       @VA08678
       R08678DS:          IC    R4,IOSW             GET CCW CODE                @VA08678
       R08678DS:          A     R4,ASDCODES         DISPLACE INTO CODES LIST    @VA08678
       R08678DS:          SR    R5,R5               CLEAR                       @VA08678
       R08678DS:          IC    R5,0(0,R4)          GET ROUTINE ID              @VA08678
       R08678DS:          B     DSKRTN(R5)          BRANCH TO PROPER ROUTINE    @VA08678
       R08678DS: DSKRTN   DS    0H                                              @VA08678
       R08678DS:          B     INVCCW              00 INVALID CCW CODE         @VA08678
       R08678DS:          B     SDEXIT              04 NO-OP                    @VA08678
       R08678DS:          B     SDSRCHID            08 SEARCH ID                @VA08678
       R08678DS:          B     SDRDCNT             0C READ COUNT               @VA08678
       R08678DS:          B     SDREAD              10 READ KEY AND DATA        @VA08678
       R08678DS:          B     SDRDCKD             14 READ COUNT, KEY AND DATA @VA08678
       R08678DS:          B     SDWRCKD             18 WRITE COUNT,KEY AND DATA @VA08678
       R08678DS:          B     SDWRITE             1C WRITE, KEY AND DATA      @VA08678
       R08678DS:          B     SDEXIT2             20 TIC CCW                  @VA08678
       R08678DS: ./ I 1512000 $ 1512100 100
       R08678DS:          DC    AL1(1),AL3(CDPUNCH) CARD PUNCH,FEED,SS          @VA08678
       R08678DS: ./ R 1522000 1523000 $ 1523100 100
       R08678DS: ENDCDC   EQU   (*-CDCODES)/4       LENGTH OF CDCODES           @VA08678
       R08678DS: ASDCODES DC    A(SDCODES)          ADDRESS OF SDCODES TABLE    @VA08678
       R08678DS: ./ R 1531000 1607000 $ 1531100 100
       R08678DS: *              0  1  2  3  4  5  6  7  8  9  A  B  C  D  E  F
       R08678DS: SDCODES  DC X'00,18,04,04,04,1C,10,04,20,00,00,04,00,1C,10,04'  00
       R08678DS:          DC X'00,04,0C,04,00,04,04,04,20,04,04,04,00,18,14,04'  10
       R08678DS:          DC X'00,00,04,04,04,04,00,04,20,04,00,04,00,04,00,00'  20
       R08678DS:          DC X'00,08,00,00,00,04,00,00,20,04,00,00,00,00,00,00'  30
       R08678DS:          DC X'00,00,00,00,04,04,00,00,20,04,00,00,00,04,00,00'  40
       R08678DS:          DC X'00,08,00,04,00,04,00,00,20,00,00,00,00,00,00,00'  50
       R08678DS:          DC X'00,00,00,00,00,04,00,00,20,04,00,00,00,04,00,00'  60
       R08678DS:          DC X'00,00,00,04,00,04,00,00,20,00,00,00,00,00,00,00'  70
       R08678DS: *              0  1  2  3  4  5  6  7  8  9  A  B  C  D  E  F
       R08678DS:          DC X'00,00,00,08,00,00,10,04,20,00,00,00,00,00,10,00'  80
       R08678DS:          DC X'00,00,0C,00,04,00,04,00,20,00,04,00,00,00,14,00'  90
       R08678DS:          DC X'00,00,00,00,04,04,00,00,20,04,00,00,00,04,00,00'  A0
       R08678DS:          DC X'00,08,00,00,04,04,00,00,20,04,00,00,00,00,00,00'  B0
       R08678DS:          DC X'00,00,00,00,00,04,00,00,20,04,00,00,00,04,00,00'  C0
       R08678DS:          DC X'00,08,00,00,00,04,00,00,20,00,00,00,00,00,00,00'  D0
       R08678DS:          DC X'00,00,00,00,00,04,00,00,20,04,00,00,00,04,00,00'  E0
       R08678DS:          DC X'00,08,00,00,00,04,00,00,20,00,00,00,00,00,00,00'  F0
       R08678DS: *              0  1  2  3  4  5  6  7  8  9  A  B  C  D  E  F
 BEGIN APPLY >>> ./ R 579000 585000 $ 579050 50
   END APPLY >>> ./ R 579000 585000 $ 579050 50
 BEGIN APPLY >>> ./ I 1512000 $ 1512100 100
   END APPLY >>> ./ I 1512000 $ 1512100 100
 BEGIN APPLY >>> ./ R 1522000 1523000 $ 1523100 100
   END APPLY >>> ./ R 1522000 1523000 $ 1523100 100
 BEGIN APPLY >>> ./ R 1531000 1607000 $ 1531100 100
   END APPLY >>> ./ R 1531000 1607000 $ 1531100 100
Update Succeeded
Update Execution Time 23 milliseconds.

R10745DS

Date Wednesday Jun 04, 1980 05:23:00 AM
Loaded from MAINT(193)

       R10745DS: ./ I 653000 $ 653100 100
       R10745DS:          CLI   0(R3),VSRDCNT    IS CURRENT CCW A READ COUNT    @VA10745
       R10745DS:          BNE   VSROK1       NO-FORGET RD CNT AFTER READ        @VA10745
       R10745DS:          ICM   R4,15,DOSREAD    SEE IF EOF ON READCNT          @VA10745
       R10745DS:          BZ    SDNORES        YES-IN THIS CASE NO RESID CNT    @VA10745
       R10745DS: VSROK1   EQU   *             CONTINUE TO TEST FOR RESID CNT    @VA10745
       R10745DS: ./ I 1351000 $ 1351500
       R10745DS: VSRDCNT  EQU   X'92'   READ COUNT CCW (VSAM SPECIAL)           @VA10745
 BEGIN APPLY >>> ./ I 653000 $ 653100 100
   END APPLY >>> ./ I 653000 $ 653100 100
 BEGIN APPLY >>> ./ I 1351000 $ 1351500
   END APPLY >>> ./ I 1351000 $ 1351500
Update Succeeded
Update Execution Time 23 milliseconds.

R10244DS

Date Wednesday Jun 04, 1980 05:23:00 AM
Loaded from MAINT(193)

       R10244DS: ./ I 740000 $ 740250 250
       R10244DS:          TM    21(R2),INP  INPUT FILE?                         @VA10244
       R10244DS:          BO    SDBYPASS    BYPASS OUTPUT TEST                  @VA10244
       R10244DS: ./ I 742000 $ 742500
       R10244DS: SDBYPASS EQU   *                                               @VA10244
 BEGIN APPLY >>> ./ I 740000 $ 740250 250
   END APPLY >>> ./ I 740000 $ 740250 250
 BEGIN APPLY >>> ./ I 742000 $ 742500
   END APPLY >>> ./ I 742000 $ 742500
Update Succeeded
Update Execution Time 16 milliseconds.

R12729DS

Date Tuesday Mar 10, 1981 03:10:00 AM
Loaded from MAINT(193)

       R12729DS: ./ R 905000 $ 905000 250
       R12729DS:          STH   R8,CCBCNT           PASS RESIDUAL COUNT         @VA12729
       R12729DS:          BZ    IODONE              GOOD I/O, EXIT              @VA12729
 BEGIN APPLY >>> ./ R 905000 $ 905000 250
   END APPLY >>> ./ R 905000 $ 905000 250
Update Succeeded
Update Execution Time 23 milliseconds.

R12870DS

Date Friday Apr 10, 1981 04:10:00 AM
Loaded from MAINT(193)

       R12870DS: ./ R 665000 $ 665000
       R12870DS:          B     IODONE2           I/O COMPLETE                  @VA12870
 BEGIN APPLY >>> ./ R 665000 $ 665000
   END APPLY >>> ./ R 665000 $ 665000
Update Succeeded
Update Execution Time 16 milliseconds.

R15315DS

Date Monday Mar 15, 1982 08:45:00 AM
Loaded from MAINT(193)

       R15315DS: ./ R 683000 $ 683000 500
       R15315DS:          SR    R5,R5             CLEAR REG 5                   @VA15315
       R15315DS:          ICM   R5,B'0011',0(R4)  LOAD CC INTO REG 5            @VA15315
 BEGIN APPLY >>> ./ R 683000 $ 683000 500
   END APPLY >>> ./ R 683000 $ 683000 500
Update Succeeded
Update Execution Time 16 milliseconds.

Table of Contents

DMSXCP History

References

Update History

Update Order

R08678DS

R10745DS

R10244DS

R12729DS

R12870DS

R15315DS