//COMPTHLW JOB !!your jobcard..!!		 

//* 

//JCLLIB JCLLIB ORDER=!!your jcl libraries!!

//* 

//CMPLLNK EXEC IGYWCLDB,MEM=PTCOBHLW 

//PC.SYSIN  DD DISP=SHR,DSN=DB2.JCOB.SRC(PTCOBHLW) 
               <--- your source library
//LKED.SYSLMOD DD DSN=DB2.JCOB.PGMLIB(PTCOBHLW),DISP=SHR          <--- your load library
//LKED.SYSIN   DD * 
    
  INCLUDE SYSLIB(DSNRLI) 
    
  INCLUDE '/java/current6_31/bin/classic/libjvm.x' 
    
  INCLUDE '/cobol/cob420/lib/igzcjava.x' 
    
  ENTRY PTCOBHLW 
    
  NAME  PTCOBHLW(R) 

/* 

//BINDTRK  EXEC PGM=IKJEFT01,DYNAMNBR=20 

//STEPLIB   DD  DSN=DB2.!!DB2SYSID!!.SDSNLOAD,DISP=SHR            <-- your db2 load library
//DBRMLIB   DD  DISP=SHR,DSN=DB2.JCOB.DBRMLIB         
            <-- your db2 dbrmlib 
//SYSTSPRT  DD  SYSOUT=* 

//SYSPRINT  DD  SYSOUT=* 

//DSNTRACE  DD  SYSOUT=* 

//SYSUDUMP  DD  DUMMY 

//SYSTSIN   DD  * 
  DSN SYSTEM(!!DB2SYSID!!) 
  BIND PACKAGE(NULLID) M(PTCOBHLW) ACT(REPL) ISOLATION(CS)  - 
 
    CURRENTDATA(YES) ENCODING(EBCDIC) 
/*