This section describes the job control information required to run the Delta Save functions of ADAFRM 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:
| Dataset | Link Name | Storage | More Information |
|---|---|---|---|
| Delta Save images (DSIM) | DDDSIMR1 | disk | Required for DSIM... functions |
| ADAFRM parameters | SYSDTA/ DDKARTE | ||
| ADARUN parameters | SYSDTA/ DDCARD | Adabas Operations | |
| ADAFRM messages | SYSLST/ DDDRUCK | Adabas Messages and Codes | |
| ADARUN messages | SYSOUT/ DDPRINT | Adabas Messages and Codes |
/.FRM LOGON /MOD-JOB-OPTIONS LISTING=YES /MOD-TEST DUMP=YES /ASS-SYSLST DO.PRI.LST /ASS-SYSOUT DO.PRI.OUT /SET-JOB-STEP /ASS-SYSDTA *SYSCMD /SET-FILE-LINK DDDSIMR1, ADABAS.DB010.DSIM ,SUP=DISK(SHARE-UPD=NO) /SET-FILE-LINK DDLIB , ADABAS.MOD /REMARK /START-PROGRAM FROM-FILE=*MOD(ADABAS.MOD,ADARUN) ADARUN PROG=ADAFRM, ... ADAFRM DSIMFRM SIZE=20,... /ASS-SYSLST *PRIM /ASS-SYSOUT *PRIM /ASS-SYSDTA *PRIM /LOGOFF SYS-OUTPUT=DEL
/.RESET LOGON /MOD-JOB-OPTIONS LISTING=YES /MOD-TEST DUMP=YES /ASS-SYSLST DO.PRI.LST /ASS-SYSOUT DO.PRI.OUT /SET-JOB-STEP /ASS-SYSDTA *SYSCMD /SET-FILE-LINK DDDSIMR1, ADABAS.DB010.DSIM ,SUP=DISK(SHARE-UPD=NO) /SET-FILE-LINK DDLIB , ADABAS.MOD /REMARK /START-PROGRAM FROM-FILE=*MOD(ADABAS.MOD,ADARUN) ADARUN PROG=ADAFRM, ... ADAFRM DSIMRESET FROMRABN=1,SIZE=1B /ASS-SYSLST *PRIM /ASS-SYSOUT *PRIM /ASS-SYSDTA *PRIM /ASS-SYSIPT *PRIM /LOGOFF SYS-OUTPUT=DEL
| Dataset | DD Name | Storage | More Information |
|---|---|---|---|
| Delta Save images (DSIM) | DDDSIMR1 | disk | Required for DSIM... functions |
| ADAFRM parameters | DDKARTE | ||
| ADARUN parameters | DDCARD | Adabas Operations | |
| ADAFRM messages | DDDRUCK | Adabas Messages and Codes | |
| ADARUN messages | DDPRINT | Adabas Messages and Codes |
//FORMAT EXEC PGM=ADARUN //DDDSIMR1 DD DSN=ADABAS.DB010.DSIMR1,DISP=(NEW,CATLG), // VOL=SER=...,UNIT=...,SPACE=(CYL,20) //DDCARD DD * ADARUN PROG=ADAFRM,... //DDKARTE DD * ADAFRM DSIMFRM SIZE=20,... //DDPRINT DD SYSOUT=* //DDDRUCK DD SYSOUT=*
//FORMAT EXEC PGM=ADARUN //DDDSIMR1 DD DSN=ADABAS.DB010.DSIMR1,DISP=OLD //DDCARD DD * ADARUN PROG=ADAFRM, ... //DDKARTE DD * ADAFRM DSIMRESET FROMRABN=1,SIZE=1B //DDPRINT DD SYSOUT=* //DDDRUCK DD SYSOUT=*
| Dataset | DD Name | Storage | More Information |
|---|---|---|---|
| Delta Save images (DSIM) | DDDSIMR1 | disk | Required for DSIM... functions |
| ADAFRM parameters | DDKARTE | disk/ terminal/ reader | |
| ADARUN parameters | DDCARD | disk/ terminal/ reader | Adabas Operations |
| ADAFRM messages | DDDRUCK | disk/ terminal/ printer | Adabas Messages and Codes |
| ADARUN messages | DDPRINT | disk/ terminal/ printer | Adabas Messages and Codes |
DATADEF DDDSIMR1,DSN=ADABASVv.DSIM,VOL=DSIM DATADEF DDPRINT,DSN=ADAFRM.DDPRINT,MODE=A DATADEF DDDRUCK,DSN=ADAFRM.DDDRUCK,MODE=A DATADEF DDCARD,DSN=RUNFRM.CONTROL,MODE=A DATADEF DDKARTE,DSN=ADAFRM.CONTROL,MODE=A ADARUN
ADARUN PROG=ADAFRM, ...
ADAFRM DSIMFRM SIZE=20,...
DATADEF DDDSIMR1,DSN=ADABASVv.DSIM,VOL=DSIM DATADEF DDPRINT,DSN=ADAFRM.DDPRINT,MODE=A DATADEF DDDRUCK,DSN=ADAFRM.DDDRUCK,MODE=A DATADEF DDCARD,DSN=RUNFRM.CONTROL,MODE=A DATADEF DDKARTE,DSN=ADAFRM.CONTROL,MODE=A ADARUN
ADARUN PROG=ADAFRM, ...
ADAFRM DSIMRESET FROMRABN=1,SIZE=1B
| Dataset | Symbolic | Storage | Logical Unit | More Information |
|---|---|---|---|---|
| Delta Save images (DSIM) | DSIMR1 | disk | Required for DSIM... functions |
|
| ADAFRM parameters | reader | SYSIPT | ||
| ADARUN parameters | CARD CARD |
reader tape disk |
SYSRDR SYS000 * |
Adabas Operations |
| ADAFRM 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 .
// EXEC PROC=ADAVvFIL // EXEC PROC=ADAVvLIB // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADAFRM,... /* ADAFRM DSIMFRM SIZE=... /*
// EXEC PROC=ADAVvFIL // EXEC PROC=ADAVvLIB // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADAFRM,... /* ADAFRM DSIMRESET FROMRABN=1,SIZE=1B /*
