//**********************************************************************00010000
//*                                                                    *00020000
//*        A  S  S  E  M  B  L  E        M  A  P  S  E  T              *00030000
//*                                                                    *00040000
//*  SET THE SYMBOLIC VARIABLES BELOW TO THE FOLLOWING:                *00050000
//*                                                                    *00060000
//*  TEAMID  - YOUR TEAMID ASSIGNED BY YOUR INSTRUCTOR.                *00070000
//*  SRCLIB  - DATASET NAME OF THE PDS WHERE THE BMS MACROS RESIDE.    *00080000
//*  MEMBER  - MEMBER NAME OF THE BMS MACROS TO ASSEMBLE               *00090000
//*  LOADLIB - DATASET NAME OF THE PDS WHERE CICS LOADS PROGRAMS       *00100000
//*            AND MAPSETS FROM.                                       *00110000
//*  COPYLIB - DATASET NAME OF THE PDS WHERE SYMBOLIC MAPS RESIDE      *00120000
//*            FOR THE COMPILE JCL.                                    *00130000
//*  MACLIB  - DATASET NAME WHERE THE CICS SYTEM MACROS RESIDE.        *00140000
//*  WEBLIB  - DATASET NAME OF THE PDS WHERE HTML TEMPLATES RESIDE.    *00150000
//*                                                                    *00160000
//**********************************************************************00170000
//*                                                                     00180000
//MAPSPROC PROC                                                         00190000
//*                                                                     00200000
//MAP      EXEC PGM=ASMA90,                                             00210000
//         PARM='SYSPARM(MAP),DECK,NOOBJECT'                            00220000
//SYSLIB   DD DSN=&MACLIB,DISP=SHR                                      00230000
//         DD DSN=SYS1.MACLIB,DISP=SHR                                  00240000
//SYSUT1   DD UNIT=SYSDA,SPACE=(CYL,(1,1))                              00250000
//SYSUT2   DD UNIT=SYSDA,SPACE=(CYL,(1,1))                              00260000
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(1,1))                              00270000
//SYSPRINT DD SYSOUT=*                                                  00280000
//SYSIN    DD DSN=&SRCLIB(&MEMBER),DISP=SHR                             00290000
//SYSPUNCH DD UNIT=SYSDA,SPACE=(CYL,(1,1)),DISP=(,PASS)                 00300000
//*                                                                     00310000
//LINK     EXEC PGM=IEWL,                                               00320000
//         PARM='LIST,LET,XREF',                                        00330000
//         COND=(0,NE,MAP)                                              00340000
//SYSUT1   DD UNIT=SYSDA,SPACE=(CYL,(1,1))                              00350000
//SYSPRINT DD SYSOUT=*                                                  00360000
//SYSLMOD  DD DSN=&LOADLIB(TRMAP&TEAMID),DISP=SHR                       00370000
//SYSLIN   DD DSN=*.MAP.SYSPUNCH,DISP=(OLD,DELETE)                      00380000
//*                                                                     00390000
//DSECT    EXEC PGM=ASMA90,                                             00400000
//         PARM='SYSPARM(DSECT),DECK,NOOBJECT',                         00410000
//         COND=(0,NE,MAP)                                              00420000
//SYSLIB   DD DSN=&MACLIB,DISP=SHR                                      00430000
//         DD DSN=SYS1.MACLIB,DISP=SHR                                  00440000
//SYSUT1   DD UNIT=SYSDA,SPACE=(CYL,(1,1))                              00450000
//SYSUT2   DD UNIT=SYSDA,SPACE=(CYL,(1,1))                              00460000
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(1,1))                              00470000
//SYSPRINT DD SYSOUT=*                                                  00480000
//SYSIN    DD DSN=&SRCLIB(&MEMBER),DISP=SHR                             00490000
//SYSPUNCH DD DSN=&COPYLIB(TRMAP&TEAMID),DISP=SHR                       00500000
//*                                                                     00510000
//HTML     EXEC PGM=ASMA90,                                             00520000
//         PARM='SYSPARM(TEMPLATE),DECK,NOOBJECT',                      00530000
//         COND=(0,NE,MAP)                                              00540000
//SYSLIB   DD DSN=&MACLIB,DISP=SHR                                      00550000
//         DD DSN=SYS1.MACLIB,DISP=SHR                                  00560000
//SYSUT1   DD UNIT=SYSDA,SPACE=(CYL,(1,1))                              00570000
//SYSUT2   DD UNIT=SYSDA,SPACE=(CYL,(1,1))                              00580000
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(1,1))                              00590000
//SYSPRINT DD SYSOUT=*                                                  00600000
//SYSIN    DD DSN=&SRCLIB(&MEMBER),DISP=SHR                             00610000
//SYSPUNCH DD DSN=&WEBLIB(TRMAP&TEAMID.A),DISP=SHR                      00620000
//         PEND                                                         00630000