// JOB   SG$SUPMK,,5C00,8000                                            SG$00010
//       NOP                                                            SG$00020
//       GBL   VSWT,VSVC,VERR,VTMM                                      SG$00030
//       GBL   OUTLOD                                                   SG$00040
//       NOP                                                            SG$00050
// USESYS                                                               SG$00060
// DVC  20    // LFD PRNTR                                              SG$00070
// DVC   50    // VOL &OS3REL  // LBL $Y$MAC  // LFD NEWMAC,0           SG$00080
// DVC   50    // VOL &OS3REL  // LBL $Y$LOD  // LFD NEWLOD,0           SG$00090
// DVC   50    // VOL &OS3REL  // LBL $Y$OBJ  // LFD NEWOBJ,0           SG$00100
// DVC   50    // VOL &OS3REL  // LBL $Y$SRC  // LFD NEWSRC,0           SG$00110
//OUTLOD JSET  NEWLOD                                                   SG$00120
//       IF ('&VSNO' EQ '')LAB1                                         SG$00130
// DVC   51    // VOL &VSNO    // LBL $Y$LOD  // LFD SYSLOD,0           SG$00140
//OUTLOD JSET  SYSLOD                                                   SG$00150
//LAB1 NOP                                                              SG$00160
//DOICOPY JSET +&SCP1&ICP1&SCP2&ICP2&SCP3&ICP3&SCP4&ICP4.0              SG$00170
// IF    ('&DOICOPY' EQ '0')LAB10                                       SG$00180
// OPTION      SCAN,SUB                                                 SG$00190
// OPTION      JOBDUMP                                                  SG$00200
//       EXEC  LIBS,NEWLOD                                              SG$00210
/$                                                                      SG$00220
         FIL   D1=$Y$SRC,D2=NEWSRC                                      SG$00230
// IF ('&SCP1' NE '1')LAB2                                              SG$00240
         ADD.Q D1,S,S$&SPM1,D2                                          SG$00250
//LAB2 IF ('&ICP1' NE '1')LAB3                                          SG$00260
         ADD.Q D1,S,I$&IMD1,D2                                          SG$00270
//LAB3 IF ('&SCP2' NE '1')LAB4                                          SG$00280
         ADD.Q D1,S,S$&SPM2,D2                                          SG$00290
//LAB4 IF ('&ICP2' NE '1')LAB5                                          SG$00300
         ADD.Q D1,S,I$&IMD2,D2                                          SG$00310
//LAB5 IF ('&SCP3' NE '1')LAB6                                          SG$00320
         ADD.Q D1,S,S$&SPM3,D2                                          SG$00330
//LAB6 IF ('&ICP3' NE '1')LAB7                                          SG$00340
         ADD.Q D1,S,I$&IMD3,D2                                          SG$00350
//LAB7 IF ('&SCP4' NE '1')LAB8                                          SG$00360
         ADD.Q D1,S,S$&SPM4,D2                                          SG$00370
//LAB8 IF ('&ICP4' NE '1')LAB9                                          SG$00380
         ADD.Q D1,S,I$&IMD4,D2                                          SG$00390
//LAB9 NOP                                                              SG$00400
/*                                                                      SG$00410
//LAB10  IF    ('&SPR1' EQ '')LAB20                                     SG$00420
//&SPR1   SG$SPMAK  SUP=(&SPM1,&TMR1,&SYD1,&TRN1,&PMN1,&DMP1,&RES1),   XSG$00430
//1      SUP1=(&OLD1,&ERL1,&SCP1,&SLT1,&PRI1,&TLK1,&SPL1,&JAC1,&SIC1), XSG$00440
//1      SUP2=(&BLN1,&SHR1,&COM1,&MID1),                               XSG$00450
//2      IOG=(&IMD1,&COP1,&ISC1,&ISD1,&IDA1,&PBN1,&IST1,&IMX1),        XSG$00460
//3      IOG1=(&IS21,&IPC1,&IT61)                                       SG$00470
//LAB20  IF    ('&SPR2' EQ '')LAB30                                     SG$00480
//&SPR2   SG$SPMAK  SUP=(&SPM2,&TMR2,&SYD2,&TRN2,&PMN2,&DMP2,&RES2),   XSG$00490
//1      SUP1=(&OLD2,&ERL2,&SCP2,&SLT2,&PRI2,&TLK2,&SPL2,&JAC2,&SIC2), XSG$00500
//1      SUP2=(&BLN2,&SHR2,&COM2,&MID2),                               XSG$00510
//2      IOG=(&IMD2,&COP2,&ISC2,&ISD2,&IDA2,&PBN2,&IST2,&IMX2),        XSG$00520
//3      IOG1=(&IS22,&IPC2,&IT62)                                       SG$00530
//LAB30  IF    ('&SPR3' EQ '')LAB40                                     SG$00540
//&SPR3   SG$SPMAK  SUP=(&SPM3,&TMR3,&SYD3,&TRN3,&PMN3,&DMP3,&RES3),   XSG$00550
//1      SUP1=(&OLD3,&ERL3,&SCP3,&SLT3,&PRI3,&TLK3,&SPL3,&JAC3,&SIC3), XSG$00560
//1      SUP2=(&BLN3,&SHR3,&COM3,&MID3),                               XSG$00570
//2      IOG=(&IMD3,&COP3,&ISC3,&ISD3,&IDA3,&PBN3,&IST3,&IMX3),        XSG$00580
//3      IOG1=(&IS23,&IPC3,&IT63)                                       SG$00590
//LAB40  IF    ('&SPR4' EQ '')LAB50                                     SG$00600
//&SPR4   SG$SPMAK  SUP=(&SPM4,&TMR4,&SYD4,&TRN4,&PMN4,&DMP4,&RES4),   XSG$00610
//1      SUP1=(&OLD4,&ERL4,&SCP4,&SLT4,&PRI4,&TLK4,&SPL4,&JAC4,&SIC4), XSG$00620
//1      SUP2=(&BLN4,&SHR4,&COM4,&MID4),                               XSG$00630
//2      IOG=(&IMD4,&COP4,&ISC4,&ISD4,&IDA4,&PBN4,&IST4,&IMX4),        XSG$00640
//3      IOG1=(&IS24,&IPC4,&IT64)                                       SG$00650
//LAB50  NOP                                                            SG$00660
/&                                                                      SG$00670
