Version 7.4.3
 —  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, OS/390, z/OS, z/VM, and VSE/ESA systems and shows examples of each of the job streams.

This document covers the following topics:


BS2000

Dataset 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 dataset
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 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

Top of page

OS/390 or z/OS

Dataset 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 dataset
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.

OS/390 or 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=3380,DB=99,DSF=YES

//DDKARTE   DD   *

ADAULD    FILE=1,SAVETAPE,PATTERN=FDD

Top of page

z/VM

Dataset 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 dataset
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=3380,DB=111,DSF=YES  

 

Contents of ADAULD CONTROL A1 *


ADAULD FILE=1,SAVETAPE,PATTERN=FDD   

 

Top of page

VSE/ESA

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 dataset
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:

  1. Any programmer logical unit can be used.
  2. 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 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

/*                                                                     

 

Top of page