//STEP01 EXEC SAS
//INTRDR DD SYSOUT=3D(A,INTRDR)
//SYSIN DD *
…SAS code to create Tape DSN’s as macro variables, e.g. &TAPENAM1,
&TAPENAM2, etc.
=20
DATA _NULL_;
FILE INTRDR LRECL=3D80 BLKSIZE=3D80 RECFM=3DF NOPRINT NOTITLES;
=20
PUT “//JOB1 JOB (JAMES,123),DIMPLE PROD JOB01′,CLASS=3DA, “;
PUT ‘// MSGCLASS=3DQ, ’;
PUT “//STEP01 EXEC SAS,WORK=3D’750,100′ ”;
PUT “//TAPE1 DD DISP=3DSHR,DSN=3D&TAPNAM1,DISP=3DSHR “;
PUT ‘//SYSIN DD DSN=3DDIMPLES.SASPROG.PDS(TAPEPRGM),DISP=3DSHR’;
PUT ‘//*’;
PUT “//JOB2 JOB (JAMES,123),DIMPLE PROD JOB02′,CLASS=3DA, “;
PUT ‘// MSGCLASS=3DQ, ’;
PUT “//STEP01 EXEC SAS,WORK=3D’750,100′ ”;
PUT “//TAPE1 DD DISP=3DSHR,DSN=3D&TAPNAM2,DISP=3DSHR “;
PUT ‘//SYSIN DD DSN=3DDIMPLES.SASPROG.PDS(TAPEPRGM),DISP=3DSHR’;
PUT ‘//*’;
//*
