
	Version 8.2.4	SEARCH INDEX CONTENTS \| PDF PAGE PDF BOOKS \| HOME UP PREV NEXT

— Adabas Utility Functions for Delta Save —

ADAULD JCL/JCS Requirements and Examples

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

This document covers the following topics:

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

BS2000/OSD

Data Set	Link Name	Storage	More Information
Unloaded data	DDOUT1	tape/disk	Output by ADAULD (see note)
Unloaded data	DDOUT2	tape/disk	Output by ADAULD (see note)
Unloaded ISNs	DDISN	tape/disk	Required with DDISN
Full save tape	DDFULL	tape/disk	Required for full save tapes
Delta save tape(s)	DDDEL1 - DDDEL8	tape/disk	Required for delta save tape(s)
Delta Save images	DDDSIMR1	disk	Required for DSIM data set
Recovery log (RLOG)	DDRLOGR1	disk	Required for ADARAI
ADARUN parameters	SYSDTA/DDCARD		Adabas Operations
ADAULD parameters	SYSDTA/DDKARTE
ADARUN messages	SYSOUT/DDPRINT		Adabas Messages and Codes
ADAULD messages	SYSLST/DDDRUCK		Adabas Messages and Codes

Note:
DDOUT1 and DDOUT2 must have the same block size; otherwise, an ADAULD error will occur. DDOUT2 is required only if NUMOUT=2 is specified.

BS2000/OSD Examples


/.ADAULD LOGON

/OPTION MSG=FH,DUMP=YES

/REMARK *

/REMARK *   A D A U L D     SAVETAPE FUNCTION

/REMARK *

/SYSFILE SYSLST=L.ULD

/FILE    ADA.MOD     ,LINK=DDLIB

/FILE    ADA99.OUT1     ,LINK=DDOUT1 ,SPACE=(480,48)

/FILE    ADA99.FULL     ,LINK=DDFULL 

/FILE    ADA99.DEL1     ,LINK=DDDEL1 

/FILE    ADA99.DEL2     ,LINK=DDDEL2 

/EXEC (ADARUN,ADA.MOD)

ADARUN PROG=ADAULD,DB=99,DSF=YES

ADAULD FILE=1,SAVETAPE,PATTERN=FDD

/LOGOFF NOSPOOL

z/OS

Data Set	DD Name	Storage	More Information
Unloaded data	DDOUT1	tape/disk	Output by ADAULD (see note)
Unloaded data	DDOUT2	tape/disk	Output by ADAULD (see note)
Unloaded ISNs	DDISN	tape/disk	Required with DDISN
Full save tape	DDFULL	tape/disk	Required for full save tape
Delta save tape(s)	DDDEL1- DDDEL8	tape/disk	Required for delta save tape(s)
Delta Save images	DDDSIMR1	disk	Required for DSIM data set
Recovery log (RLOG)	DDRLOGR1	disk	Required for ADARAI
ADAULD messages	DDDRUCK	printer	Adabas Messages and Codes
ADARUN messages	DDPRINT	printer	Adabas Messages and Codes
ADARUN parameters	DDCARD	reader	Adabas Operations
ADAULD parameters	DDKARTE	reader

Note:
DDOUT1 and DDOUT2 must have the same block size; otherwise, an ADAULD error will occur. DDOUT2 is required only if NUMOUT=2 is specified.

z/OS Example

//ULD       EXEC PGM=ADARUN
//STEPLIB   DD   DISP=SHR,DSN=ADABAS.Vvrs.LOADLIB
//*
//DDOUT1    DD   DISP=(,KEEP),DSN=EXAMPLE.ADA99.OUT1,
//          UNIT=SYSDA,VOL=SER=DISK01,SPACE=(TRK,200,RLSE)
//DDFULL    DD   DISP=SHR,DSN=EXAMPLE.ADA99.FULLSAVE
//DDDEL1    DD   DISP=SHR,DSN=EXAMPLE.ADA99.DELTA1
//DDDEL2    DD   DISP=SHR,DSN=EXAMPLE.ADA99.DELTA2
//SYSUDUMP  DD   SYSOUT=A
//DDDRUCK   DD   SYSOUT=A
//DDPRINT   DD   SYSOUT=A
//DDCARD    DD   *
ADARUN PROG=ADAULD,SVC=249,DEVICE=3390,DB=99,DSF=YES
//DDKARTE   DD   *
ADAULD    FILE=1,SAVETAPE,PATTERN=FDD

z/VM

Data Set	DD Name	Storage	More Information
Unloaded data	DDOUT1	tape/disk	Output by ADAULD (see note)
Unloaded data	DDOUT2	tape/disk	Output by ADAULD (see note)
Unloaded ISNs	DDISN	tape/disk	Required with DDISN
Full save tape	DDFULL	tape/disk	Required for full save tape
Delta save tape(s)	DDDEL1- DDDEL8	tape/disk	Required for delta save tape(s)
Delta Save images	DDDSIMR1	disk	Required for DSIM data set
Recovery log (RLOG)	DDRLOGR1	disk	Required for ADARAI
ADAULD messages	DDDRUCK	disk/ terminal/ printer	Adabas Messages and Codes
ADARUN messages	DDPRINT	disk/ terminal/ printer	Adabas Messages and Codes
ADARUN parameters	DDCARD	disk/ terminal/ reader	Adabas Operations
ADAULD parameters	SYSIPT	disk/ terminal/ reader

Note:
DDOUT1 and DDOUT2 must have the same block size; otherwise, an ADAULD error will occur. DDOUT2 is required only if NUMOUT=2 is specified.

z/VM Example


DATADEF DDOUT1,DSN=ADABASVv.ULD1,UNIT=181,VOL=ULDF1

DATADEF DDFULL,DSN=ADABASVv.ULD1,UNIT=181,VOL=ULDF1

DATADEF DDDEL1,DSN=ADABASVv.ULD1,UNIT=181,VOL=ULDF1

DATADEF DDDEL2,DSN=ADABASVv.ULD1,UNIT=181,VOL=ULDF1

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

DATADEF DUMP,DUMMY

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

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

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

ADARUN

Contents of RUNULD CONTROL A1:


ADARUN PROG=ADAULD,DEVICE=3390,DB=111,DSF=YES

Contents of ADAULD CONTROL A1 *


ADAULD FILE=1,SAVETAPE,PATTERN=FDD

VSE/ESA and z/VSE

File	Symbolic Name	Storage	Logical Unit	More Information
Unloaded data	OUT1	tape disk	SYS010 see note 1	Output by ADAULD (see note 2)
Unloaded data	OUT2	tape disk	SYS011 see note 1	Output by ADAULD (see note 2)
Unloaded ISNs	ISN	tape disk	SYS012 see note 1	Required with DDISN
Full save tape	FULL	tape disk	SYS030 see note 1	Required for full save tape
Delta save tape(s)	DEL1- DEL8	tape disk	SYS031- SYS038 see note 1	Required for delta save tape(s)
Delta Save images	DSIMR1	disk	see note 1	Required for DSIM data set
Recovery log (RLOG)	RLOGR1	disk	see note 1	Required for ADARAI
Messages	SYSLST	printer		Adabas Messages and Codes
ADARUN parameters	SYSRDR CARD	reader/ tape/disk		Adabas Operations
ADAULD parameters	SYSIPT	reader

Notes:

Any programmer logical unit can be used.
OUT1 and OUT2 must have the same block size; otherwise, an ADAULD error will occur. OUT2 is required only if NUMOUT=2 is specified.

VSE/ESA and z/VSE Example

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


// EXEC PROC=ADAVvFIL

// EXEC PROC=ADAVvLIB

// ASSGN SYS004,DISK,VOL=DISK01,SHR

// DLBL OUT1,'EXAMPLE.ADA99.OUT1'

// EXTENT SYS004,DISK01,,,770,200

// ASSGN SYS030,TAPE

// TLBL FULL,`EXAMPLE.ADAl99.FULL'

// ASSGN SYS031,TAPE

// TLBL DEL1,'EXAMPLE.ADA99.DEL1'

// ASSGN SYS032,TAPE

// TLBL DEL2,'EXAMPLE.ADA99.DEL2'

// EXEC PROC=ADAvLIBS

// EXEC ADARUN,SIZE=ADARUN

ADARUN PROG=ADAULD,SVC=xxx,DEVICE=dddd,DB=yyyy,DSF=YES

/*

ADAULD FILE=1,SAVETAPE,PATTERN=FDD

/*

SEARCH INDEX CONTENTS | PDF PAGE PDF BOOKS | HOME UP PREV NEXT