Installation of the ADSO XREF Utility is a simple matter of copying load modules from the installation tape to a load library of your choice.
//jobname JOB site parameters //step1 EXEC PGM=IEBCOPY //TAPEIN DD DSN=AXU107.LOAD,DISP=OLD,UNIT=tape, // VOL=SER=AXU107 //LOAD DD DSN=axu.loadlib,DISP=(,CATLG,DELETE),UNIT=disk, // SPACE=(TRK,(50,5,4),RLSE),DCB=(RECFM=U,BLKSIZE=blksz) //SYSUT3 DD UNIT=disk,SPACE=(TRK,1) //SYSPRINT DD SYSOUT=sysout class //SYSIN DD * COPY OUTDD=LOAD,INDD=TAPEIN /* //
All programs are written in COBOL. If the COBOL subroutine library is not specified in your link pack area, you will have to include it as part of the STEPLIB concatenation for the execution of all AXU programs.
File 2 of the installation tape (DSN=AXU107.SAMPJCL) contains sample execution JCL for all programs in the AXU. Note that this intended to ease the chore of coding the JCL from scratch, but will certainly require extensive modifications for use at your facility. Use IEBGENER or a similar sequential file copy utility to unload these 80-byte records to a disk file accessible by your text editor.
Installation of the ADSO XREF Utility is a simple matter of cataloging relocatable modules from the installation tape and linking them into the core-image library of your choice. All programs are linked as other standard IDMS batch COBOL programs in your environment.
@JCL = * $$ JOB JNM=jobname,site parameters // JOB site parameters * step 1 - MAINT LIBDEFS here specify as TO the relocatable library and core-image library which will contain the AXU LIBDEFS specify as SEARCH the libraries which contain COBOL and IDMS routines. // TLBL IJSYSIN,'AXU107.RELO',0 ASSGN SYSIPT,cuu cuu is tape drive address // EXEC MAINT /* * step 2 - LNKEDT LADAXU05 // ASSGN SYSIPT,SYSRDR // OPTION CATAL PHASE LADAXU05 INCLUDE LADAXU05 INCLUDE IDMSCANC INCLUDE idmsidms your standard IDMS interface INCLUDE IDMSOPTI only if you will wish to execute through central version /* ENTRY LADAXU05 // EXEC LNKEDT /* *steps 3 thru 14 - Execute LNKEDT for each of the following programs. LADAXU10, LADAXU15, LADAXU20, and LADAXU25 should include the same modules as LADAXU05 (substituting the appropriate module for LADAXU05). The remainder of the programs need only include IDMSCANC. LADAXU06 LADAXU20 LADAXU10 LADAXU21 LADAXU11 LADAXU22 LADAXU12 LADAXU25 LADAXU15 LADAXU26 LADAXU16 LADAXU27 Unresolved external references for IJGFxEWZ may be ignored.
File 5 of the installation tape (i.e. the file past the fourth tape mark) contains sample JCL for all programs in the AXU. Note that this is intended to ease the chore of coding the JCL from scratch, but will certainly require extensive modifications for use at your facility. Use DITTO, or any sequential file copy utility, to unload these 80-byte records (blocking factor = 100) to a file accessible by your text editor.