Sample server procedure
The ADFzCC server is recommended to run as a started task, although it might be run as a job.
A sample procedure, IPVSRV1, is supplied in the hlq.IPVSAM1 data set. Copy the procedure to your procedure library.
//IPVSRV1 PROC PORT=2800,FAMILY='AF_INET',TRACE=N
//********************************************************************
//* Copyright = Licensed Materials - Property of IBM *
//* *
//* 5655-Q42 *
//* *
//* Copyright IBM Corp. 2006, 2017. *
//* All Rights Reserved. *
//* Copyright HCL Technologies Ltd. 2017, 2023. *
//* All Rights Reserved. *
//* *
//* US Government Users Restricted Rights - *
//* Use, duplication or disclosure restricted by *
//* GSA ADP Schedule Contract with IBM Corp. *
//* *
//* Status = IBM Application Delivery Foundation for *
//* z Systems Common Components, Version 14 Release 1. *
//* *
//********************************************************************
//* FAMILY=AF_INET|AF_INET6 for TCP/IP V4 or V6 socket and bind
//* TRACE=N|D|U No server trace, detailed trace or
//* user connection trace
//*
//* This is not a complete JCL procedure. It requires customisation
//* steps before running. To customise,
//* 1. Customise the IPVCONFG member
//* 2. Customise and run the IPVMKDIR sample job to match
//* 3. replace IPV with your high level qualifier for the ADFzCC product
//* 4. Uncomment and replace CEE for your hlq for the LE C runtime
//* if SCEERUN is not in the site linklist
//*
//RUN EXEC PGM=IPVSRV,REGION=40M,
// PARM=('&PORT &FAMILY &TRACE')
// SET IPV=IPV >== Update HLQ
//* Common component authorised library
//STEPLIB DD DISP=SHR,DSN=&IPV.SIPVMODA >== ADFzCC APF LIBRARY
//* DD DISP=SHR,DSN=CEE.SCEERUN >== LE C RUNTIME
//SYSPRINT DD SYSOUT=*
//IPVTRACE DD SYSOUT=* >== OUTPUT if Tracing
//STDOUT DD SYSOUT=*
//* Server wide, then participating product configurations
//CONFIG DD DISP=SHR,DSN=&IPV.SIPVSAM1(IPVCONFG)
**************************** Bottom of Data **************************