ADAPRI Utility

This document covers the following topics:

ADAPRI DSIMPRI: Printing the DSIM Data Set
JCL/JCS Requirements and Examples

ADAPRI DSIMPRI: Printing the DSIM Data Set

The ADAPRI DSIMPRI function prints one or more specified DSIM data set blocks.

graphics/adaprid.png

Essential Parameters

FROMRABN / TORABN: Range of Blocks to be Printed

The beginning and ending numbers of the DSIM data set RABNs to be printed. Both values must be specified; there are no defaults. Printing begins with the block number specified with the FROMRABN parameter and ends with the block number specified with the TORABN parameter. Each block in the range is printed in hexadecimal format.

Optional Parameters

BATCH: Output Format

Controls the line length of the printed output. If BATCH is not specified, the default line size is 80 characters. If BATCH is specified, the output line size is 120 characters.

DEVICE: Device Type

The device type on which the DSIM data set is contained. This parameter is required only if the device type is different from the standard device type assigned by the ADARUN DEVICE parameter.

NOUSERABEND: Termination without ABEND

When an error is encountered while the function is running, the utility prints an error message and terminates with user ABEND 34 (with a dump) or user ABEND 35 (without a dump).

If NOUSERABEND is specified, the utility will not ABEND after printing the error message. Instead, the message "utility TERMINATED DUE TO ERROR CONDITION" is displayed and the utility terminates with condition code 20.

Example


ADAPRI DSIMPRI FROMRABN=1,TORABN=1

Block 1 only of the DSIM data set is printed.

JCL/JCS Requirements and Examples

This section describes the job control information required to run the Delta Save functions of ADAPRI with BS2000/OSD, z/OS, z/VM, VSE/ESA and z/VSE systems, and shows examples of each of the job streams.

This section covers the following topics:

BS2000/OSD
z/OS
z/VM
VSE/ESA and z/VSE

BS2000/OSD

Data Set	Link Name	Storage	More Information
Delta Save images (DSIM)	DDDSIMR1	disk	Required for the DSIMPRI function
ADAPRI parameters	SYSDTA/DDKARTE
ADARUN parameters	SYSDTA/DDCARD		Adabas Operations
ADAPRI messages	SYSLST/DDDRUCK		Adabas Messages and Codes
ADARUN messages	SYSOUT/DDPRINT		Adabas Messages and Codes

Example


/.PRI               LOGON

/MOD-JOB-OPTIONS    LISTING=YES

/MOD-TEST           DUMP=YES

/ASS-SYSLST         DO.PRI.LST

/ASS-SYSOUT         DO.PRI.OUT

/ASS-SYSDTA         *SYSCMD

/SET-FILE-LINK      DDDSIMR1, ADABAS.DB010.DSIM 

,SUP=DISK(SHARE-UPD=YES)

/SET-FILE-LINK      DDLIB   , ADABAS.MOD

/REMARK

/START-PROGRAM      FROM-FILE=*MOD(ADABAS.MOD,ADARUN)

ADARUN   PROG=ADAPRI, ...

ADAPRI DSIMPRI FROMRABN=...,TORABN=...

/ASS-SYSLST         *PRIM

/ASS-SYSOUT         *PRIM

/ASS-SYSDTA         *PRIM

/LOGOFF             SYS-OUTPUT=DEL

z/OS

Data Set	DD Name	Storage	More Information
Delta Save images (DSIM)	DDDSIMR1	disk	Required for the DSIMPRI function
ADAPRI parameters	DDKARTE
ADARUN parameters	DDCARD		Adabas Operations
ADAPRI messages	DDDRUCK		Adabas Messages and Codes
ADARUN messages	DDPRINT		Adabas Messages and Codes

Example


//PRINT     EXEC  PGM=ADARUN

//DDDSIMR1  DD    DSN=ADABAS.DB010.DSIMR1,DISP=SHR

//DDCARD    DD    *

 ADARUN  PROG=ADAPRI, ...

//DDKARTE   DD    *

 ADAPRI  DSIMPRI FROMRABN=...,TORABN=...

//DDPRINT   DD    SYSOUT=*

//DDDRUCK   DD    SYSOUT=*

z/VM

Data Set	DD Name	Storage Type	More Information
Delta Save images (DSIM)	DDDSIMR1	disk	Required for the DSIMPRI function
ADAPRI parameters	DDKARTE	disk/ terminal/ reader
ADARUN parameters	DDCARD	disk/ terminal/ reader	Adabas Operations
ADAPRI messages	DDDRUCK	disk/ terminal/ printer	Adabas Messages and Codes
ADARUN messages	DDPRINT	disk/ terminal/ printer	Adabas Messages and Codes

Example


     DATADEF DDDSIMR1,DSN=ADABASVv.DSIM,VOL=DSIM

      DATADEF DDPRINT,DSN=ADAPRI.DDPRINT,MODE=A

      DATADEF DDDRUCK,DSN=ADAPRI.DDDRUCK,MODE=A

      DATADEF DDCARD,DSN=RUNPRI.CONTROL,MODE=A

      DATADEF DDKARTE,DSN=ADAPRI.CONTROL,MODE=A

      ADARUN

Contents of RUNPRI CONTROL A1:


     ADARUN  PROG=ADAPRI, ...

Contents of ADAPRI CONTROL A1:


     ADAPRI  DSIMPRI FROMRABN=...,TORABN=...

VSE/ESA and z/VSE

Data Set	Symbolic	Storage	Logical Unit	More Information
Delta Save images (DSIM)	DSIMR1	disk		Required for the DSIMPRI function
ADAPRI parameters		reader	SYSIPT
ADARUN parameters	- CARD CARD	reader tape disk	SYSRDR SYS000 *	Adabas Operations
ADAPRI messages		printer	SYS009	Adabas Messages and Codes
ADARUN messages		printer	SYSLST	Adabas Messages and Codes

* Any programmer logical unit can be used.

See the VSE/ESA-related job information in section Adabas Utility Functions for Delta Save.

Example


// EXEC PROC=ADAVvFIL

// EXEC PROC=ADAVvLIB

// EXEC ADARUN,SIZE=ADARUN

ADARUN PROG=ADAPRI,...

/*

ADAPRI DSIMPRI FROMRABN=...,TORABN=...

/*