//SPFLOAD JOB ................
//*********************************************************************
//**                                                                  *
//**           Copyright (c) 1996 - SAS Institute, Inc.               *
//**             Unpublished - All Rights Reserved                    *
//**                                                                  *
//**  Name   : SPFLOADJ                                               *
//**                                                                  *
//**  Purpose: Demonstrate how to call ISPLINK using MVS macro LOAD   *
//**           and calling ISPLINK using SAS/C function LOADM().      *
//**                                                                  *
//**  Function: Compile, assemble, and lked'it source files listed    *
//**            below.                                                *
//**                                                                  *
//**  Source  : See prefix.SAMPLE.C(SPFLOAD)                          *
//**                                                                  *
//**  Details: See prefix.SAMPLE.C(SPFLOAD)                           *
//**                                                                  *
//**  NOTE: Ensure the statments indicated by '<==Verify' have been   *
//**        customized for your local environment.  'prefix' is the   *
//**        installation defined high level qualifier for the SAS/C   *
//**        product.                                                  *
//**                                                                  *
//*********************************************************************
//*
//*********************************************************************
//*                                                                   *
//* PART 1: Compile SPFLOAD, this function uses the MVS LOAD macro    *
//*         to load ISPLINK                                           *
//*                                                                   *
//*********************************************************************
//*
//SPFLOAD1     EXEC LC370CL,PARM.C='MLIST BIT(1) OMD'
//C.SYSIN      DD DSN=prefix.SAMPLE.C(SPFLOAD),             <== Verify
//             DISP=SHR
//C.H          DD DSN=prefix.SAMPLE.H,                       <== Verify
//             DISP=SHR
//LKED.SYSLMOD DD DSN=your.load.library(SPFLOAD),            <== Verify
//             DISP=SHR
//*
//*********************************************************************
//*                                                                   *
//* PART 2: Compile SPFLOADM, this function uses the SAS/C function   *
//*         LOADM() to load ISPLINK                                   *
//*                                                                   *
//*********************************************************************
//*
//SPFLOAD2     EXEC LC370CL,PARM.C='MLIST BIT(1) OMD',COND=(0,NE)
//C.SYSIN      DD DSN=prefix.SAMPLE(SPFLOADM),               <== Verify
//             DISP=SHR
//C.H          DD DSN=prefix.SAMPLE.H,                       <== Verify
//             DISP=SHR
//LKED.SYSLMOD DD DSN=your.load.library(SPFLOADM),           <== Verify
//             DISP=SHR
//*
//