//HWINS01A JOB (HW213AB99T,C213,1,1,0),'KEN CALDWELL',NOTIFY=HWINS01,   00010000
//    MSGCLASS=Y,TIME=1,MSGLEVEL=(1,1)                                  00020000
/*ROUTE PRINT RMT237                                                    00030000
//*                                                                     00040000
//**********************************************************************00050000
//*                                                                    *00060000
//*        A  S  S  E  M  B  L  E        M  A  P  S  E  T              *00070000
//*                                                                    *00080000
//*  SET THE SYMBOLIC VARIABLES BELOW TO THE FOLLOWING:                *00090000
//*                                                                    *00100000
//*  TEAMID  - YOUR TEAMID ASSIGNED BY YOUR INSTRUCTOR.                *00110000
//*  SRCLIB  - DATASET NAME OF THE PDS WHERE THE BMS MACROS RESIDE.    *00120000
//*  MEMBER  - MEMBER NAME OF THE BMS MACROS TO ASSEMBLE               *00130000
//*  WEBLIB  - DATASET NAME OF THE PDS WHERE HTML TEMPLATES RESIDE.    *00140000
//*  LOADLIB - DATASET NAME OF THE PDS WHERE CICS LOADS PROGRAMS       *00150000
//*            AND MAPSETS FROM.                                       *00160000
//*  COPYLIB - DATASET NAME OF THE PDS WHERE SYMBOLIC MAPS RESIDE      *00170000
//*            FOR THE COMPILE JCL.                                    *00180000
//*  MACLIB  - DATASET NAME WHERE THE CICS SYTEM MACROS RESIDE.        *00190000
//*  COBRJOB - MEMBER NAME FOR THE COBOL COMPILE USING THESE MAPS.     *00200000
//*                                                                    *00210000
//**********************************************************************00220000
//*                                                                     00230000
//SETVARS  SET TEAMID=,                                                 00240000
//             SRCLIB=HWINS01.CICSA.LIB,                                00250000
//             MEMBER=,                                                 00260000
//             WEBLIB=HWINS01.CICSA.WEBLIB,                             00270000
//             LOADLIB=CICS.CLASS.LOADLIB,                              00280000
//             COPYLIB=CICS.CLASS.MAPDSECT,                             00290000
//             MACLIB=CICS.A640.SDFHMAC,                                00300000
//             COBRJOB=COBRHWDC                                         00310000
//*                                                                     00320000
//PRIVPROC JCLLIB ORDER=(&SRCLIB)                                       00330000
//*                                                                     00340000
//TRMAP00X EXEC MAPSPROC,TEAMID=00,MEMBER=TRMAP00X                      00350000
//TRMAP74  EXEC MAPSPROC,TEAMID=74,MEMBER=TRMAP74                       00360000
//*                                                                     00370000
//COB3     EXEC PGM=IEBGENER                                            00380000
//SYSIN    DD DUMMY                                                     00390000
//SYSPRINT DD SYSOUT=*                                                  00400000
//SYSUT1   DD DSN=&SRCLIB(&COBRJOB),DISP=SHR                            00410000
//SYSUT2   DD SYSOUT=(*,INTRDR)                                         00420000
//                                                                      00430000