このセクションでは、ADAWRK を z/OS システムで実行するために必要なジョブ制御情報について説明し、z/OS ジョブストリームの例を示します。
このドキュメントでは、次のトピックについて説明します。
| データセット | DD 名 | ストレージ | 追加情報 |
|---|---|---|---|
| アソシエータ | DDASSORn | ディスク | NOPPT パラメータが指定されている場合は不要 |
| ワーク | DDWORKRn | ディスク | クラスタニュークリアスに対して複数の WORK データセットの指定が必要 |
| ADARUN パラメータ | DDCARD | リーダー | オペレーションマニュアル |
| ADAWRK パラメータ | DDKARTE | リーダー | |
| ADARUN メッセージ | DDPRINT | プリンタ | メッセージおよびコード |
| ADAWRK メッセージ | DDDRUCK | プリンタ | メッセージおよびコード |
次の例はサマリレポートを生成します。 この例については、MVSJOBS データセットのメンバ ADAWRKJ を参照してください。
//ADAWRK JOB //* //* ADAWRK: ALL FUNCTIONS //* //WRK EXEC PGM=ADARUN //STEPLIB DD DISP=SHR,DSN=ADABAS.Vvrs.LOAD <=== ADABAS LOAD //* //DDASSOR1 DD DISP=SHR,DSN=EXAMPLE.DByyyyy.ASSOR1 <=== ASSO //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=ADAWRK,MODE=MULTI,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* //DDKARTE DD * ADAWRK SUMMARY=YES /*
次の例では、サマリレポートとトランザクションレポートが生成されます。 トランザクションレポートでは、指定した WORK データセット上のすべてのトランザクションの完全レポートが生成されます。 この例については、MVSJOBS データセットのメンバ ADAWRKT を参照してください。
//ADAWRK JOB //* //* ADAWRK: PRINT ALL RELEVANT TRANSACTIONS ON WORK //* //WRK EXEC PGM=ADARUN //STEPLIB DD DISP=SHR,DSN=ADABAS.Vvrs.LOAD <=== ADABAS LOAD //* //DDASSOR1 DD DISP=SHR,DSN=EXAMPLE.DByyyyy.ASSOR1 <=== ASSO //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=ADAWRK,MODE=MULTI,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* //DDKARTE DD * ADAWRK TRANSACTIONS=FULL /*
次の例では、サマリレポート、トランザクションレポート、ファイルレポートが生成されます。WORK データセット上のすべてのトランザクションの完全なレポートが含まれます。 ただし、ユーティリティによって処理およびレポートされるのはファイル 1、2、3、4、5、10 の WORK データセットのみです。 また、サンプル JCL にアソシエータデータセットがないことに注意してください。これは、実行に PPT を使用しないことを指定する NOPPT パラメータが指定されており、このため、アソシエータデータセットが不要であるためです。
//ADAWRK JOB //* //* ADAWRK: PRINT ALL RELEVANT TRANSACTIONS ON WORK //* //WRK EXEC PGM=ADARUN //STEPLIB DD DISP=SHR,DSN=ADABAS.Vvrs.LOAD <=== ADABAS LOAD //* //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=ADAWRK,MODE=MULTI,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* //DDKARTE DD * ADAWRK NOPPT ADAWRK FORCE=YES ADAWRK FILES=1-4,5,10 ADAWRK TRANSACTIONS=FULL ADAWRK REPORTFILE=YES /*
| ファイル | 記号名 | ストレージ | 論理ユニット | 追加情報 |
|---|---|---|---|---|
| アソシエータ | ASSOR n | ディスク | * | NOPPT パラメータが指定されている場合は不要 |
| ワーク | WORKRn | ディスク | * | クラスタニュークリアスに対して複数の WORK データセットの指定が必要 |
| ADARUN パラメータ | リーダー テープ ディスク |
SYSRDR SYS000 * |
オペレーションマニュアル | |
| ADAWRK パラメータ | リーダー | SYSIPT | ||
| ADARUN メッセージ | プリンタ | SYSLST | メッセージおよびコード | |
| ADAWRK メッセージ | プリンタ | SYS009 | メッセージおよびコード |
* 適切な論理ユニットが使われます。
次の例はサマリレポートを生成します。 この例については、メンバ ADAWRKJ.X を参照してください。
* $$ JOB JNM=ADAWRKJ,CLASS=A,DISP=D * $$ LST CLASS=A,DISP=D // JOB ADAWRKJ EXECUTE THE ADABAS UTILITY ***WRK*** // OPTION LOG,PARTDUMP * * ****************************************************************** * SAMPLE JOB STREAM TO USE THE ADABAS UTILITY ADAWRK * PRINT SUMMARY REPORT * ****************************************************************** // EXEC PROC=ADAVVLIB <====== // EXEC PROC=ADAVVFIL <====== * * ****************************************************************** * DON'T FORGET TO CUSTOMIZE PARAMETERS OF ADABAS UTILITY * ****************************************************************** // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADAWRK,MODE=MULTI,SVC=xxx,DEVICE=dddd,DBID=yyyyy <====== /* ADAWRK SUMMARY=YES <====== /* /& * $$ EOJ
次の例では、サマリレポートとトランザクションレポートが生成されます。 トランザクションレポートでは、指定した WORK データセット上のすべてのトランザクションの完全レポートが生成されます。 この例については、メンバ ADAWRKT.X を参照してください。
* $$ JOB JNM=ADAWRKT,CLASS=A,DISP=D * $$ LST CLASS=A,DISP=D // JOB ADAWRKT EXECUTE THE ADABAS UTILITY ***WRK*** // OPTION LOG,PARTDUMP * * ****************************************************************** * SAMPLE JOB STREAM TO USE THE ADABAS UTILITY ADAWRK * PRINT ALL RELEVANT TRANSACTIONS ON WORK * ****************************************************************** // EXEC PROC=ADAVVLIB <====== // EXEC PROC=ADAVVFIL <====== * * ****************************************************************** * DON'T FORGET TO CUSTOMIZE PARAMETERS OF ADABAS UTILITY * ****************************************************************** // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADAWRK,MODE=MULTI,SVC=xxx,DEVICE=dddd,DBID=yyyyy <====== /* ADAWRK TRANSACTIONS=FULL <====== /* /& * $$ EOJ
| ファイル | 記号名 | ストレージ | 追加情報 |
|---|---|---|---|
| アソシエータ | DDASSORn | ディスク | NOPPT パラメータが指定されている場合は不要 |
| ワーク | DDWORKRn | ディスク | |
| ADARUN パラメータ | DDCARD | ディスク／ 端末／ リーダー |
オペレーションマニュアル |
| ADAWRK パラメータ | DDKARTE | ディスク／ 端末／ リーダー |
|
| ADARUN メッセージ | DDPRINT | ディスク／ 端末／ プリンタ |
メッセージおよびコード |
| ADAWRK メッセージ | DDDRUCK | ディスク／ 端末／ プリンタ |
メッセージおよびコード |
次の例では、ADAWRK サマリレポートが生成されます。 この例については、配布テープで提供されているメンバ ADAWRK を参照してください。
DATADEF DDASSOR1,DSN=ADABASVv.ASSO,VOL=ASSOV1 DATADEF DDWORKR1,DSN=ADABASVv.WORK,VOL=WORKV1 DATADEF DDPRINT,DSN=ADAWRK.DDPRINT,MODE=A DATADEF DUMP,DUMMY DATADEF DDDRUCK,DSN=ADAWRK.DDDRUCK,MODE=A DATADEF DDCARD,DSN=RUNWRK.CONTROL,MODE=A DATADEF DDKARTE,DSN=ADAWRK.CONTROL,MODE=A ADARUN
このサンプル JCL に基づき、サマリレポートに使用された ADARUN パラメータが RUNWRK.CONTROL データセット（DDCARD 記号名）に保存されます。 例として、配布テープに提供されているメンバ RUNWRK を参照してください。
ADARUN PROG=ADAWRK,DEVICE=dddd,DBID=yyyyy
このサンプル JCL に基づき、サマリレポートに使用された ADAWRK パラメータが ADAWRK.CONTROL データセット（DDKARTE 記号名）に保存されます。 例として、配布テープのメンバ WRKSUMM を参照してください。
ADAWRK SUMMARY=YES
トランザクションレポートに使用される ADAWRK パラメータの例として、配布テープのメンバ WRKTRNS を参照してください。
