//JOB CARD FOR YOUR INSTALLATION                                        00002800
//         NOTIFY=&SYSUID                                               00011000
/*JOBPARM LINES=250                                                     00012000
//* *********************************************************           00020000
//* THIS JOB IS USED TO COMPILE, LINK AND EXECUTE THE                   00030000
//* MSDRG V38.1 Java COBTEST COBOL PGM.  A LOAD MODULE IS CREATED       00040000
//* AS A TEMPORARY DATA SET.                                            00050000
//*                                                                     00051000
//* IBM ENTERPRISE COBOL FOR Z/OS  4.2.0                                00052000
//*                                                                     00053000
//* *********************************************************           00060000
//COBUCLG PROC                                                          00070000
//*   IBM ENTERPRISE COBOL FOR Z/OS  4.2.0 COMPILE AND LINK             00080000
//COB    EXEC  PGM=IGYCRCTL,                                            00090000
//             PARM='APOST,OBJECT,MAP,LIB,NODYNAM,DATA(24)'             00091000
//STEPLIB  DD   DISP=SHR,DSN=IGY.SIGYCOMP                               00102100
//SYSLIB   DD  DSN=YOURID.CMSDRG.V381.JAVA.SRCLIB,DISP=SHR              00103000
//SYSPRINT DD  SYSOUT=*                                                 00120000
//SYSIN    DD  DSN=YOURID.CMSDRG.V381.JAVA.SRCLIB(COBTEST),DISP=SHR     00120200
//SYSUT1   DD  UNIT=SYSDA,SPACE=(CYL,(1,1))                             00140000
//SYSUT2   DD  UNIT=SYSDA,SPACE=(CYL,(1,1))                             00150000
//SYSUT3   DD  UNIT=SYSDA,SPACE=(CYL,(1,1))                             00160000
//SYSUT4   DD  UNIT=SYSDA,SPACE=(CYL,(1,1))                             00170000
//SYSUT5   DD  UNIT=SYSDA,SPACE=(CYL,(1,1))                             00171000
//SYSUT6   DD  UNIT=SYSDA,SPACE=(CYL,(1,1))                             00172000
//SYSUT7   DD  UNIT=SYSDA,SPACE=(CYL,(1,1))                             00173000
//SYSLIN   DD  DSN=&&LOADSET,UNIT=SYSDA,DISP=(MOD,PASS),                00180000
//             SPACE=(TRK,(3,3)),DCB=BLKSIZE=800                        00190000
//LKED   EXEC  PGM=HEWL,PARM='LIST,MAP,AMODE=31,RMODE=ANY',             00200000
//             COND=(5,LT,COB)                                          00210000
//SYSLIB   DD  DSN=SYS1.SCEELKED,DISP=SHR                               00230000
//SYSLMOD  DD  DSN=&&GOSET(COBTEST),DISP=(,PASS),UNIT=SYSDA,            00240000
//             SPACE=(CYL,(5,5,5)),DSNTYPE=LIBRARY                      00250000
//SYSUT1   DD  UNIT=SYSDA,SPACE=(CYL,(1,1))                             00260000
//SYSPRINT DD  SYSOUT=*                                                 00270000
//SYSLIN   DD  DSN=&&LOADSET,DISP=(OLD,DELETE)                          00280000
//         DD  DDNAME=SYSIN                                             00290000
//OBJECT   DD  DSN=YOURID.CMSDRG.V381.JAVA.OBJLIB,DISP=OLD              00290100
//GO     EXEC  PGM=COBTEST,COND=((5,LT,COB),(5,LT,LKED)),               00300000
//  PARM='/ENVAR("_CEE_ENVFILE=/YOURPATH/CMSDRG/V381/DRGENV381")'       00301000
//STDENV   DD  PATH='/YOURPATH/CMSDRG/V381/DRGENV381',                  00301200
//             PATHOPTS=ORDONLY                                         00301300
//JAVAERR  DD PATH='/YOURPATH/CMSDRG/V381/javaerr',                     00301400
//  PATHOPTS=(OWRONLY,OCREAT,OTRUNC),                                   00301500
//  PATHMODE=(SIRUSR,SIWUSR,SIRGRP,SIWGRP,SIROTH,SIWOTH)                00301600
//STEPLIB  DD  DSN=SYS1.SCEERUN,DISP=SHR                                00301700
//         DD  DSN=SYS1.SCEERUN2,DISP=SHR                               00301800
//         DD  DSN=YOURID.CMSDRG.V381.JAVA.LOADLIB,DISP=SHR             00301900
//         DD  DSN=&&GOSET,DISP=SHR                                     00302000
//SYSPRINT DD  SYSOUT=*                                                 00303000
//SYSOUT   DD  SYSOUT=*                                                 00303100
//PRTFILE  DD  SYSOUT=*                                                 00303200
//CEEDUMP  DD  SYSOUT=*                                                 00303300
//CEEOPTS  DD  *                                                        00303400
  XPLINK(ON),POSIX(ON),RPTSTG(OFF),RPTOPT(OFF),                         00303500
  ENVAR('_CEE_ENVFILE=/YOURPATH/CMSDRG/V381/DRGENV381')                 00303600
//SYSUDUMP DD SYSOUT=*                                                  00303700
//INFILE   DD DSN=YOURID.CMSDRG.V381.JAVA.&FILE.,DISP=OLD               00304000
//         PEND                                                         00310000
//*                                                                     00320000
//PROG1    EXEC COBUCLG,FILE=TESTDB                                     00330000
//LKED.SYSIN DD *                                                       00350000
  ENTRY COBTEST                                                         00380000
  NAME COBTEST                                                          00390000
/*                                                                      00920000
