//XTICL JOB XTICLJOB
//*********************************************************************
//* *
//* Communications Server IP *
//* *
//* Licensed Materials - Program Property of IBM. *
//* This product contains "Restricted Materials of IBM" *
//* 5694-A01 (C) Copyright IBM Corp. 1989, 2002 *
//* US Government Users Restricted Rights - *
//* Use, duplication or disclosure restricted *
//* by GSA ADP Schedule Contract with IBM Corp. *
//* See IBM Copyright Instructions *
//* *
//* SMP/E Distribution Name: EZAEB02Z *
//* *
//*********************************************************************
//* SYMBOLIC DEFINITIONS *
//* *
//* INSTLIB - TCPIP SEZAINST LIBRARY *
//* SEZALOD - TCPIP SEZALOAD LIBRARY *
//* SEZAMAC - TCPIP MACLIB *
//* SEZAMTX - TCPIP SEZACMTX LIBRARY *
//* SCEERUN - C/C++ SCEERUN LIBRARY *
//* SCBCCMP - C/C++ SCBCCMP *
//* CHEADRS - C/C++ HEADER LIBRARY *
//* CMSGS - C/C++ MESSAGE LIBRARY *
//* SCEELKD - C/C++ SCEELKED LIBRARY *
//* INSTMEM - MEMBER TO COMPILE AND LINK *
//* OBJLIB - LIBRARY TO PUT INSTMEM OBJ DECK *
//* XTILOAD - LIBRARY FOR XTI LOAD MODULES *
//* SOUT - SYSOUT PARAMETER *
//* *
//*********************************************************************
//CCOMP PROC REG='3072K',
// CPARM='DEF(MVS),SOURCE,LIST,NOMARG,SEQ(73,80)',
// INSTLIB=,
// SEZALOD=,
// SEZAMAC=,
// SEZAMTX=,
// SCEERUN=,
// SCBCCMP=,
// CHEADRS=,
// CMSGS=,
// SCEELKD=,
// OBJLIB=,
// XTILOAD=,
// DCB80='(RECFM=FB,LRECL=80,BLKSIZE=3200)',
// DCB3200='(RECFM=FB,LRECL=3200,BLKSIZE=12800)',
// SOUT=*
//* *
//**********************************************************************
//* COMPILE STEP:
//**********************************************************************
//* *
//COMPILE EXEC PGM=CBCDRVR,
// PARM=('&CPARM'),
// REGION=®
//STEPLIB DD DSN=&SEZALOD,DISP=SHR
// DD DSN=&SCEERUN,DISP=SHR
// DD DSN=&SCBCCMP,DISP=SHR
//SYSLIB DD DSN=&SEZAMAC,DISP=SHR
// DD DSN=&CHEADRS,DISP=SHR
//SYSIN DD DSN=&INSTLIB(&INSTMEM),DISP=SHR
//SYSLIN DD DSN=&OBJLIB(&INSTMEM),DISP=SHR
//SYSMSGS DD DUMMY,DSN=&CMSGS,DISP=SHR
//SYSPRINT DD SYSOUT=&SOUT
//SYSCPRT DD SYSOUT=&SOUT
//SYSTERM DD DUMMY
//SYSUT1 DD UNIT=VIO,SPACE=(32000,(30,30)),DCB=&DCB80
//SYSUT5 DD UNIT=VIO,SPACE=(32000,(30,30)),DCB=&DCB3200
//SYSUT6 DD UNIT=VIO,SPACE=(32000,(30,30)),DCB=&DCB3200
//SYSUT7 DD UNIT=VIO,SPACE=(32000,(30,30)),DCB=&DCB3200
//SYSUT8 DD UNIT=VIO,SPACE=(32000,(30,30)),DCB=&DCB3200
//SYSUT9 DD UNIT=VIO,SPACE=(32000,(30,30)),
// DCB=(RECFM=VB,LRECL=137,BLKSIZE=882)
//SYSUT10 DD SYSOUT=*
//*
//**********************************************************************
//* LINKEDIT STEP:
//**********************************************************************
//*
//LKED EXEC PGM=IEWL,COND=(1,LT),
// REGION=®
//OBJLIB DD DSN=&OBJLIB,DISP=SHR
//SYSLIB DD DSN=&SEZAMTX,DISP=SHR
// DD DSN=&SCEELKD,DISP=SHR
//SYSLMOD DD DSN=&XTILOAD,DISP=SHR
//SYSPRINT DD SYSOUT=&SOUT
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
// PEND
//*
//XTIC EXEC CCOMP,INSTMEM=XTICC
//LKED.SYSLIN DD *
INCLUDE OBJLIB(XTICC)
INCLUDE SYSLIB(XTI)
MODE AMODE(31),RMODE(ANY)
ENTRY CEESTART
NAME XTIC(R)
//*
//XTIS EXEC CCOMP,INSTMEM=XTISC
//LKED.SYSLIN DD *
INCLUDE OBJLIB(XTISC)
INCLUDE SYSLIB(XTI)
MODE AMODE(31),RMODE(ANY)
ENTRY CEESTART
NAME XTIS(R)
//*
Figure 1. Sample compile and
link-edit job control procedure