// JOB COPYREL,,,8000                                                   COP00010
// GBL S                                                                COP00015
// GBL E
//STOP   JSET  NEXT
// DVC 20  // LFD PRNTR                                                 COP00020
// CR                                                                   COP00030
// GO &INTYPE                                                           COP00040
//8411 EQU 50,20800000                                                  COP00050
// GO OUT                                                               COP00060
//8414 EQU 50,20400000                                                  COP00070
// GO OUT                                                               COP00080
//8416 EQU 50,20100000                                                  COP00090
// GO OUT                                                               COP00100
//8418 EQU 50,20020000                                                  COP00105
// GO OUT
//8430 EQU 50,20200000                                                  COP00110
//OUT NOP                                                               COP00120
// GO &OUTTYPE                                                          COP00130
//8411 EQU 51,20800000                                                  COP00140
// GO NEXT                                                              COP00150
//8414 EQU 51,20400000                                                  COP00160
// GO NEXT                                                              COP00170
//8416 EQU 51,20100000                                                  COP00180
// GO NEXT                                                              COP00190
//8418 EQU 51,20020000                                                  COP00195
// GO NEXT
//8430 EQU 51,20200000                                                  COP00200
//NEXT NOP                                                              COP00210
// IF ('&S' NE '')&S                                                    COP00215
//SRC    NOP
//OBJ    NOP
//LOD    NOP
// DVC 50  // VOL &INVOL  // LBL $Y$SRC  // LFD IN1                     COP00220
// DVC 51  // VOL &OUTVOL  // LBL $Y$SRC,,99999  // LFD OUT1,,INIT      COP00230
// DVC 50  // VOL &INVOL  // LBL $Y$OBJ  // LFD IN2                     COP00240
// DVC 51  // VOL &OUTVOL  // LBL $Y$OBJ,,99999  // LFD OUT2,,INIT      COP00250
// DVC 50  // VOL &INVOL  // LBL $Y$LOD  // LFD IN3                     COP00260
// DVC 51  // VOL &OUTVOL  // LBL $Y$LOD,,99999  // LFD OUT3,,INIT      COP00270
// OPTION JOBDUMP                                                       COP00280
// OPTION SCAN,SUB                                                      COP00285
// EXEC LIBS                                                            COP00290
/$                                                                      COP00300
         FIL   D1=IN1,D2=OUT1,D3=IN2,D4=OUT2,D5=IN3,D6=OUT3             COP00310
// IF ('&S' EQ 'OBJ')OBJ                                                COP00311
// IF ('&S' EQ 'LOD')LOD
         COP   D1,,,D2                  $Y$SRC                          COP00320
// IF ('&E' EQ 'SRC')STOP                                               COP00323
//OBJ    NOP                                                            COP00325
         COP   D3,,,D4                  $Y$OBJ                          COP00330
// IF ('&E' EQ 'OBJ')STOP                                               COP00333
//LOD    NOP                                                            COP00335
         COP   D5,,,D6                  $Y$LOD                          COP00340
// IF ('&E' EQ 'LOD')STOP                                               COP00345
// GO STOP1                                                             COP00346
//STOP   JSET  FINISH                                                   COP00347
//STOP1  NOP                                                            COP00348
/*                                                                      COP00350
// GO &STOP                                                             COP00355
//NEXT   NOP
//MAC    NOP                                                            COP00356
//JCS    NOP
//GEN    NOP
// DVC 50  // VOL &INVOL  // LBL $Y$MAC  // LFD IN1                     COP00360
// DVC 51  // VOL &OUTVOL  // LBL $Y$MAC,,99999  // LFD OUT1,,INIT      COP00370
// DVC 50  // VOL &INVOL  // LBL $Y$JCS  // LFD IN2                     COP00380
// DVC 51  // VOL &OUTVOL  // LBL $Y$JCS,,99999  // LFD OUT2,,INIT      COP00390
// DVC 50  // VOL &INVOL  // LBL $Y$GEN  // LFD IN3                     COP00400
// DVC 51  // VOL &OUTVOL  // LBL $Y$GEN,,99999  // LFD OUT3,,INIT      COP00410
// OPTION JOBDUMP                                                       COP00420
// OPTION SCAN,SUB                                                      COP00421
// EXEC LIBS                                                            COP00430
/$                                                                      COP00440
         FIL   D1=IN1,D2=OUT1,D3=IN2,D4=OUT2,D5=IN3,D6=OUT3             COP00450
// IF ('&S' EQ 'JCS')JCS                                                COP00451
// IF ('&S' EQ 'GEN')GEN
         COP   D1,,,D2                  $Y$MAC                          COP00460
// IF ('&E' EQ 'MAC')STOP                                               COP00463
//JCS    NOP                                                            COP00465
         COP   D3,,,D4                  $Y$JCS                          COP00470
// IF ('&E' EQ 'JCS')STOP                                               COP00473
//GEN    NOP                                                            COP00475
         COP   D5,,,D6                  $Y$GEN                          COP00480
// IF ('&E' EQ 'GEN')STOP                                               COP00485
// GO STOP1
//STOP   JSET  FINISH
//STOP1  NOP
/*                                                                      COP00490
// GO &STOP                                                             COP00495
//NEXT   NOP
//TRAN   NOP                                                            COP00497
// DVC 50  // VOL &INVOL  // LBL $Y$TRAN  // LFD IN1                    COP00500
// DVC 51  // VOL &OUTVOL  // LBL $Y$TRAN,,99999 // LFD OUT,,INIT       COP00510
// DVC 51  // VOL &OUTVOL  // LBL $Y$TRAN,,99999  // LFD IN2            COP00515
// OPTION JOBDUMP                                                       COP00520
// EXEC SGTRAN                                                          COP00530
// IF ('&E' EQ 'TRAN')FINISH                                            COP00533
//TRANA  NOP                                                            COP00535
// DVC 51  // VOL &OUTVOL  // LBL $Y$TRANA,,99999 // LFD OUT,,INIT      COP00550
// DVC 51  // VOL &OUTVOL  // LBL $Y$TRANA,,99999 // LFD IN2            COP00555
// OPTION JOBDUMP                                                       COP00560
// EXEC SGTRAN                                                          COP00570
//FINISH NOP                                                            COP00575
/&                                                                      COP00580
