Version 8.2.5
 —  Utilities  —

JCL/JCS Requirements and Examples

Sample jobs you can use to run the ADAZIN utility are described in this document.


BS2000

Data Set Link Name Storage More Information
ADARUN parameters DDCARD or *SYSCMD reader Operations
ADAZIN parameters DDKARTE or *SYSCMD reader  
ADARUN messages DDPRINT or *SYSOUT printer Messages and Codes
ADAZIN messages DDDRUCK or *SYSOUT printer Messages and Codes

ADAZIN JCL Example (BS2000)

In SDF Format:

/BEGIN-PROC C
/MOD-TEST DUMP=YES
/REMARK *
/REMARK * A D A Z I N All Functions
/REMARK *
/ASS-SYSOUT L.ZIN
/ASS-SYSLST L.ZIN.L
/ASS-SYSDTA *SYSCMD
/SET-FILE-LINK DDLIB,ADABAS.MOD
/SET-FILE-LINK BLSLIB00,ADABAS.MOD
/REMA
/REMA $.SYSLNK.LMS.033 is the LMS SYSLNK Library
/REMA NOTE: The BLSLIB number should be 4 or more higher than
/REMA the highest BLSLIB number used, otherwise it can become
/REMA included in the program
/SET-FILE-LINK BLSLIB09,$.SYSLNK.LMS.033
/SET-FILE-LINK DDASSOR1,ADA99.ASSO
/SET-FILE-LINK DDDATAR1,ADA99.DATA
/SET-FILE-LINK DDWORKR1,ADA99.WORK
/SET-FILE-LINK DDZIN,ADABAS.MOD
/START-PROG *M(E=ADARUN,L=ADABAS.MOD),RUN-MODE=ADV(A-L=YES)
ADARUN PROG=ADAZIN,DB=99,IDTNAME=ADABAS6B
ADAZIN
/ASS-SYSDTA *PRIM
/ASS-SYSLST *PRIM
/ASS-SYSOUT *PRIM
/END-PROC

Refer to ADAZIN(J) in the Adabas source library for this example.

Top of page

z/OS

Data Set Link Name Storage More Information
Load DDZIN disk not required. If not specified, the load modules will be listed from the STEPLIB, JOBLIB, LPA, and LNKLST. If specified, one or more load libraries should be supplied.
Load STEPLIB disk required to supply code for ADAZIN utility and as default if no DDZIN link name is specified.
ADARUN parameters DDCARD reader Operations
ADAZIN parameters DDKARTE reader  
ADARUN messages DDPRINT printer Messages and Codes
ADAZIN messages DDDRUCK printer Messages and Codes

Example (z/OS)

//ADAZIN    JOB . . .                
//*                                                                     
//ZIN       EXEC PGM=ADARUN,REGION=0M                                   
//STEPLIB   DD   DISP=SHR,DSN=ADABAS.ADA822.LOAD                    
//*                                                                     
//DDZIN     DD   DISP=SHR,DSN=ADABAS.ACF822.LOAD              
//          DD   DISP=SHR,DSN=ADABAS.ADA822.LOAD                   
//*                                                                     
//DDDRUCK  DD SYSOUT=*                                                  
//DDPRINT  DD SYSOUT=*                                                  
//SYSUDUMP DD SYSOUT=*                                                  
//DDCARD   DD *                                                         
ADARUN PROG=ADAZIN,SVC=235,DEVICE=3390,DBID=123                         
/*                                                                      
//DDKARTE  DD   *                                                       
 ADAZIN                                   

Refer to ADAZIN in the JOBS data set for this example.

Top of page

z/VSE

Data Set Link Name Storage More Information
ADARUN parameters CARD reader Operations
ADAZIN parameters KARTE reader  
ADARUN messages PRINT printer Messages and Codes
ADAZIN messages DRUCK printer Messages and Codes

Example (z/VSE)

* $$ JOB JNM=ADAZIN,DISP=D,CLASS=A
* $$ LST DISP=D,CLASS=A                                   
// JOB ADAZIN                             
// DLBL SAGLIB,'ADABAS.LIBRARY'                  
// EXTENT SYS018                                          
// ASSGN SYS018,DISK,VOL=USRVL1,SHR                       
// LIBDEF PHASE,SEARCH=(SAGLIB.ACFvrs,SAGLIB.ADAvrs),TEMP 
// ASSGN SYS009,PRINTER                                   
// EXEC ADARUN,SIZE=ADARUN                                
ADARUN PROG=ADAZIN,SVC=xxx,DEVICE=dddd,DBID=yyyyy
/*                                                        
ADAZIN                                                    
/*                                                        
/&                                                        
* $$ EOJ

Refer to member ADAZIN.X for this example.

See Library and File Procedures for z/VSE Examples for descriptions of the z/VSE procedures (PROCs).

Top of page