＃DDMのパラメータについて
4:Re:＃DDMのパラメータについて
温泉好きのうさぎ 11/17 18:40
私もいろいろ調べましたが、#DDMでカンパニを指定するパラメータは見つけることができませんでした。
しかし、どうしてもJCLで処理をされたいというのであれば、グローバルの作業用中間ファイルを利用することによって可能です。

入力側、出力側それぞれのローカルファイルからグローバルファイルにデータを移しておき、そこで入力側から出力側に併合をかけた後、出力側のローカルファイルに戻すというやり方です。

バラメータを説明する上で以下のカンパニおよびファイル名とします。
(1) 入力側：CID=AA、ファイル名=XXXDDF
(2) 出力側：CID=BB、ファイル名=XXXDDF
(3) 作業用１：CID=なし、ファイル名=YYYDDF　((1)と同一アロケート条件)
(4) 作業用２：CID=なし、ファイル名=ZZZDDF　((2)と同一アロケート条件)


/RUN #FLCNV;
IDE=MSD_ICI=AA_IFI=XXXDDF_IGN=_IFO=PROTECT_
ODE=MSD_OCI=_OFI=YYYDDF_OGN=_LST=NO_ERR=ABORT_
MOD=CREATE_AMD=PHYSICAL_CMD=BOTH_GTR=_
DEL=YES_CLR=NO_OUT=_RNG=_SEL=_SAV=_NXT=_
/> ;
/RUN #FLCNV;
IDE=MSD_ICI=BB_IFI=XXXDDF_IGN=_IFO=PROTECT_
ODE=MSD_OCI=_OFI=ZZZDDF_OGN=_LST=NO_ERR=ABORT_
MOD=CREATE_AMD=PHYSICAL_CMD=BOTH_GTR=_
DEL=YES_CLR=NO_OUT=_RNG=_SEL=_SAV=_NXT=_
/> ;
/RUN #DDM;
FNC=DIC_DEV=MSD_FIL=ZZZDDF_ACT=MERGE_IDE=MSD_IFI=YYYDDF_
MOD=COPY_TNM=!_ACT=999_FNC=END_
/> ;
/RUN #FLCNV;
IDE=MSD_ICI=_IFI=ZZZDDF_IGN=_IFO=PROTECT_
ODE=MSD_OCI=BB_OFI=XXXDDF_OGN=_LST=NO_ERR=ABORT_
MOD=CREATE_AMD=PHYSICAL_CMD=BOTH_GTR=_
DEL=YES_CLR=NO_OUT=_RNG=_SEL=_SAV=_NXT=_
/> ;



#FLCNVの物理モードを使って、DDFのデータをコピーするというのがポイントです。#FLCNVであれば、カンパニを指定するのは容易なことです。
なお、論理モードでもコピーは可能なようですが、DDFは通常のデータファイルではありませんので万全を期すために、AMD=PHYSICALとDEL=YESの指定をお勧めします。


また、この中間ファイルをアロケートしたり、ディアロケートするパラメータを前後に付加しておくとよいでしょう。

前次1-新書板
BluesBB ©Sting_Band