Previous Topic: Coding the URT MacrosNext Topic: Using the Display Utility (DBUT)


Assembling and Linking Each URT

After coding an online URT, assemble and link it to produce a load module.

URT Naming Conventions

Use the following naming conventions for your URTs:

The 3-digit or 4-digit numeric identifier can be any number, but generally it is associated with a database ID.

Note: Because CA Datacom/DB supports 4-digit database IDs and CA Datacom CICS Services now supports up to 9999 URTs, you can only have a one-to-one relationship between the 3-digit or 4-digit numeric identifier suffix and a database ID if the database ID is less than 1000. Therefore, PREFIX=DBUR2 (or 3, 4, ...) is invalid since there would be no distinction between URT 2nnn and nnn. For example, DBUR2005: is it URT5 or URT 2005.

z/OS JCL Example

The JOB, SYSLIB and SYSLMOD statements are for example only. Code these statements according to site standards.

 //jobname  JOB    Job Statement Information
 //*-------------------------------------------------------------------*
 //*            ASSEMBLE/LINK ONLINE USER REQUIREMENTS TABLE           *
 //*-------------------------------------------------------------------*
 //ASM     EXEC PGM=ASMA90,PARM='NODECK,LOAD'
 //SYSLIB    DD DSN=SYS1.MACLIB,DISP=SHR
 //          DD DSN=CAI.DHLQ.CABDMAC,DISP=SHR
 //SYSUT1    DD DSN=&.&SYSUT1.,UNIT=SYSDA,SPACE=(8800,(1200,100))
 //SYSUT2    DD DSN=&.&SYSUT2.,UNIT=SYSDA,SPACE=(8800,(1200,50))
 //SYSUT3    DD DSN=&.&SYSUT3.,UNIT=SYSDA,SPACE=(8800,(1200,50))
 //SYSPRINT  DD SYSOUT=*
 //SYSPUNCH  DD SYSOUT=*
 //SYSLIN    DD DSN=&.&OBJSET.,UNIT=SYSDA,SPACE=(80,(200,50)),
 //             DISP=(MOD,PASS)
 //SYSIN     DD *
     .
     .
     .
     .
     .
     .
 /*
 //*
 //LKED  EXEC PGM=IEWL,PARM='XREF,LET,LIST,NCAL',COND=(8,LT,ASM)
 //SYSLIN    DD DSN=&.&OBJSET.,DISP=(OLD,DELETE)
 //          DD DDNAME=SYSIN
 //SYSUT1    DD DSN=&.&SYSUT1.,UNIT=SYSDA,SPACE=(1024,(50,20))
 //SYSPRINT  DD SYSOUT=*
 //SYSLMOD   DD DSN=CAI.CHLQ.CUSLIB,DISP=SHR
 //SYSIN     DD *
  NAME DBURT025(R)
 /*
 //

z/VSE JCL Example

The JOB statement, power statements, and EXTENT statements in the following JCL are for example only. Code these statements according to site standards.

 * $$ JOB JNM=jobname,CLASS=n
 * $$ LST CLASS=n
 // JOB ASMBLNK
 // DLBL    BASE,'customer.designated.db.install.library'
 // EXTENT  SYS009,volser
 // ASSGN   SYS009,DISK.,VOL=vvvvvv,SHR
 // DLBL    CUSLIB,'customer.designated.local.library'
 // EXTENT  SYS009,volser
 // LIBDEF  *,SEARCH=BASE.DBBASE
 // LIBDEF  *,CATALOG=CUSLIB.sublib
 // OPTION CATAL
   PHASE DBURT025,*
 // EXEC ASSEMBLY
     .
     .
     .
     .
     .
     .
 // EXEC LNKEDT
 /&
 * $$ EOJ