%REPRO 拡張

%REPRO 拡張は、IDCAMS を呼び出す EXEC 文の PARM キーワードおよび PARM コマンドで指定できます。構文は次のとおりです。

%REPRO(VSAM | VSAMLAX | OSCOPY | OSCOPYLAX)

%REPRO(VSAM) は、通常の REPRO ホストに互換性のある動作を提供します。これがデフォルトです。この場合、たとえば、KSDS に対して REPRO を指定する場合、順番に並んでいないレコードはエラーとしてフラグ付けされます。
%REPRO(VSAMLAX) は、Micro Focus の緩和された REPRO 動作を提供します。この場合、たとえば、KSDS に対して REPRO を指定する場合、順番に並んでいないレコードには情報メッセージが表示されます。
%REPRO(OSCOPY) は、オペレーティングシステムの「ファイルコピー」機能を使用して、基本的な PC ファイルをコピーしようとします。%REPRO(OSCOPY) の速度は %REPRO(VSAM) よりも速く、次の表に示すように、入力データセットのデータセット属性が、出力データセットの属性と一致する場合のみ実行されます。行われた操作を示す情報メッセージが常に発行されます。
%REPRO(OSCOPYLAX) は %REPRO(OSCOPY) と同じです。ただし、一部の属性が一致しない場合でも、オペレーティングシステムの「ファイルコピー」機能を使用して基本的な PC ファイルをコピーします。次の表は、各コマンドオプションで一致する必要がある属性を示しています。表の下部の属性 (CHARSET、EXTENDED-TYPE、REUSE/NOREUSE、UNIQUEKEY/NONUNIQUEKEY) が一致しない場合、メッセージは発行されますが、オペレーティングシステムの「ファイルコピー」は引き続き行われます。

属性	一致する必要があるコマンドオプション
RECFM	OSCOPY および OSCOPYLAX
DSORG	OSCOPY および OSCOPYLAX
VSAM-KEY-OFFSET	OSCOPY および OSCOPYLAX
VSAM-KEY-LENGTH	OSCOPY および OSCOPYLAX
LRECL	OSCOPY および OSCOPYLAX
LRECL-MAX (システム管理)	OSCOPY および OSCOPYLAX
LRECL-MIN (システム管理)	OSCOPY および OSCOPYLAX
CHARSET (EBCDIC または ASCII)	OSCOPY
EXTENDED-TYPE (システム管理。基本のクラスター、AIX などを示す)	OSCOPY
REUSE/NOREUSE	OSCOPY
UNIQUEKEY/NONUNIQUEKEY (AIX および PATH 用)	OSCOPY

次に例を示します。

//STEPAMS  EXEC PGM=IDCAMS,PARM=';MFE:%REPRO(OSCOPY)'
//SYSPRINT  DD SYSOUT=*
//VSAMDATA  DD *
AA
BBB
//SYSIN  DD *
  PARM ;MFE: %REPRO(VSAM)
  /* Next REPRO will use normal REPRO */ 
  REPRO  IFILE (VSAMDATA)                          -
         ODS   (MFIDSA.REPROOS.KSDS1)
  PARM ;MFE: %REPRO(OSCOPY)
  /* All REPRO(s), until another PARM command specifies –
     otherwise, will use OS copy if possible */
  REPRO  IDS   (MFIDSA.REPROOS.KSDS1)              -
         ODS   (MFIDSA.REPROOS.KSDS2)

拡張はセミコロンの後に続くため、メインフレームではコメントとして表示されます。ただし、拡張が PARM コマンドの唯一のオプションである場合、メインフレームではエラーが報告されます。この問題を回避するには、拡張以外にオプションを 1 つ以上コーディングする必要があります。たとえば、上記の例のように厳密にコーディングするのではなく、次のようにします。

PARM='MAR(2,72);MFE: %REPRO(OSCOPY)'

あるいは、次のようなコーディングも可能です。

PARM   MAR(2,72);MFE: %REPRO(OSCOPY)