外字テーブルの使用方法
作成した外字テーブルの使用方法について記述します。外字テーブルを使用するためには、コード変換するプログラムのJCLにXREXTLIBをDUMMY指定で記述する必要があります。
【JCL例1】
配信側変換でワークファイル転送を行う場合、外字テーブルを使用するための配信要求プログラムのJCLは以下のとおりです。
\ JOB XRSNDGO,LIST=(A,JS) \XRSNDGO EX XRSNDGO,RSIZE=4096K \ FD STEPCAT=DA,FILE=USERCAT \ FD XREXTLIB=DUMMY \ FD XRSYSIN=DA,FILE=HULFT.PARMLIB,MEMBER=HULPRM \ FD XRFILE=DA,FILE=HULFT.FILE,AMP=AMORG \ FD XRHOST=DA,FILE=HULFT.HOST,AMP=AMORG \ FD XRQUE=DA,FILE=HULFT.QUEUE,AMP=AMORG \ FD LIST=DA,VOL=WORK,TRK=(10,10),SOUT=A \ FD XRCRD=* FILE-ID=TEST \ JEND
FD名 |
項目名 |
説明 |
---|---|---|
STEPCAT |
USERCAT |
カタログ簿データセット名 |
XRSYSIN |
HULFT.PARMLIB(HULPRM) |
システム動作環境設定ファイル |
XRFILE |
HULFT.FILE |
集配信管理ファイル |
XRHOST |
HULFT.HOST |
詳細ホスト情報ファイル |
XRQUE |
HULFT.QUEUE |
配信制御ファイル |
外字テーブルを利用する場合はXREXTLIBのFD文を定義してください。
【JCL例2】
配信側変換でダイレクト転送を行う場合、外字テーブルを使用するための配信プログラムのJCLは以下のとおりです。
/ DEFINE HULSND,RSIZE=16M,MODE='WARM' \ CODE HLS \ JOB HULSND,PSW=STAR \HULSND EX XRSND,RSIZE=\RSIZE,WTYP=2,CMND=(S,J), C KEY=ZERO,TIME=8388607,OPT=DUMP \* PARA MODE=\MODE \ FD STEPCAT=DA,FILE=USERCAT \ FD XREXTLIB=DUMMY \ FD XRLOG=DA,FILE=HULFT.LOG,AMP=AMORG \ FD XRLOG1=DA,FILE=HULFT.LOG.PATH1,AMP=AMORG \ FD XRLOG2=DA,FILE=HULFT.LOG.PATH2,AMP=AMORG \ FD XRFILE=DA,FILE=HULFT.FILE,AMP=AMORG \ FD XRHOST=DA,FILE=HULFT.HOST,AMP=AMORG \ FD XRQUE=DA,FILE=HULFT.QUEUE,AMP=AMORG \ FD XRSYSIN=DA,FILE=HULFT.PARMLIB,MEMBER=HULPRM \ FD SYSUDUMP=DA,VOL=WORK,TRK=(10,10),SOUT=A \ FIN / DEFEND
FD名 |
項目名 |
説明 |
---|---|---|
STEPCAT |
USERCAT |
カタログ簿データセット名 |
XRLOG |
HULFT.LOG |
集配信履歴ファイルIDキーファイル |
XRLOG1 |
HULFT.LOG.PATH1 |
集配信履歴ホスト名キーファイル |
XRLOG2 |
HULFT.LOG.PATH2 |
集配信履歴日付キーファイル |
XRFILE |
HULFT.FILE |
集配信管理ファイル |
XRHOST |
HULFT.HOST |
詳細ホスト情報ファイル |
XRQUE |
HULFT.QUEUE |
配信制御ファイル |
XRSYSIN |
HULFT.PARMLIB(HULPRM) |
システム動作環境設定ファイル |
外字テーブルを利用する場合はXREXTLIBのFD文を定義してください。
【JCL例3】
集信側変換を行う場合、外字テーブルを使用するための集信プログラムのJCLは以下のとおりです。
/ DEFINE HULRCV,RSIZE=16M \ CODE HLR \ JOB HULRCV,PSW=STAR \HULRCV EX XRRCV,RSIZE=\RSIZE,WTYP=2,CMND=(S,J), C KEY=ZERO,TIME=8388607,OPT=DUMP \* PARA MAX-CON=16,APPLNM=HULRCV,RCVRETRY=0,RCVRTIME=0, C JOBWTIME=15,RECCHK,RWAIT \ FD STEPCAT=DA,FILE=USERCAT \ FD XREXTLIB=DUMMY \ FD XRLOG=DA,FILE=HULFT.LOG,AMP=AMORG \ FD XRLOG1=DA,FILE=HULFT.LOG.PATH1,AMP=AMORG \ FD XRLOG2=DA,FILE=HULFT.LOG.PATH2,AMP=AMORG \ FD XRFILE=DA,FILE=HULFT.FILE,AMP=AMORG \ FD XRHOST=DA,FILE=HULFT.HOST,AMP=AMORG \ FD XRQUE=DA,FILE=HULFT.QUEUE,AMP=AMORG \ FD XRSYSIN=DA,FILE=HULFT.PARMLIB,MEMBER=HULPRM \ FD SYSUDUMP=DA,VOL=WORK,TRK=(10,10),SOUT=A \ FIN / DEFEND
FD名 |
項目名 |
説明 |
---|---|---|
STEPCAT |
USERCAT |
カタログ簿データセット名 |
XRLOG |
HULFT.LOG |
集配信履歴ファイルIDキーファイル |
XRLOG1 |
HULFT.LOG.PATH1 |
集配信履歴ホスト名キーファイル |
XRLOG2 |
HULFT.LOG.PATH2 |
集配信履歴日付キーファイル |
XRFILE |
HULFT.FILE |
集配信管理ファイル |
XRHOST |
HULFT.HOST |
詳細ホスト情報ファイル |
XRQUE |
HULFT.QUEUE |
配信制御ファイル |
XRSYSIN |
HULFT.PARMLIB(HULPRM) |
システム動作環境設定ファイル |
外字テーブルを利用する場合はXREXTLIBのFD文を定義してください。
【JCL例4】
送信要求を受け付けて配信側変換でワークファイル転送する場合、またはHULFT Managerから配信要求を受け付けて配信側変換でワークファイル転送を行う場合、外字テーブルを使用するための要求受付プログラムのJCLは以下のとおりです。
/ DEFINE HULSRV,RSIZE=20M \ CODE HLA \ JOB HULSRV,PSW=STAR \HULSRV EX XRACCPT,RSIZE=\RSIZE,WTYP=2,CMND=(S,J), C KEY=ZERO,TIME=8388607,OPT=DUMP \* PARA MAX-CON=16,APPLNM=HULSRV \ FD STEPCAT=DA,FILE=USERCAT \ FD XREXTLIB=DUMMY \ FD XRFILE=DA,FILE=HULFT.FILE,AMP=AMORG \ FD XRHOST=DA,FILE=HULFT.HOST,AMP=AMORG \ FD XRLOG=DA,FILE=HULFT.LOG,AMP=AMORG \ FD XRLOG1=DA,FILE=HULFT.LOG.PATH1,AMP=AMORG \ FD XRLOG2=DA,FILE=HULFT.LOG.PATH2,AMP=AMORG \ FD XRQUE=DA,FILE=HULFT.QUEUE,AMP=AMORG \ FD XRSYSIN=DA,FILE=HULFT.PARMLIB,MEMBER=HULPRM \ FD INDD=DA,FILE=HULFT.PARMLIB,MEMBER=HULAPT \ FD XRPASSWD=DUMMY \ FD LIST=DUMMY \ FD SYSUDUMP=DA,VOL=WORK,TRK=(10,10),SOUT=A \ FIN / DEFEND
FD名 |
項目名 |
説明 |
---|---|---|
STEPCAT |
USERCAT |
カタログ簿データセット名 |
XRFILE |
HULFT.FILE |
集配信管理ファイル |
XRHOST |
HULFT.HOST |
詳細ホスト情報ファイル |
XRLOG |
HULFT.LOG |
集配信履歴ファイルIDキーファイル |
XRLOG1 |
HULFT.LOG.PATH1 |
集配信履歴ホスト名キーファイル |
XRLOG2 |
HULFT.LOG.PATH2 |
集配信履歴日付キーファイル |
XRQUE |
HULFT.QUEUE |
配信制御ファイル |
XRSYSIN |
HULFT.PARMLIB(HULPRM) |
システム動作環境設定ファイル |
INDD |
HULFT.PARMLIB(HULAPT) |
要求受付定義ファイル |
外字テーブルを利用する場合はXREXTLIBのFD文を定義してください。
【JCL例5】
結合ファイルを分解する場合、外字テーブルを使用するためのファイル分解プログラムのJCLは以下のとおりです。
\ JOB XRBREAK,LIST=(A,JS) \XRBREAK EX XRBREAK,RSIZE=4096K \ FD STEPCAT=DA,FILE=USERCAT \ FD XRJOIN=DA,FILE=HULFT.JOIN.FILE \ FD XROUT=DA,FILE=HULFT.DATA(DATA1) \ FD XRSYSIN=DA,FILE=HULFT.PARMLIB,MEMBER=HULPRM \ FD SYSOUT=DA,TRK=(10,10),VOL=WORK,SOUT=A \ FD XREXTLIB=DA,FILE=HULFT.LOAD \ FD XRCRD=* TGTFILE="HULFT.TXT",FD=XROUT,REP \ JEND
FD名 |
項目名 |
説明 |
---|---|---|
STEPCAT |
USERCAT |
カタログ簿データセット名 |
XRJOIN |
HULFT.JOIN.FILE |
結合ファイル |
XRSYSIN |
HULFT.PARMLIB(HULPRM) |
システム動作環境設定ファイル |
XREXTLIB |
HULFT.LOAD |
HULFTロードモジュールライブラリ(*1) |
*1 |
: |
外字テーブル利用時に設定が必要 |
XRBREAKで外字テーブルを使用する場合は、XREXTLIBにHULFTのロードモジュールライブラリを指定する必要があります。
【ジョブ制御マクロ】
HULFT管理画面から配信側変換でワークファイル転送する場合、外字テーブルを使用するためのHULFT管理画面の起動PROCは以下のとおりです。
PROC 0 CONTROL MSG FLUSH LIST ALLOCATE FILE(XRFILE) DSNAME('HULFT.FILE') SHR ALLOCATE FILE(XRHOST) DSNAME('HULFT.HOST') SHR ALLOCATE FILE(XRLOG) DSNAME('HULFT.LOG') SHR ALLOCATE FILE(XRLOG1) DSNAME('HULFT.LOG.PATH1') SHR ALLOCATE FILE(XRLOG2) DSNAME('HULFT.LOG.PATH2') SHR ALLOCATE FILE(XRQUE) DSNAME('HULFT.QUEUE') SHR ALLOCATE FILE(XRSYSIN) DSNAME('HULFT.PARMLIB(HULPRM)') SHR ALLOCATE FILE(XREXTLIB) DUMMY PFDEXEC SELECT PGM(XRMENU2) PARM(HULCON) FREE FILE(XRFILE XRHOST XRLOG XRLOG1 XRLOG2 XRQUE XRSYSIN XREXTLIB) END
FD名 |
項目名 |
説明 |
---|---|---|
XRFILE |
HULFT.FILE |
集配信管理ファイル |
XRHOST |
HULFT.HOST |
詳細ホスト情報ファイル |
XRLOG |
HULFT.LOG |
集配信履歴ファイルIDキーファイル |
XRLOG1 |
HULFT.LOG.PATH1 |
集配信履歴ホスト名キーファイル |
XRLOG2 |
HULFT.LOG.PATH2 |
集配信履歴日付キーファイル |
XRQUE |
HULFT.QUEUE |
配信制御ファイル |
XRSYSIN |
HULFT.PARMLIB(HULPRM) |
システム動作環境設定ファイル |
外字テーブルを利用する場合はXREXTLIBのFD文を定義してください。
パラメータ名 |
項目名 |
説明 |
---|---|---|
PARM |
HULCON |
TISP要求接続アプリケーション名 |