配布後スクリプト機能を有効にするには、プロセッサを更新してスクリプト出力データ セットを作成するステップを追加する必要があります。
次の手順に従ってください:
例: 配布後スクリプトを実行する CICS NEW COPY スクリプトの作成
以下に、パッケージでプロセッサが実行された場合に CICS フェーズイン リクエストを作成するコード サンプルを示します。 この例の &CICSREGN シンボルは、配布時に置き換えられます。
//*************************************************************** //* CREATE CICS NEW COPY SCRIPT //*************************************************************** //PKGCHK IF &C1PKGID NE "" THEN * ONLY IF PACKAGE EXEC //SCRIPCP EXEC PGM=IEBGENER,MAXRC=0 //SYSPRINT DD SYSOUT=* //SYSIN DD DUMMY //SYSUT2 DD DISP=SHR,MONITOR=&MONITOR,FOOTPRNT=CREATE, // DSN=&DSPREFIX.CICSNEWC(&C1ELEMENT) //SYSUT1 DD DATA,DLM=## /*VS,'F &CICSREGN,CEMT SET PRO(&C1ELEMENT),PHASEIN' ## //PKGCHKX ENDIF
|
Copyright © 2013 CA.
All rights reserved.
|
|