//IBMUSERA JOB 'TRAIN-RIGHT',CLASS=S,MSGCLASS=H,NOTIFY=&SYSUID 00001001 //* 00002001 //******************************************************************* 00020000 //* * 00030000 //* A S S E M B L E & E X E C U T E Y O U R P R O G RA M * 00040000 //* * 00050000 //* SET THE SYMBOLIC PARAMETERS BELOW TO THE FOLLOWING VALUES: * 00060000 //* * 00070000 //* SRCLIB - DATASET NAME OF THE PDS WHERE YOUR ASSEMBLER * 00080000 //* PROGRAM RESIDES. * 00090000 //* MEMBER - MEMBER NAME OF YOUR ASSEMBLER PROGRAM * 00100000 //* (THIS MAY BE DIFFERENT THAN THE CSECT NAME). * 00110000 //* LOADLIB - DATASET NAME OF THE LOAD MODULE LIBRARY THAT * 00120000 //* YOUR PROGRAM IS ASSEMBLED AND LINKED INTO. * 00130000 //* MACLIB - DATASET NAME OF YOUR ASSEMBLER COPYBOOKS AND * 00140000 //* MACROS. * 00150000 //* * 00160000 //* BE SURE THE EXTERNAL NAMES (DDNAMES) AND THE DATASETS THEY USE * 00170000 //* ARE AT THE BOTTOM OF THIS JCL FOR YOUR PROGRAM. * 00180000 //* * 00190000 //******************************************************************* 00200000 //* 00210000 //SETVARS SET SRCLIB=&SYSUID..RXVSAM.LIB, 00220002 // MEMBER=, 00230002 // LOADLIB=&SYSUID..RXVSAM.LOAD, 00240001 // MACLIB=&SYSUID..RXVSAM.LIB 00250002 //* 00260000 //PRIVPROC JCLLIB ORDER=(&SRCLIB) 00270000 //* 00280000 //SETVARS SET MEMBER=VSIOMOD 00281002 //ASSEMBLE EXEC ASSEMBLE,COND.LINK=(4,LT) 00290003 //SETVARS SET MEMBER=RXVSAM 00291002 //ASSEMBLE EXEC ASSEMBLE,COND.LINK=(4,LT) 00292003 // 00300001