ここでは、BS2000、z/OS、z/VM、および VSE システムにおける ADAMER の実行に必要なジョブ制御情報について説明し、各ジョブストリームの例を示します。
このドキュメントでは、次のトピックについて説明します。
| データセット | リンク名 | ストレージ | 追加情報 |
|---|---|---|---|
| 入力データ | DDEBAND | テープ／ディスク | ADACMP または ADAULD ユーティリティの出力 |
| ADARUN パラメータ | DDCARD | オペレーションマニュアル | |
| ADAMER パラメータ | SYSDTA/ DDKARTE | ||
| ADARUN メッセージ | SYSOUT/ DDPRINT | メッセージおよびコード | |
| ADAMER メッセージ／レポート | SYSLST/ DDDRUCK | メッセージおよびコード |
/.ADALOD LOGON /MODIFY-TEST-OPTIONS DUMP=YES /REMARK * /REMARK * A D A M E R ALL FUNCTIONS /REMARK * /ASS-SYSLST L.MER /ASS-SYSDTA *SYSCMD /SET-FILE-LINK DDLIB,ADAvrs.MOD /SET-FILE-LINK DDASSOR1,ADAyyyyy.ASSO,SHARE-UPD=YES /SET-FILE-LINK DDEBAND,CMP.AUS /START-PROGRAM *M(ADA.MOD,ADARUN),PR-MO=ANY ADARUN PROG=ADAMER,DB=yyyyy,IDTNAME=ADABAS5B ADAMER ADAMDE=AA,DATASIZE=5200,BITRANGE=8,10,1 ADAMER MAXISN=10000 /LOGOFF SYS-OUTPUT=DEL
/.ADAMER LOGON /OPTION MSG=FH,DUMP=YES /REMARK * /REMARK * A D A M E R ALL FUNCTIONS /REMARK * /SYSFILE SYSLST=L.MER /FILE ADA.MOD,LINK=DDLIB /FILE CMP.AUS,LINK=DDEBAND /EXEC (ADARUN,ADA.MOD) ADARUN PROG=ADAMER,DB=yyyyy,IDTNAME=ADABAS5B ADAMER ADAMDE=AA,DATASIZE=5200,BITRANGE=8,10,1 ADAMER MAXISN=10000 /LOGOFF NOSPOOL
| データセット | DD 名 | ストレージ | 追加情報 |
|---|---|---|---|
| 入力データ | DDEBAND | テープ／ディスク | ADACMP または ADAULD ユーティリティの出力 |
| ADARUN パラメータ | DDCARD | リーダー | オペレーションマニュアル |
| ADAMER パラメータ | DDKARTE | リーダー | |
| ADARUN メッセージ | DDPRINT | プリンタ | メッセージおよびコード |
| ADAMER メッセージ／レポート | DDDRUCK | プリンタ | メッセージおよびコード |
この例については、MVSJOBS データセットの ADAMER を参照してください。
//ADAMER JOB //* //* ADAMER: //* ADAM ESTIMATION //* //MER EXEC PGM=ADARUN //STEPLIB DD DISP=SHR,DSN=ADABAS.Vvrs.LOAD <=== ADABAS LOAD //* //DDEBAND DD DISP=OLD,DSN=EXAMPLE.DByyyyy.COMPR1 <=== COMPRESS DATA //DDDRUCK DD SYSOUT=X //DDPRINT DD SYSOUT=X //SYSUDUMP DD SYSOUT=X //DDCARD DD * ADARUN PROG=ADAMER,MODE=MULTI,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* //DDKARTE DD * ADAMER MAXISN=1000,ADAMDE=AA,BITRANGE=0,2,4 ADAMER DATADEV=eeee,DATAPFAC=10,DATASIZE=100,175,25 /*
| データセット | DD 名 | ストレージ | 追加情報 |
|---|---|---|---|
| 入力データ | DDEBAND | テープ／ディスク | ADACMP または ADAULD ユーティリティの出力 |
| ADARUN パラメータ | DDCARD | ディスク／端末／リーダー | オペレーションマニュアル |
| ADAMER パラメータ | DDKARTE | ディスク／端末／リーダー | |
| ADARUN メッセージ | DDPRINT | ディスク／端末／プリンタ | メッセージおよびコード |
| ADAMER メッセージ／レポート | DDDRUCK | ディスク／端末／プリンタ | メッセージおよびコード |
DATADEF DDEBAND,DSN=ADABASVv.BAND,MODE=A DATADEF DDPRINT,DSN=ADAMER.DDPRINT,MODE=A DATADEF DUMP,DUMMY DATADEF DDDRUCK,DSN=ADAMER.DDDRUCK,MODE=A DATADEF DDCARD,DSN=RUNMER.CONTROL,MODE=A DATADEF DDKARTE,DSN=ADAMER.CONTROL,MODE=A ADARUN
ADARUN PROG=ADAMER,DEVICE=dddd,DB=yyyyy
ADAMER ADAMDE=AA,DATASIZE=5200,BITRANGE=8,10,1 ADAMERMAXISN=10000
| ファイル | シンボル 名前 | ストレージ | 論理ユニット | 追加情報 |
|---|---|---|---|---|
| 入力データ | EBAND | テープ ディスク |
SYS010 * |
ADACMP または ADAULD ユーティリティの出力 |
| ADARUN パラメータ | - CARD CARD |
リーダー テープ ディスク |
SYSRDR SYS000 * |
オペレーションマニュアル |
| ADAMER パラメータ | - | リーダー | SYSIPT | |
| ADARUN メッセージ | - | プリンタ | SYSLST | メッセージおよびコード |
| ADAMER メッセージ／レポート | - | プリンタ | SYS009 | メッセージおよびコード |
* すべてのプログラマ論理ユニットを使用できます。
VSE プロシージャ（PROC）の内容については、「VSE 用のライブラリおよびファイルプロシージャの例」を参照してください。 この例については、メンバ ADAMER.X を参照してください。
* $$ JOB JNM=ADAMER,CLASS=A,DISP=D * $$ LST CLASS=A,DISP=D // JOB ADAMER // OPTION LOG,PARTDUMP * ADAM ESTIMATION // EXEC PROC=ADAVvLIB // EXEC PROC=ADAVvFIL // DLBL EBAND,'EXAMPLE.DByyyyy.COMPR1',0,SD // EXTENT SYS004 // ASSGN SYS004,DISK,VOL=DISK01,SHR // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADAMER,MODE=MULTI,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* ADAMER MAXISN=1000,ADAMDE=AA,BITRANGE=0,2,4 ADAMER DATADEV=eeee,DATAPFAC=10,DATASIZE=100,175,25 /* /& * $$ EOJ
