バージョン 8.1.3
 —  ユーティリティ  —

JCL/JCS の必要項目と指定例

ここでは、BS2000、z/OS、z/VM、および VSE システムにおける ADAACK の実行に必要なジョブ制御情報について説明し、各ジョブストリームの例を示します。

このドキュメントでは、次のトピックについて説明します。


BS2000

データセット リンク名 ストレージ 追加情報
アソシエータ DDASSORn ディスク  
データストレージ DDDATARn ディスク  
ADARUN パラメータ DDCARD   オペレーションマニュアル
ADAACK パラメータ SYSDTA/ DDKARTE    
ADARUN メッセージ SYSOUT DDPRINT   メッセージおよびコード
ADAACK メッセージ SYSLST DDDRUCK   メッセージおよびコード

ADAACK JCL の例(BS2000)

SDF フォーマットの場合:

/.ADAACK LOGON
/MODIFY-TEST-OPTIONS DUMP=YES
/REMARK *
/REMARK * A D A A C K ADDRESS CONVERTER CHECK
/REMARK *
/REMARK *
/ASS-SYSLST L.ACK.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=ADAACK,DB=yyyyy,IDTNAME=ADABAS5B
ADAACK ACCHECK FILE=ffff
/LOGOFF SYS-OUTPUT=DEL

ISP フォーマットの場合:

/.ADAACK LOGON
/OPTION MSG=FH,DUMP=YES
/REMARK *
/REMARK * A D A A C K ADDRESS CONVERTER CHECK
/REMARK *
/REMARK *
/SYSFILE SYSLST=L.ACK.DATA
/FILE ADAvrs.MOD ,LINK=DDLIB
/FILE ADAyyyyy.ASSO ,LINK=DDASSOR1,SHARUPD=YES
/FILE ADAyyyyy.DATA ,LINK=DDDATAR1,SHARUPD=YES
/EXEC (ADARUN,ADA.MOD)
ADARUN PROG=ADAACK,DB=yyyyy,IDTNAME=ADABAS5B
ADAACK ACCHECK FILE=ffff
/LOGOFF NOSPOOL

Top of page

z/OS

データセット DD 名 ストレージ 追加情報
アソシエータ DDASSORn ディスク  
データストレージ DDDATARn ディスク  
ADAACK メッセージ DDDRUCK プリンタ メッセージおよびコード
ADARUN メッセージ DDPRINT プリンタ メッセージおよびコード
ADARUN パラメータ DDCARD リーダー オペレーションマニュアル
ADAACK パラメータ DDKARTE リーダー  

ADAACK JCL の例(z/OS)

//ADAACK    JOB
//*
//*   ADAACK:
//*      ADDRESS CONVERTER CHECK
//*
//ACK       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=ADAACK,SVC=xxx,DEVICE=dddd,DBID=yyyyy
/*
//DDKARTE   DD   *
ADAACK ACCHECK FILE=ffff
/*

この例については、MVSJOBS データセットの ADAACK を参照してください。

Top of page

z/VM

データセット DD 名 ストレージ 追加情報
アソシエータ DDASSORn ディスク  
データストレージ DDDATARn ディスク  
ADAACK メッセージ DDDRUCK ディスク/端末/プリンタ メッセージおよびコード
ADARUN メッセージ DDPRINT ディスク/端末/プリンタ メッセージおよびコード
ADARUN パラメータ DDCARD ディスク/端末/リーダー オペレーションマニュアル
ADAACK パラメータ DDKARTE ディスク/端末/リーダー  

ADAACK JCL の例(z/VM)

DATADEF DDASSOR1,DSN=ADABASVv.ASSO,VOL=ASSOV1
DATADEF DDDATAR1,DSN=ADABASVv.DATA,VOL=DATAV1
DATADEF DDPRINT,DSN=ADAACK.DDPRINT,MODE=A
DATADEF DUMP,DUMMY
DATADEF DDDRUCK,DSN=ADAACK.DDDRUCK,MODE=A
DATADEF DDCARD,DSN=RUNACK.CONTROL,MODE=A
DATADEF DDKARTE,DSN=ADAACK.CONTROL,MODE=A
ADARUN 

RUNACK CONTROL A1 の内容

ADARUN PROG=ADAACK,DEVICE=dddd,DB=yyyyy

ADAACK CONTROL A1 の内容

ADAACK ACCHECK FILE=ffff 

Top of page

VSE

ファイル 記号名 ストレージ 論理ユニット 追加情報
アソシエータ ASSORn ディスク *   
データストレージ DATARn ディスク *   
ADAACK メッセージ   プリンタ SYS009  メッセージとコード
ADARUN メッセージ    プリンタ SYSLST  メッセージとコード
ADARUN パラメータ   リーダー
テープ
ディスク
SYSRDR
SYS000
*
  
ADAACK パラメータ   リーダー SYSIPT   

* すべてのプログラマ論理ユニットを使用できます。

ADAACK JCS の例(VSE)

VSE プロシージャ(PROC)については「VSE 用のライブラリおよびファイルプロシージャの例」を参照してください。

* $$ JOB JNM=ADAACK,CLASS=A,DISP=D
* $$ LST CLASS=A,DISP=D
*       ADDRESS CONVERTER CHECK
// JOB ADAACK
// EXEC PROC=ADAVvLIB
// EXEC PROC=ADAVvFIL
// EXEC ADARUN,SIZE=ADARUN
ADARUN PROG=ADAACK,SVC=xxx,DEVICE=dddd,DBID=yyyyy
/*
ADAACK ACCHECK FILE=27
/*
/&
* $$ EOJ

この例については、メンバ ADAACK.X を参照してください。

Top of page