//jobname JOB ....                                           <== VERIFY
//*
//*             Copyright (c) 1996, SAS Institute Inc.
//*               Unpublished - All Rights Reserved
//*
//*  NAME: TCPCLNT
//*
//*  PURPOSE: JCL to Compile, Link, and Execute TCPCLNT. This
//*           sample is used in conjunction with samples TCPLISTN
//*           and TCPTSERV. Ensure TCPLISTN and TCPTSERV have been
//*           compiled and linked, and TCPLISTN is running.
//*           Verify the statement indicated by the "<== VERIFY"
//*           have been customized for the local environment.
//*
//*****************************************************************
//*  COMPILE TCPCLNT                                            ***
//*****************************************************************
//COMPILE  EXEC LC370C,PARM.C='EXTNAME ENXREF RENT'
//C.SYSLIN DD DISP=SHR,DSN=your.object.library(TCPCLNT)      <== VERIFY
//C.SYSIN  DD DISP=SHR,DSN=prefix.SAMPLE.C(TCPCLNT)          <== VERIFY
//*
//*****************************************************************
//*  CLINK TCPCLNT                                              ***
//*****************************************************************
//LLISTEN  EXEC LC370LR
//LKED.SYSIN   DD DISP=SHR,DSN=your.object.library(TCPCLNT)  <== VERIFY
//LKED.SYSLMOD DD DISP=SHR,DSN=your.load.library(TCPCLNT)    <== VERIFY
//*
//*****************************************************************
//*  Execute TCPCLNT                                            ***
//*****************************************************************
//GO     EXEC  PGM=TCPCLNT
//STEPLIB      DD DISP=SHR,DSN=your.load.library             <== VERIFY
//             DD DISP=SHR,DSN=prefix.LINKLIB                <== VERIFY
//*   Where "prefix" is the installation prefix for the
//*   SAS/C Compiler
//SYSPRINT     DD SYSOUT=*
//SYSTERM      DD SYSOUT=*
//*
//