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

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) | システム動作環境設定ファイル