このセクションでは、ADADEF with BS2000、z/OS、z/VM、および VSE システムの実行に必要なジョブ制御情報を説明し、各ジョブストリームの例を示します。
このドキュメントでは、次のトピックについて説明します。
データセット | リンク名 | ストレージ | 追加情報 |
---|---|---|---|
アソシエータ | DDASSORn | ディスク | |
データストレージ | DDDATARn | ディスク | |
ワーク | DDWORKR1 DDWORKR4 |
ディスク | |
ADARUN パラメータ | DDCARD | オペレーションマニュアル | |
ADADEF パラメータ | SYSDTA/ DDKARTE | ユーティリティ | |
ADARUN メッセージ | SYSOUT/ DDPRINT | メッセージおよびコード | |
ADADEF メッセージ | SYSLST/ DDDRUCK | メッセージおよびコード |
/.ADADEF LOGON /MODIFY-TEST-OPTIONS DUMP=YES /REMARK * /REMARK * A D A D E F DEFINE DATABASE /REMARK * /ASS-SYSLST L.DEF.DATA /ASS-SYSDTA *SYSCMD /SET-FILE-LINK DDLIB,ADAvrs.MOD /SET-FILE-LINK DDASSOR1,ADAyyyyy.ASSO /SET-FILE-LINK DDDATAR1,ADAyyyyy.DATA /SET-FILE-LINK DDWORKR1,ADAyyyyy.WORK /START-PROGRAM *M(ADA.MOD,ADARUN),PR-MO=ANY ADARUN PROG=ADADEF,DB=yyyyy,IDTNAME=ADABAS5B ADADEF DEFINE DBNAME=EXAMPLE-DB ADADEF ASSOSIZE=100,DATASIZE=200,WORKSIZE=40 ADADEF MAXFILES=120 ADADEF FILE=1,CHECKPOINT ADADEF NAME= CHECKPOINT ,MAXISN=5000,UISIZE=10B ADADEF DSSIZE=500B,NISIZE=100B /LOGOFF SYS-OUTPUT=DEL
/.ADADEF LOGON /OPTION MSG=FH,DUMP=YES /REMARK * /REMARK * A D A D E F DEFINE DATABASE /REMARK * /SYSFILE SYSLST=L.DEF.DEFI /FILE ADA.MOD,LINK=DDLIB /FILE ADAyyyyy.ASSO ,LINK=DDASSOR1 /FILE ADAyyyyy.DATA ,LINK=DDDATAR1 /FILE ADAyyyyy.WORK ,LINK=DDWORKR1 /EXEC (ADARUN,ADA.MOD) ADARUN PROG=ADADEF,DB=yyyyy,IDTNAME=ADABAS5B ADADEF DEFINE DBNAME=EXAMPLE-DB ADADEF ASSOSIZE=100,DATASIZE=200,WORKSIZE=40 ADADEF MAXFILES=120 ADADEF FILE=1,CHECKPOINT ADADEF NAME= CHECKPOINT ,MAXISN=5000,UISIZE=10B ADADEF DSSIZE=500B,NISIZE=100B /LOGOFF NOSPOOL
データセット | DD 名 | ストレージ | 追加情報 |
---|---|---|---|
アソシエータ | DDASSORn | ディスク | |
データストレージ | DDDATARn | ディスク | |
ワーク(現在) | DDWORKR1 DDWORKR4 |
ディスク | |
ADARUN パラメータ | DDCARD | リーダー | オペレーションマニュアル |
ADADEF パラメータ | DDKARTE | リーダー | |
ADARUN メッセージ | DDPRINT | プリンタ | メッセージおよびコード |
ADADEF メッセージ | DDDRUCK | プリンタ | メッセージおよびコード |
//ADADEF JOB //* //* ADADEF: //* DEFINE THE PHYSICAL LAYOUT OF THE DATABASE //* DEFINE THE NUCLEUS SYSTEMFILE: CHECKPOINT FILE //* //DEF EXEC PGM=ADARUN //STEPLIB DD DISP=SHR,DSN=ADABAS.Vvrs.LOAD <=== ADABAS LOAD //* //DDASSOR1 DD DISP=SHR,DSN=EXAMPLE.DByyyyy.ASSOR1 <=== ASSO //DDDATAR1 DD DISP=SHR,DSN=EXAMPLE.DByyyyy.DATAR1 <=== DATA //DDWORKR1 DD DISP=SHR,DSN=EXAMPLE.DByyyyy.WORKR1 <=== WORK //DDDRUCK DD SYSOUT=X //DDPRINT DD SYSOUT=X //SYSUDUMP DD SYSOUT=X //DDCARD DD * ADARUN PROG=ADADEF,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* //DDKARTE DD * ADADEF DEFINE DBNAME=EXAMPLE-DB,DBIDENT=YYYYY ADADEF ASSOSIZE=100,DATASIZE=200,WORKSIZE=40 ADADEF MAXFILES=120 * ADADEF FILE=19,CHECKPOINT ADADEF NAME='CHECKPOINT',MAXISN=5000 ADADEF DSSIZE=100B,NISIZE=3B,UISIZE=3B /*
この例については、MVSJOBS データセットの ADADEF を参照してください。
//ADADEFNW JOB //* //* ADADEF: DEFINE NEW WORK //* //DEF EXEC PGM=ADARUN //STEPLIB DD DISP=SHR,DSN=ADABAS.Vvrs.LOAD <=== ADABAS LOAD //* //DDASSOR1 DD DISP=SHR,DSN=EXAMPLE.DByyyyy.ASSOR1 <=== ASSO //DDDATAR1 DD DISP=SHR,DSN=EXAMPLE.DByyyyy.DATAR1 <=== DATA //DDWORKR1 DD DISP=SHR,DSN=EXAMPLE.DByyyyy.WORKR1 <=== WORK //DDDRUCK DD SYSOUT=X //DDPRINT DD SYSOUT=X //SYSUDUMP DD SYSOUT=X //DDCARD DD * ADARUN PROG=ADADEF,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* //DDKARTE DD * ADADEF NEWWORK WORKSIZE=60,WORKDEV=eeee /*
この例については、MVSJOBS データセットの ADADEFNW を参照してください。
データセット | DD 名 | ストレージ | 追加情報 |
---|---|---|---|
アソシエータ | DDASSORn | ディスク | |
データストレージ | DDDATARn | ディスク | |
ワーク | DDWORKR1 DDWORKR4 |
ディスク | |
ADARUN パラメータ | DDCARD | ディスク/端末/リーダー | オペレーションマニュアル |
ADADEF パラメータ | DDKARTE | ディスク/端末/リーダー | |
ADARUN メッセージ | DDPRINT | ディスク/端末/プリンタ | メッセージおよびコード |
ADADEF メッセージ | DDDRUCK | ディスク/端末/プリンタ |
DATADEF DDASSOR1,DSN=ADABASVv.ASSO,VOL=ASSOV1 DATADEF DDDATAR1,DSN=ADABASVv.ASSO,VOL=DATAV1 DATADEF DDWORKR1,DSN=ADABASVv.WORK,VOL=WORKV1 DATADEF DDPRINT,DSN=ADADEF.DDPRINT,MODE=A DATADEF DUMP,DUMMY DATADEF DDDRUCK,DSN=ADADEF.DDDRUCK,MODE=A DATADEF DDCARD,DSN=RUNDEF.CONTROL,MODE=A DATADEF DDKARTE,DSN=ADADEF.CONTROL,MODE=A ADARUN
ADARUN PROG=ADADEF,DEVICE=dddd,DB=yyyyy
ADADEF DEFINE DBNAME=EXAMPLE-DB ADADEF ASSOSIZE=100,DATASIZE=200,WORKSIZE=40 ADADEF MAXFILE=120 * ADADEF FILE=1,CHECKPOINT ADADEF NAME='CHECKPOINT',MAXISN=5000,UISIZE=10B ADADEF DSSIZE=500B,NISIZE=100B
DATADEF DDASSOR1,DSN=ADABASVv.ASSO,VOL=ASSOV1 DATADEF DDDATAR1,DSN=ADABASVv.ASSO,VOL=DATAV1 DATADEF DDWORKR1,DSN=ADABASVv.WORK,VOL=WORKV1 DATADEF DDPRINT,DSN=ADADEF.DDPRINT,MODE=A DATADEF DUMP,DUMMY DATADEF DDDRUCK,DSN=ADADEF.DDDRUCK,MODE=A DATADEF DDCARD,DSN=RUNDEF.CONTROL,MODE=A DATADEF DDKARTE,DSN=ADADEF.CONTROL,MODE=A ADARUN
ADARUN PROG=ADADEF,DEVICE=dddd,DB=yyyyy
ADADEF NEWWORK WORKSIZE=60,WORKDEV=eeee
ファイル | 記号名 | ストレージ | 論理ユニット | 追加情報 |
---|---|---|---|---|
アソシエータ | ASSORn | ディスク | * | |
データストレージ | DATARn | ディスク | * | |
ワーク(現在) | WORKR1 | ディスク | * | |
ADARUN パラメータ | - CARD CARD |
リーダー テープ ディスク |
SYSRDR SYS000 * |
|
ADADEF パラメータ | - | リーダー | SYSIPT | |
ADARUN メッセージ | - | プリンタ | SYSLST | |
ADADEF メッセージ | - | プリンタ | SYS009 | メッセージおよびコード |
* すべてのプログラマ論理ユニットを使用できます。
VSE プロシージャの内容については、「VSE 用のライブラリおよびファイルプロシージャの例」を参照してください。
この例については ADADEF.X を参照してください。
* $$ JOB JNM=ADADEF,CLASS=A,DISP=D * $$ LST CLASS=A,DISP=D // JOB ADADEF * DEFINE THE PHYSICAL LAYOUT OF THE DATABASE * DEFINE THE NUCLEUS SYSTEMFILE: CHECKPOINT FILE // EXEC PROC=ADAVvLIB // EXEC PROC=ADAVvFIL // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADADEF,MODE=SINGLE,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* ADADEF DEFINE DBNAME=EXAMPLE-DB,DBIDENT=yyyyy ADADEF ASSOSIZE=100,DATASIZE=200,WORKSIZE=40 ADADEF MAXFILES=120 * ADADEF FILE=19,CHECKPOINT ADADEF NAME='CHECKPOINT',MAXISN=5000 ADADEF DSSIZE=100B,NISIZE=3B,UISIZE=3B /* /& * $$ EOJ
この例については ADADEFNW.X を参照してください。
* $$ JOB JNM=ADADEFNW,CLASS=A,DISP=D * $$ LST CLASS=A,DISP=D // JOB ADADEFNW * DEFINE NEW WORK // EXEC PROC=ADAVvLIB // EXEC PROC=ADAVvFIL // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADADEF,MODE=SINGLE,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* ADADEF NEWWORK WORKSIZE=60,WORKDEV=eeee /* /& * $$ EOJ