====================================================================== Step 3: JCL to Initialize the CXX File z/OS: job card goes here //your // EXEC PGM=DBUTLTY,REGION=2M datacom.CUSLIB //STEPLIB DD DISP=SHR,DSN=your // DD DISP=SHR,DSN=your datacom.CAILIB //* cxx.data.set //CXX DD DISP=SHR,DSN=your Directory data set //SYSPRINT DD SYSOUT=* //SYSOUT DD SYSOUT=* //SYSPUNCH DD DUMMY //SYSIN DD * Command Input ad INIT AREA=CXX,CXXNAME=cxxname,DATACOM=db or /* // VSE: * $$ JOB ... * $$ LST ... name // JOB // EXEC PROC=procname PROC or LIBDEFs // ASSGN SYSnnn,devicetype,VOL=volser,SHR // DLBL CXX,'your cxx.data.set',,DA Directory data set // EXTENT SYSnnn,volser // EXEC DBUTLTY,SIZE=750K ad INIT AREA=CXX,CXXNAME=cxxname,DATACOM=db or /* /& * $$ EOJ
====================================================================== Step 3: JCL to Initialize the CXX File z/OS: //your job card goes here // EXEC PGM=DBUTLTY,REGION=2M //STEPLIB DD DISP=SHR,DSN=your datacom.CUSLIB // DD DISP=SHR,DSN=your datacom.CAILIB //* //CXX DD DISP=SHR,DSN=your cxx.data.set Directory data set //SYSPRINT DD SYSOUT=* //SYSOUT DD SYSOUT=* //SYSPUNCH DD DUMMY //SYSIN DD * Command Input INIT AREA=CXX,CXXNAME=cxxname,DATACOM=db or ad /* // VSE: * $$ JOB ... * $$ LST ... // JOB name // EXEC PROC=procname PROC or LIBDEFs // ASSGN SYSnnn,devicetype,VOL=volser,SHR // DLBL CXX,'your cxx.data.set',,DA Directory data set // EXTENT SYSnnn,volser // EXEC DBUTLTY,SIZE=750K INIT AREA=CXX,CXXNAME=cxxname,DATACOM=db or ad /* /& * $$ EOJ