zOs/JCL/ACIF
//A540769A JOB (CP00,KE50)
//*
//*-------------------------------------------------------------------*
//* SET INPUT=WGR.U0034.T0.AKT.DATAVBA(PVSDBOLD)
//* SET INPUT=WGR.U0034.T0.AKT.DATAVBA(DATAMATN)
//* SET INPUT=WGR.U0034.T0.AKT.DATAVBA(PVSNDBH2)
// SET INPUT=A540769.TEST.JESOUT.T6BEDO.NOCPYGRP
//*-------------------------------------------------------------------* 00030000
// SET COPIES=1 00040000
//* SET FORMS=WHC0T 00040000
// SET FORMS=W7817 00040000
// SET DEST=RZ2,CLASS=3 00040000
//* SET DEST=B643,CLASS=2 00040000
//*-------------------------------------------------------------------*
//*
//*-------------------------------------------------------------------*
//* BUILD INDEX-, RESOURCE- AND DATA-FILE FROM INPUT AND RESOURCES *
//*-------------------------------------------------------------------*
//*
//ACIF EXEC PGM=APKACIF,
// PARM=('',
// 'PARMDD=DDPARM,',
// 'MSGDD=DDMSG,'),
// COND=(0,NE)
//*TEPLIB DD DISP=SHR,DSN=APK.ACIF.SAPKMOD1
//DDINPUT DD DISP=SHR,DSN=&INPUT
//DDOUT DD DISP=(,PASS),MGMTCLAS=D001N000,
//* DSN=F712396.ACIF.OUT.#DT#,
// DCB=(LRECL=32756,BLKSIZE=32760,RECFM=VBA,DSORG=PS),
// SPACE=(32760,(15,15)),UNIT=SYSDA
//DDRES DD DISP=(,PASS),MGMTCLAS=D001N000,
//* DSN=F712396.ACIF.RES.#DT#,
// DCB=(LRECL=32756,BLKSIZE=32760,RECFM=VBA,DSORG=PS),
// SPACE=(32760,(15,15)),UNIT=SYSDA
//DDIDX DD DISP=(,PASS),MGMTCLAS=D001N000,
//* DSN=F712396.ACIF.IDX.#DT#,
// DCB=(LRECL=32756,BLKSIZE=32760,RECFM=VBA,DSORG=PS),
// SPACE=(32760,(15,15)),UNIT=SYSDA
//DDMSG DD SYSOUT=*
//DDPARM DD *
/* ---------------- */
/* FILE INFORMATION */
/* ---------------- */
INPUTDD = DDINPUT /* DDN INPUT-FILE (DATA) */
OUTPUTDD = DDOUT /* DDN OUTPUT-FILE (DATA) */
RESOBJDD = DDRES /* DDN RESOURCE-OUTPUT */
INDEXDD = DDIDX /* DDN INDEX-FILE */
/* -------------------- */
/* DATA CHARACTERISTICS */
/* -------------------- */
RESTYPE = ALL /* INCLUDE ALL RESOURCES */
RESFILE = SEQ /* RESOURCE FILE TYPE */
CC = YES /* CARRIAGE-CONTROL */
CCTYPE = A /* ASA-CHARACTERS */
TRC = NO /* NO TRC'S IN INPUT */
CPGID = 500 /* CODE PAGE ID FOR TLE'S */
/* -------------------- */
/* INDEXING INFORMATION */
/* -------------------- */
INDEXOBJ = ALL
/* ------------------- */
/* LIBRARY INFORMATION */
/* ------------------- */
FDEFLIB = WGR.U0034.T0.AKT.AFPLIB, /* FORMDEF-LIBRARIES */
PSF.DIV.P0.AKT.P3820.PRTFDEF
PDEFLIB = WGR.U0034.T0.AKT.AFPLIB, /* PAGEDEF-LIBRARIES */
WGR.U0034.P0.AKT.AFPLIB, /* PAGEDEF-LIBRARIES */
PSF.DIV.P0.AKT.P3820.PRTPDEF
OVLYLIB = WGR.U0034.T0.AKT.AFPLIB, /* OVERLAY-LIBRARIES */
WGR.U0034.T0.AKT.AFPLIB.PVS, /* OVERLAY-LIBRARIES */
PSF.DIV.P0.AKT.P3820.PRTOVLY,
PSF.DIV.P0.AKT.P38P1.PRTOVLY,
PSF.DIV.P0.AKT.P38PP.PRTOVLY
PSEGLIB = WGR.U0034.T0.AKT.AFPLIB, /* PAGESEGMENT-LIBRARIES */
PSF.DIV.P0.AKT.P3820.PRTPSEG,
PSF.DIV.P0.AKT.P38PP.PRTPSEG
FONTLIB = WGR.U0034.T0.AKT.AFPLIB, /*FONT-LIBRARIES */
PSF.DIV.P0.AKT.P300.PRTFONT,
PSF.DIV.P0.AKT.P240.PRTFONT
/* -------------------- */
/* RESOURCE INFORMATION */
/* -------------------- */
/* FORMDEF = F1PVTEST */ /* FORMDEF USED */
/* PAGEDEF = P1PV0500 */ /* PAGEDEF USED */
FORMDEF = F1C#CH1 /* FORMDEF USED */
PAGEDEF = P1PVWGR1 /* PAGEDEF USED */
/*
//*
//*-------------------------------------------------------------------*
//* MERGE RESOURCE- AND DATA-OUTPUT TO AFPDS *
//*-------------------------------------------------------------------*
//*
//*-------------------------------------------------------------------* 00050000
//IEBGENER EXEC PGM=ICEGENER,
// COND=(0,NE)
//*-------------------------------------------------------------------* 00050000
//OUT1 OUTPUT PRMODE=PAGE,DEST=&DEST,
// CLASS=&CLASS,FORMS=&FORMS,COPIES=&COPIES,
// USERLIB=WGR.U0034.T0.AKT.AFPLIB,
// OVERLAYF=O1PVTEST,OVERLAYB=O1PVTEST
//* OVERLAYF=O1CIT024,OVERLAYB=O1CIT024
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//SYSUT1 DD DISP=SHR,DSN=*.ACIF.DDRES
// DD DISP=SHR,DSN=*.ACIF.DDOUT
//SYSUT2 DD SYSOUT=(,),OUTPUT=*.OUT1
//*YSUT2 DD DISP=(,CATLG),MGMTCLAS=D001N000,
//* DSN=WGR.U0034.T0.AKT.TESTOUT.DB1.AFP,
//* DCB=(LRECL=32756,BLKSIZE=32760,RECFM=VBA,DSORG=PS),
//* SPACE=(32760,(15,15)),UNIT=SYSDA