ログオンプロシージャーの変更

HULFT管理画面および簡易転送配信要求コマンドは、TSO配下で起動されます。

そのため、以下のライブラリを、起動前にログオンプロシージャーに定義する必要があります。

  • HULFTロードモジュールライブラリをSTEPLIBに追加

  • HULFT ISPFパネルライブラリをISPPLIBに追加

  • HULFT ISPFメッセージライブラリをISPMLIBに追加

  • HULFTパラメータライブラリをSYSPROCに追加

  • HULFTパラメータライブラリのシステム動作環境設定をXRHULINSとして追加

注意
  • LEライブラリ(例 CEE.SCEERUN)がリンクリストに登録されていない場合には、STEPLIBに追加してください。

  • VS-COBOL ⅡライブラリよりもLEライブラリが優先して探索されるように定義してください。

[ログオンプロシージャーの変更例]

//*-------------------------------------------------
//* SYSTEMPAC LOGON PROCEDURE
//* THE CLIST ISPHULFT, WHICH RESIDES IN CPAC.CMDPROC,
//*--------------------------------------------------
//IKJHULFT PROC
//IKJHULFT EXEC PGM=IKJEFT01,DYNAMNBR=256,PARM=ISPHULFT
//STEPLIB  DD DISP=SHR,DSN=CEE.SCEERUN
//         DD DISP=SHR,DSN=EWX.SEWXLMOD
//         DD DISP=SHR,DSN=TCPIP.SEZAMIG
//         DD DISP=SHR,DSN=HULFT.LOAD
//SYSPROC  DD DISP=SHR,DSN=CPAC.CMDPROC
//SYSHELP  DD DISP=SHR,DSN=SYS1.HELP
//SYSLBC   DD DISP=SHR,DSN=SYS1.BRODCAST
//SYSUADS  DD DISP=SHR,DSN=SYS1.UADS
//SYSTSPRT DD TERM=TS,SYSOUT=*
//SYSPRINT DD TERM=TS,SYSOUT=*
//SYSTERM  DD TERM=TS,SYSOUT=*
//SYSIN    DD TERM=TS
//*

DD名

項目名

説明

STEPLIB

HULFT.LOAD

HULFTロードモジュールライブラリ

[コマンドプロシージャーの変更例]

PROC 0 PANEL()
/*                                                                   */
/*LIB: CPAC.CMDPROC(ISPHULFT)                                        */
/*DOC: THIS CLIST ALLOCATES THE FILES REQUIRED BY ISPF AND PDF       */
/*     AND THEN INVOKES PDF.                                         */
/*                                                                   */
/*NOTE: SYSPROC IS FREED AND REALLOCATED TO INCLUDE THE PDF CLIST    */
/*      DATASET. THIS MAY RESULT IN A DIFFERENT CONCATENATION        */
/*      THAN EXISTED BEFORE THIS CLIST WAS INVOKED.                  */
/*                                                                   */
CONTROL NOFLUSH NOMSG MAIN
PROFILE MODE WTPMSG MSGID
FREE FILE(ISPLLIB,ISPPLIB,ISPMLIB,ISPTLIB,ISPSLIB, +
             ISPPROF,ISPTABL,SMPTABL,IPCSPARM,ISPPALT,ISPMALT)
FREE FI(SYSPROC)
ALLOC FI(SYSPROC) SHR DA( +
                         'CPAC.CMDPROC'                               +
                         'SYS1.V2R6M0.SIATCLI0'                       +
                         'EZM.SEZMCLST'                               +
                         'HULFT.PARMLIB')
ALLOC FI(ISPPLIB) SHR DA(  +
                         'CPAC.ISPPLIB'                               +
                         'SYS1.SERBPJPN'                              +
                         'SYS1.SERBPENU'                              +
                         'SYS1.SEDGPJPN'                              +
                         'ISP.SISPPJPN'                               +
                         'ISP.SISPPENU'                               +
                         'ISF.SISFPLIB'                               +
                         'HULFT.PANEL')
ALLOC FI(ISPMLIB) SHR DA(  +
                         'SYS1.SERBMJPN'                              +
                         'SYS1.SERBMENU'                              +
                         'ISP.SISPMJPN'                               +
                         'ISP.SISPMENU'                               +
                         'ISF.SISFMLIB'                               +
                         'SYS1.SCBDMJPN'                              +
                         'HULFT.MSG')
                               :
                               :
                               :
FREE FI(XRHULINS)
ALLOC FI(XRHULINS) SHR DA('HULFT.PARMLIB(HULPRM)')
ERROR RETURN
PDF &PNL

ファイル名

項目名

説明

SYSPROC

HULFT.PARMLIB

HULFTパラメータライブラリ(導入先ファイル)

ISPPLIB

HULFT.PANEL

HULFT ISPFパネルライブラリ

ISPMLIB

HULFT.MSG

HULFT ISPFメッセージライブラリ

XRHULINS

HULFT.PARMLIB(HULPRM)

システム動作環境設定ファイル