外字テーブルの使用方法

作成した外字テーブルの使用方法について記述します。外字テーブルを使用するためには、コード変換するプログラムの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要求接続アプリケーション名