//HWTRAINJ JOB (HW213AB99T,MHEW),'KEN CALDWELL',NOTIFY=HWTRAIN,         00010001
//    MSGCLASS=Y,TIME=1,MSGLEVEL=(1,1)                                  00020001
//*                                                                     00030001
//**********************************************************************00040001
//*                                                                    *00050001
//*       T R A I N - R I G H T   J C L   C L A S S   S E T U P        *00060001
//*                                                                    *00070001
//*  SET THE SYMBOLIC PARAMETERS BELOW TO THE FOLLOWING VALUES:        *00080001
//*                                                                    *00090001
//*  HLQ     - THE HIGH LEVEL QUALIFIER OF THE UPLOADED JCL DATASET.   *00100001
//*  COBCOMP - THE DATASET NAME WHERE THE COBOL COMPILER PROGRAM       *00110001
//*            RESIDES.                                                *00120001
//*  CEELIB  - THE DATASET NAME WHERE THE COBOL (LE) SYSTEM ROUTINES   *00130001
//*            RESIDE.                                                 *00140001
//*  SRCLIB  - THE DATASET NAME OF YOUR JCL CLASSROOM LIBRARY.         *00150001
//*  MEMBER  - THE MEMBER NAME OF THE PROGRAM TO COMPILE.              *00160001
//*  LOADLIB - THE DATASET NAME WHERE THE COMPILED AND LINKED          *00170001
//*            LOAD MODULE WILL RESIDE.                                *00180001
//*                                                                    *00190001
//**********************************************************************00200001
//SETVAR1  SET HLQ=HWINS01,                                             00210001
//             COBCOMP='SYS1.COB2COMP',                                 00220001
//             CEELIB='SYS1.COB2LIB'                                    00230001
//*                                                                     00240001
//SETVAR2  SET SRCLIB=&HLQ..JCL.LIB,                                    00250001
//             MEMBER=DOGPGM,                                           00260001
//             LOADLIB=&HLQ..JCL.LOAD                                   00270001
//PRIVPROC JCLLIB ORDER=(&SRCLIB)                                       00280001
//*                                                                     00290001
//STEP0    EXEC PGM=IEFBR14                                             00300001
//DD1      DD DSN=&HLQ..JCL.DATA,DISP=(MOD,DELETE),                     00310001
//            UNIT=SYSDA,SPACE=(TRK,0)                                  00320001
//DD2      DD DSN=&LOADLIB,DISP=(MOD,DELETE),                           00330001
//            UNIT=SYSDA,SPACE=(TRK,0)                                  00340001
//*                                                                     00350001
//STEP1    EXEC PGM=IEBGENER                                            00360001
//SYSPRINT DD SYSOUT=*                                                  00370001
//SYSIN    DD DUMMY                                                     00380001
//SYSUT2   DD DSN=&HLQ..JCL.DATA,DISP=(,CATLG),                         00390001
//            UNIT=SYSDA,SPACE=(TRK,(1,1))                              00400001
//SYSUT1   DD *                                                         00410001
THIS IS DATA FOR THE TRAIN-RIGHT JCL & UTILITIES COURSES.               00420001
IF YOU CAN SEE THIS DATA - SUCCESS!!                                    00430001
/*                                                                      00440001
//*                                                                     00450001
//STEP2    EXEC PGM=IEFBR14                                             00460001
//DD1      DD DSN=&LOADLIB,DISP=(,CATLG),                               00470001
//            UNIT=SYSDA,SPACE=(TRK,(1,1,1)),                           00480001
//            DSORG=PO,RECFM=U,LRECL=0,BLKSIZE=28332                    00490001
//*                                                                     00500001
//STEP3    EXEC COMPILE                                                 00510001
//                                                                      00520001