• Abstract / Synopsis of SYSLOCS
• Latest Source of SYSLOCS
• Fixes Applied : 3
• Latest Source Date : Friday, December 8, 1978
• Last Fix ID : [HRC108DK]

CMS File Input : SYSLOCS MACRO
Date : 12/8/1978 4:38:00 PM
VM Context : MAINT(394)
File Name : SYSLOCS.MACRO.Z1.txt
Modified : 1/16/2021 7:31:49 AM
Created : 1/16/2021 7:31:49 AM

1. HRC033DK V01 ADD LIST OF SYSTEM PACKS NOT CP OWNED
2. HRC036DK V01 ADD SYSIPL MACRO FOR DEFAULT START
3. HRC108DK H40 Implement SYSID (System identification)

Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)

       HRC033DK: ./ R 00010080          $ 10086 6                      02/20/06 13:34:32
       HRC033DK:          GBLC  &SY$USR                                         HRC033DK 00010080
       HRC033DK:          GBLC  &SY$OWN                                         HRC033DK 00010080
       HRC033DK: ./ R 00010240          $ 10250 10                     02/20/06 13:34:32
       HRC033DK:          AIF   ('&SY$USR' NE '').OK05                          HRC033DK 00010240
       HRC033DK: ./ R 00010280          $ 10290 10                     02/20/06 13:34:32
       HRC033DK:          MNOTE 16,'====> SEVERE ERROR. THE SYSUSR MACRO MUST BE SPECIFI+00010280
       HRC033DK: ./ I 00010300          $ 10303 3                      02/20/06 13:34:32
       HRC033DK: .OK05    ANOP  ,                                               HRC033DK
       HRC033DK:          AIF   ('&SY$OWN' NE '').OK10                          HRC033DK 00010240
       HRC033DK: &FAIL    SETB  1                                               HRC033DK 00010260
       HRC033DK:          MNOTE 16,'====> SEVERE ERROR. THE SYSOWN MACRO MUST BE SPECIFI+00010280
       HRC033DK:                ED IN THIS ASSEMBLY. <===='                     HRC033DK 00010300
 BEGIN APPLY >>> ./ R 00010080          $ 10086 6                      02/20/06 13:34:32
   END APPLY >>> ./ R 00010080          $ 10086 6                      02/20/06 13:34:32
 BEGIN APPLY >>> ./ R 00010240          $ 10250 10                     02/20/06 13:34:32
   END APPLY >>> ./ R 00010240          $ 10250 10                     02/20/06 13:34:32
 BEGIN APPLY >>> ./ R 00010280          $ 10290 10                     02/20/06 13:34:32
   END APPLY >>> ./ R 00010280          $ 10290 10                     02/20/06 13:34:32
 BEGIN APPLY >>> ./ I 00010300          $ 10303 3                      02/20/06 13:34:32
   END APPLY >>> ./ I 00010300          $ 10303 3                      02/20/06 13:34:32
Update Succeeded
Update Execution Time 16 milliseconds.

Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)

       HRC036DK: ./ R 00010092          $ 10094 2                      02/25/06 11:42:22
       HRC036DK:          GBLC  &SY$IPL                                         HRC036DK 00010094
       HRC036DK:          GBLC  &SY$OWN                                         HRC036DK 00010096
       HRC036DK: ./ R 00010800          $ 10801 1                      02/25/06 11:42:22
       HRC036DK: .OK70    ANOP                                                  HRC036DK 00010801
       HRC036DK:          AIF   ('&SY$IPL' NE '').OK80                          HRC036DK 00010802
       HRC036DK:          MNOTE 4,'SYSIPL MACRO NOT SPECFIED. DEFAULT VALUE OF NO AUTO I+00010803
       HRC036DK:                PL HAS BEEN SET'                                HRC036DK 00010804
       HRC036DK: .*                                                             HRC036DK 00010805
       HRC036DK:          ENTRY DMKSYSIP       AUTO IPL START TYPE              HRC036DK 00010806
       HRC036DK: .*                                                             HRC036DK 00010807
       HRC036DK: DMKSYSIP DC    X'00'          NO AUTO IPL (DEFAULT)            HRC036DK 00010808
       HRC036DK: .*                                                             HRC036DK 00010809
       HRC036DK: .OK80    ANOP                                                  HRC036DK 00010810
       HRC036DK:          AIF   (NOT &FAIL).OK99                                HRC036DK 00010811
       HRC036DK: ./ R 00010840          $ 10850 10                     02/25/06 11:42:22
       HRC036DK: .OK99    ANOP                 ALL PRESENT AND ACCOUNTED FOR    HRC036DK 00010850
       HRC036DK: ./ I 00055000          $ 55200 200                    02/25/06 11:42:22
       HRC036DK: CPCOLD   EQU   X'01'                                           HRC036DK
       HRC036DK: CPWARM   EQU   X'02'                                           HRC036DK
       HRC036DK: CPCKPT   EQU   X'20'                                           HRC036DK
       HRC036DK: CPFORCE  EQU   X'40'                                           HRC036DK
 BEGIN APPLY >>> ./ R 00010092          $ 10094 2                      02/25/06 11:42:22
   END APPLY >>> ./ R 00010092          $ 10094 2                      02/25/06 11:42:22
 BEGIN APPLY >>> ./ R 00010800          $ 10801 1                      02/25/06 11:42:22
   END APPLY >>> ./ R 00010800          $ 10801 1                      02/25/06 11:42:22
 BEGIN APPLY >>> ./ R 00010840          $ 10850 10                     02/25/06 11:42:22
   END APPLY >>> ./ R 00010840          $ 10850 10                     02/25/06 11:42:22
 BEGIN APPLY >>> ./ I 00055000          $ 55200 200                    02/25/06 11:42:22
   END APPLY >>> ./ I 00055000          $ 55200 200                    02/25/06 11:42:22
Update Succeeded
Update Execution Time 16 milliseconds.

Date Saturday Feb 25, 2017 09:27:00 AM
Loaded from MAINT(094)

       HRC108DK: ./ I 00010200          $ 0010210 10
       HRC108DK:          GBLC  &SY$ID                                          HRC108DK
       HRC108DK: ./ R 00010811 00010820 $ 0010811 1
       HRC108DK:          AIF   ('&SY$ID' NE '').OK90                           HRC108DK
       HRC108DK:          MNOTE 0,'SYSID macro not specified. Default value assumed.'
       HRC108DK: .*                                                             HRC108DK
       HRC108DK:          ENTRY DMKSYSIC,DMKSYSIL,DMKSYSID                      HRC108DK
       HRC108DK: .*                                                             HRC108DK
       HRC108DK: DMKSYSIC DC    F'0'           Count of entries in SYSID list   HRC108DK
       HRC108DK: DMKSYSIL DS    0XL14          No list entries                  HRC108DK
       HRC108DK: DMKSYSID DS    0D                                              HRC108DK
       HRC108DK:          DC    CL8' '         Default system id (blank)        HRC108DK
       HRC108DK: .*                                                             HRC108DK
       HRC108DK: .OK90    ANOP                                                  HRC108DK
       HRC108DK:          AIF   (NOT &FAIL).OK99                                HRC108DK
       HRC108DK:          MEXIT                                                 HRC108DK
 BEGIN APPLY >>> ./ I 00010200          $ 0010210 10
   END APPLY >>> ./ I 00010200          $ 0010210 10
 BEGIN APPLY >>> ./ R 00010811 00010820 $ 0010811 1
   END APPLY >>> ./ R 00010811 00010820 $ 0010811 1
Update Succeeded
Update Execution Time 16 milliseconds.