Two-stage generation

In two-stage generation of the stand-alone dump program, you must perform two tasks:

Assemble the AMDSADMP macro
Initialize the residence volume

After you code the AMDSADMP macro, you can assemble the macro. Use the JCL shown in Figure 1 to assemble the AMDSADMP macro. The SYSLIB data set must contain the AMDSADMP macro.

Figure 1. Example: Stage-two JCL to assemble the AMDSADMP macro

//ASSEMSAD     JOB        MSGLEVEL=(1,1)
//ASM          EXEC       PGM=ASMA90,REGION=4096K,PARM='DECK'
//SYSLIB       DD         DSN=SYS1.MACLIB,DISP=SHR
//             DD         DSN=SYS1.MODGEN,DISP=SHR
//SYSUT1       DD         UNIT=SYSDA,SPACE=(1700,(400,50))
//SYSPRINT     DD         SYSOUT=(*,,STD),HOLD=YES
//SYSPUNCH     DD         DSN=D10.SYS420.STAGE3.JCL(SADMPST2),DISP=SHR
//SYSLIN       DD         SYSOUT=H
//SYSIN        DD         *
               AMDSADMP   MINASID=ALL,IPL=DSYSDA,                        X
                 DUMP=('DATASPACES OF ASID('XCFAS','CTTX','APPC')'),     X
                 VOLSER=XXXXXX,                                          X
                 CONSOLE=((020,3277),(030,3277),(040,3277),(050,3277)),  X
                 PROMPT,MSG=ALL,                                         X
                 OUTPUT=T560
               END
/*

The output of the assembly is a job stream that can be used to initialize the residence volume. The output of the assembly can be directed to a DASD or tape device by coding the SYSPUNCH DD card, as shown in Table 1.

Table 1. Directing the output of assembly
Direct assembly output	SYSPUNCH DD statement
Tape	`//SYSPUNCH DD UNIT=tape,LABEL=(,NL),DISP=(NEW,KEEP), // VOL=SER=volser`
New direct access data set	`//SYSPUNCH DD UNIT=dasd,SPACE=(80,(30,10)),DSN=dsname, // DISP=(NEW,KEEP),VOL=SER=volser`