Sample JCL to compile a 64-bit arsutbl C exit for Content Manager OnDemand for z/OS

Steps

//*-------------------------------------------------------------------     

//*    EXEC the C Compiler                         

//*-------------------------------------------------------------------     

//COMPILE EXEC PGM=CCNDRVR,                          

//    PARM='OPTFILE(DD:CCOPT)'                      

//STEPLIB DD DISP=SHR,DSN=SYS1.SCCNCMP                    

//    DD DISP=SHR,DSN=SYS1.SCEERUN2                    

//    DD DISP=SHR,DSN=SYS1.SCEERUN                    

//SYSLIB DD DISP=SHR,DSN=SYS1.SCEEH.H                    

//    DD DISP=SHR,DSN=SYS1.SCEEH.SYS.H                  

//    DD DISP=SHR,DSN=ONDEM.SD67.SARSINST                 

//SYSIN  DD DISP=SHR,DSN=MY.SOURCE(ARSUTBL)            

//CCOPT  DD *                                

 DEFINE(OS390)                                

 DEFINE(UNIX)                                 

 DEFINE(ARS_COPYRIGHT)                            

 DEFINE(MVS_PRAGMA)                              

 DEFINE(_THREAD_SAFE)                             

 DEFINE(_OPEN_SYS)                              

 DEFINE(_XOPEN_SOURCE_EXTENDED)                        

 DEFINE(__OS390__)                              

 OPT(2)                                    

 LP64                                     

 CSECT                                    

 TUNE(8)                                   

 INLRPT                                    

 LIB                                     

 ARCH(8)                                   

 LONGNAME                                   

 RENT                                     

 SOURCE                                    

 LIST                                     

 NOSEQ                                    

 NOMAR                                    

 SPILL(512)                                  

//SYSLIN DD DSN=&&OBJ(ARSUTBL),                       

//      DISP=(NEW,PASS),                         

//      UNIT=SYSALLDA,                          

//      SPACE=(TRK,(30,,5)),                       

//      DCB=(LRECL=80,BLKSIZE=6160,RECFM=FB,DSORG=PO)          

//SYSPRINT DD SYSOUT=*                             

//SYSLIST DD SYSOUT=*                             

//SYSERR DD SYSOUT=*                             

//SYSPRINT DD SYSOUT=*                             

//SYSOUT DD SYSOUT=*                             

//SYSCPRT DD SYSOUT=* 

//SYSUT1 DD UNIT=SYSDA,DISP=(NEW,DELETE),                  

//      SPACE=(32000,(30,30)),                      

//      DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200)               

//SYSUT4 DD UNIT=SYSDA,DISP=(NEW,DELETE),                  

//      SPACE=(32000,(30,30)),                      

//      DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200)               

//SYSUT5 DD UNIT=SYSDA,DISP=(NEW,DELETE),                  

//      SPACE=(32000,(30,30)),                      

//      DCB=(RECFM=FB,LRECL=3200,BLKSIZE=12800)             

//SYSUT6 DD UNIT=SYSDA,DISP=(NEW,DELETE),                  

//      SPACE=(32000,(30,30)),                      

//      DCB=(RECFM=FB,LRECL=3200,BLKSIZE=12800)             

//SYSUT7 DD UNIT=SYSDA,DISP=(NEW,DELETE),                  

//      SPACE=(32000,(30,30)),                      

//      DCB=(RECFM=FB,LRECL=3200,BLKSIZE=12800)             

//SYSUT8 DD UNIT=SYSDA,DISP=(NEW,DELETE),                  

//      SPACE=(32000,(30,30)),                      

//      DCB=(RECFM=FB,LRECL=3200,BLKSIZE=12800)             

//SYSUT9 DD UNIT=SYSDA,DISP=(NEW,DELETE),                  

//      SPACE=(32000,(30,30)),                      

//      DCB=(RECFM=VB,LRECL=137,BLKSIZE=882)               

//SYSUT14 DD UNIT=SYSDA,SPACE=(32000,(30,30)),                

//      DCB=(RECFM=FB,LRECL=3200,BLKSIZE=12800)             

//SYSPRINT DD SYSOUT=*                             

//SYSCPRT DD SYSOUT=*                             

//*                             

//*------------------------------------------------------------------     

//*    EXEC the BINDER                           

//*--------------------------------------------------------------------    

//BIND  EXEC PGM=IEWL,COND=(4,LT,COMPILE),                 

//    PARM='CASE=MIXED,OPTIONS=OPTS'                   

//SYSLIB DD DSN=&&OBJ,DISP=(OLD,DELETE)                   

//    DD DISP=SHR,DSN=SYS1.SCEEBND2                    

//OPTS  DD *                                

 XREF                                     

 AMODE=64,MAP                                 

 RENT,DYNAM(DLL)                               

//SYSLMOD DD PATH='/tmp/'                           

//SYSUT1 DD UNIT=VIO,SPACE=(CYL,(10,2)),DISP=(NEW,DELETE)          

//SYSPRINT DD SYSOUT=*                             

//SYSDEFSD DD DUMMY                              

//SYSLIN DD DISP=SHR,DSN=SYS1.SCEELIB(CELQS003)               

//    DD DISP=SHR,DSN=SYS1.SCEELIB(CELQS001)               

//    DD DISP=SHR,DSN=SYS1.SCEELIB(CELQSCPP)               

//    DD *                                

 SETOPT PARM(PATHMODE(0,7,5,5),EXTATTR(APF))                 

 INCLUDE SYSLIB(ARSUTBL)                           

 ENTRY CELQSTRT                               

 NAME  'arsutbl'(R)                             

//