//C2PLI JOBCARD INFORMATION
//*------------------------------------------------------------------
//*                COPYRIGHT (C) 1995, SAS INSTITUTE INC.
//*                  UNPUBLISHED - ALL RIGHTS RESERVED
//*                    S A S / C   S A M P L E
//*
//*       NAME: C2PLI
//*   LANGUAGE: JCL
//*    PURPOSE: THIS EXAMPLE DEMONSTRATES A C MAIN CALLING A
//*             PLI ROUTINE.
//*             IT CONSISTS OF SAMPLE LIBRARY MEMBERS
//*             C2PLIC, C2PLIP, AND C2PLI.
//*             THIS JCL COMPILES, LINKS, AND EXECUTES THESE MODULES.
//*-----------------------------------------------------------------
//*****************************************************************
//*  NOTE: Verify the statements indicated by the "<== CHECK"
//*   have been customized for the local environment.
//*****************************************************************
//*
//* PL/I COMPILE
//*
//PLICOMP EXEC PLI5C                 <===  CHECK: PROC
//SYSLIN DD DSN=your.object.library(C2PLIP),DISP=OLD   <== CHECK
//SYSIN  DD DSN=prefix.SAMPLE.ILC(C2PLIP),DISP=SHR     <== CHECK
//*
//**********************************************
//*
//* C COMPILE
//*
//CCOMP EXEC LC370C                  <===  CHECK: PROC
//C.SYSLIN DD DSN=your.object.library(C2PLIC),DISP=OLD <== CHECK
//C.SYSIN  DD DSN=prefix.SAMPLE.ILC(C2PLIC),DISP=SHR   <== CHECK
//*
//**********************************************
//*
//* ILC LINKSTEPS
//*
//ILCLINK EXEC ILCLINK,PARM.LKED='NOTERM'            <===  CHECK: PROC
//LKED.SYSLMOD DD DSN=your.load.library,DISP=OLD             <== CHECK
//LKED.LC370   DD DSN=prefix.BASELIB,DISP=SHR                <== CHECK
//             DD DSN=prefix.STDLIB,DISP=SHR                 <== CHECK
//LKED.PLILIB DD DSN=local.pli.PLIBASE,DISP=SHR              <== CHECK
//LKED.MYLIBC DD DSN=your.object.library,DISP=SHR            <== CHECK
//LKED.MYLIBP DD DSN=your.object.library,DISP=SHR            <== CHECK
//LKED.ILCIN DD *
 FIRST MAIN(C)
 LANGUAGE C,PLI
 PROCESS LKED (XREF LIST
    AUTOCALL LC370,PLILIB
    INCLUDE MYLIBC(C2PLIC)
    INCLUDE MYLIBP(C2PLIP)
 NAME C2PLI(R)
//*
//**********************************************
//*
//* RUN THE PROGRAM
//*
//GO EXEC PGM=C2PLI
//STEPLIB      DD DSN=your.load.library,DISP=SHR             <== CHECK
//             DD DSN=prefix.LINKLIB,DISP=SHR                <== CHECK
//             DD DSN=local.pli.PLILINK,DISP=SHR             <== CHECK
//SYSPRINT DD SYSOUT=*
//SYSTERM DD SYSOUT=*
//*
//