Table of Contents

DMSNCP History

References

Update History

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

Update Order

  1. R08846DS 601 MSDMSNCP045E, UNSUPPORTED DEVICE, IF SAVENCP WITH NCP5 MACROS

R08846DS

Date Friday Feb 16, 1979 11:16:00 AM
Loaded from MAINT(193)
       R08846DS: ./ I 202000 $ 202100 100
       R08846DS: NOT      EQU   X'FF'               FOR NI INSTRUCTION          @VA08846
       R08846DS: NCPLEVEL EQU   X'F0'               NCP LEVEL OF MODULE         @VA08846
       R08846DS: CCPPEPB  EQU   X'0B'               PEP(NEW BASE) MODULE TYPE   @VA08846
       R08846DS: ./ I 396000 $ 396500 500
       R08846DS:          NI    CCPTYPE,NOT-NCPLEVEL  MASK OUT NCP LEVEL        @VA08846
       R08846DS: ./ R 403000 405000 $ 403200 200
       R08846DS:          LA    R1,CCPTEP           EP TYPE                     @VA08846
       R08846DS:          CLI   CCPTYPE,CCPTEP4     EP NEW BASE                 @VA08846
       R08846DS:          BE    GOODTYPE            YES , OK                    @VA08846
       R08846DS:          LA    R1,CCPTPEP          PEP TYPE                    @VA08846
       R08846DS:          CLI   CCPTYPE,CCPPEPB     PEP NEW BASE                @VA08846
       R08846DS:          BNE   ERR45               NO, UNSUPPORTED             @VA08846
       R08846DS: GOODTYPE EQU   *                   SET TYPE FOR DIAGNOSE       @VA08846
       R08846DS:          STC   R1,CCPTYPE          SAVE MODULE TYPE            @VA08846
 BEGIN APPLY >>> ./ I 202000 $ 202100 100
   END APPLY >>> ./ I 202000 $ 202100 100
 BEGIN APPLY >>> ./ I 396000 $ 396500 500
   END APPLY >>> ./ I 396000 $ 396500 500
 BEGIN APPLY >>> ./ R 403000 405000 $ 403200 200
   END APPLY >>> ./ R 403000 405000 $ 403200 200
Update Succeeded
Update Execution Time 23 milliseconds.