このセクションでは、ADAICK with BS2000、z/OS、z/VM、および VSE システムの実行に必要なジョブ制御情報を説明し、各ジョブストリームの例を示します。
このドキュメントでは、次のトピックについて説明します。
ADAICK 実行中に照合ユーザー出口を使用する場合、ユーティリティ実行時に ADARUN CDXnn パラメータを指定する必要があります。
UES（ユニバーサルエンコーディングサポート）と合わせて使用する場合の照合ディスクリプタユーザー出口の構文は次のとおりです。
ここでは次の内容を表しています。
| nn | 照合ディスクリプタ出口の番号。01 から 08 までの 2 桁の 10 進数。 |
| exit-name | 照合ディスクリプタ出口で制御を持つユーザールーチン名。最大 8 文字。 |
照合ディスクリプタ出口に指定できるプログラムは 1 つだけです。 最大 8 個の照合ディスクリプタ出口を任意の順序で指定できます。 詳細は『Adabas DBA リファレンスマニュアル』を参照してください。
| データセット | リンク名 | ストレージ | 追加情報 |
|---|---|---|---|
| アソシエータ | DDASSORn | ディスク | |
| データストレージ | DDDATARn | ディスク | |
| ADARUN パラメータ | DDCARD | オペレーションマニュアル | |
| ADAICK パラメータ | SYSDTA/ DDKARTE | ||
| ADARUN メッセージ | SYSOUT DDPRINT | メッセージおよびコード | |
| ADAICK メッセージ | SYSLST DDDRUCK | メッセージおよびコード |
/.ADAICK LOGON /MODIFY-TEST-OPTIONS DUMP=YES /REMARK * /REMARK *A D A I C K INDEX CHECK /REMARK * /REMARK * /ASS-SYSLST L.ICK.DATA /ASS-SYSDTA *SYSCMD /SET-FILE-LINK DDLIB,ADAvrs.MOD /SET-FILE-LINK DDASSOR1,ADAyyyyy.ASSO,SHARE-UPD=YES /SET-FILE-LINK DDDATAR1,ADAyyyyy.DATA,SHARE-UPD=YES /START-PROGRAM *M(ADA.MOD,ADARUN),PR-MO=ANY ADARUN PROG=ADAICK,DB=yyyyy,IDTNAME=ADABAS5B ADAICK ICHECK FILE=27 /LOGOFF SYS-OUTPUT=DEL
/.ADAICK LOGON /OPTION MSG=FH,DUMP=YES /REMARK * /REMARK *A D A I C K INDEX CHECK /REMARK * /REMARK * /SYSFILE SYSLST=L.ICK.DATA /FILE ADA.MOD,LINK=DDLIB /FILE ADAyyyyy.ASSO ,LINK=DDASSOR1,SHARUPD=YES /FILE ADAyyyyy.DATA ,LINK=DDDATAR1,SHARUPD=YES /EXEC (ADARUN,ADA.MOD) ADARUN PROG=ADAICK,DB=yyyyy,IDTNAME=ADABAS5B ADAICK ICHECK FILE=27 /LOGOFF NOSPOOL
| データセット | DD 名 | ストレージ | 追加情報 |
|---|---|---|---|
| アソシエータ | DDASSORn | ディスク | |
| データストレージ | DDDATARn | ディスク | |
| ADARUN パラメータ | DDCARD | リーダー | オペレーションマニュアル |
| ADAICK パラメータ | DDKARTE | リーダー | |
| ADARUN メッセージ | DDPRINT | プリンタ | メッセージおよびコード |
| ADAICK メッセージ | DDDRUCK | プリンタ | メッセージおよびコード |
この例については、MVSJOBS データセットの ADAICK を参照してください。
//ADAICK JOB //* //* ADAICK: //* INDEX AND ADDRESS CONVERTER CHECK //* //ICK 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 //DDDRUCK DD SYSOUT=X //DDPRINT DD SYSOUT=X //SYSUDUMP DD SYSOUT=X //DDCARD DD * ADARUN PROG=ADAICK,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* //DDKARTE DD * ADAICK ICHECK FILE=1-3 /*
| データセット | DD 名 | ストレージ | 追加情報 |
|---|---|---|---|
| アソシエータ | DDASSORn | ディスク | |
| データストレージ | DDDATARn | ディスク | |
| ADARUN パラメータ | DDCARD | ディスク／端末／リーダー | オペレーションマニュアル |
| ADAICK パラメータ | DDKARTE | ディスク／端末／リーダー | |
| ADARUN メッセージ | DDPRINT | ディスク／端末／プリンタ | メッセージおよびコード |
| ADAICK メッセージ | DDDRUCK | ディスク／端末／プリンタ | メッセージおよびコード |
DATADEF DDASSOR1,DSN=ADABASVv.ASSO,VOL=ASSOV1 DATADEF DDDATAR1,DSN=ADABASVv.DATA,VOL=DATAV1 DATADEF DDPRINT,DSN=ADAICK.DDPRINT,MODE=A DATADEF DUMP,DUMMY DATADEF DDDRUCK,DSN=ADAICK.DDDRUCK,MODE=A DATADEF DDCARD,DSN=RUNICK.CONTROL,MODE=A DATADEF DDKARTE,DSN=ADAICK.CONTROL,MODE=A ADARUN
ADARUN PROG=ADAICK,DEVICE=dddd,DB=yyyyy
ADAICK ICHECK FILE=27
| ファイル | 記号名 | ストレージ | 論理ユニット | 追加情報 |
|---|---|---|---|---|
| アソシエータ | ASSORn | ディスク | * | |
| データストレージ | DATARn | ディスク | * | |
| ADARUN パラメータ | - CARD CARD |
リーダー テープ ディスク |
SYSRDR SYS000 * |
|
| ADAICK パラメータ | リーダー | SYSIPT | ||
| ADARUN メッセージ | プリンタ | SYSLST | メッセージおよびコード | |
| ADAICK メッセージ | プリンタ | SYS009 | メッセージおよびコード |
* すべてのプログラマ論理ユニットを使用できます。
VSE プロシージャ（PROC）については「VSE 用のライブラリおよびファイルプロシージャの例」を参照してください。
この例については、ADAICK.X を参照してください。
* $$ JOB JNM=ADAICK,CLASS=A,DISP=D * $$ LST CLASS=A,DISP=D // JOB ADAICK * INDEX AND ADDRESS CONVERTER CHECK // EXEC PROC=ADAVvLIB // EXEC PROC=ADAVvFIL // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADAICK,MODE=SINGLE,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* ADAICK ICHECK FILE=1-3 /* /& * $$ EOJ
