Test 3 - geostan_1 - 2024.01

The following is an example of the JCL:

//yourjobJOB 1,RUNIT,MSG,NOTIFY=&SYSUID
//*
//*********************************************************************
//*
//* SAMPLE COMPILE AND LINK FOR COBOL PROGRAMS
//*
//* NOTE: ALL ITEMS MARKED WITH <===ARE LOCATION DEPENDENT
//* AND MUST BE TAILORED TO YOUR INSTALLATION'S STANDARDS.
//*
//*********************************************************************
//COBJCL PROC MEMBER=*MEMBER*,<=== SOURCE CODE MEMBER NAME
// PRODPFX=YOURPREFIX<=== SPATIAL DATA SET PREFIX

Substitute the items in bold with the appropriate values, as follows:

When the job completes, you should receive a condition code of "0000". If any other code is returned, investigate the job's output listing and correct the error.

The following is an example of the JCL:

//yourjob JOB <===FILL IN THE JOB CARD
//*
//* CHANGE 'YOURPREFIX' TO YOUR SPATIAL HLQ
//* SET 'VS' TO '.VS' IF YOU WISH TO RUN THE IVP ON THE VSAM FILES
//*
//PIPSTUDY PROC PRODHLQ=YOURPREFIX,VS=
//PIPSTUDY EXEC PGM=PIPSTUDY,REGION=0M <=== POINT AT YOUR LOAD LIBRARY
//STEPLIB DD DSN=&PRODHLQ..LOAD,DISP=SHR
// DD DSN=CEE.SCEERUN,DISP=SHR <=== C RUNTIME LIBRARY
//INFILE DD DSN=&PRODHLQ..SPATIAL.TXT.COBOL,DISP=SHR
//OUTFILE DD SYSOUT=*,DCB=(RECFM=FBA,LRECL=133)
//COUNTGSB DD DSN=&PRODHLQ..COUNTIES.GSB&VS,DISP=SHR
//COUNTGSA DD DSN=&PRODHLQ..COUNTIES.GSA&VS,DISP=SHR
//USGSB DD DSN=&PRODHLQ..US.GSB&VS,DISP=SHR
//SYSOUT DD SYSOUT=*
//SYSABEND DD SYSOUT=*

Substitute the items in bold with the appropriate values, as follows:

When the job completes, you should see a condition code of "0000". If any other code is returned, investigate the job's output listing and correct the error.