TV (テープから VSAM)

目的

テープ・レコードを VSAM データ・セットにコピーします。

使用上の注意

この機能を使用して、テープ・レコードを VSAM データ・セットにコピーします。この機能を使用して、複数ファイル・テープを、ネットワーク中に配布できる、単一 VSAM ESDS (テープ・イメージ・ファイル) に変換することもできます。詳しくは、ネットワーク経由でのテープ・データのコピーを参照してください。

複数のファイルを指定し、テープ・ファイル ID と開始位置は指定しないでください。File Manager は、テープ・マークを、「FILEMTMFILEMTM…」を含んでいる特殊レコードに変換します。VT (VSAM からテープ) 機能を使用してファイルをテープへ復元するときに、File Manager は、特殊レコードを変換してテープ・マークに戻します。作成されたテープは、元のテープの完全なコピーです。

テープの DD 名を指定します。

オプション

入力データのレコード・フォーマットとレコード長、およびコピーする最初のレコードの位置を指定することができます。コピーするレコード数を指定することや、出力データ・セットの中の既存のレコードを置き換えるかどうかを指定することもできます。

関連機能

DSC: データ・セットを別のデータ・セットにコピーします。
TS: テープ・データをデータ・セットにコピーします。
VT: VSAM データ・セットをテープにコピーします。

図 1. Syntax

ddname

DD または TSO ALLOC ステートメントを参照します。デフォルトは VSAMOUT (出力用) です。

dsname

VSAM データ・セットの名前。

LABEL=BLP

ラベル迂回処理の使用を指定します。このパラメーターは、テープを使用する最初の File Manager 機能で指定する必要があります。BLP の処理要件については、「Customizing the Security Environment」の『File Manager for z/OS Customization Guide』を参照してください。

nfiles

コピーするテープ・ファイルの数。最大は 99 999 であり、デフォルトは 1 です。

EOV: 2 つのテープ・マークまたは EOV ラベルに達するまでファイルをコピーします。
EOD: SET 機能の EOD パラメーターで指定した区切り文字に達するまで、ファイルをコピーします。

このパラメーターを使用して、マルチファイル・テープをテープ・マークも含めて単一の VSAM 入力順データ・セットにコピーします(VSAM ファイルをテープ・マークも含めてテープにコピーして戻す場合は、VT 機能が使用できます)。詳しくは、ネットワーク経由でのテープ・データのコピーを参照してください。

nlrecs

コピーするレコード数、または ALL。最大数は 99 999 999 です。ALL を指定するか、このパラメーターを省略すると、残りのすべてのレコードがコピーされます。

recfmin

入力のレコード・フォーマット。それぞれの値は、以下の文字の組み合わせです。

B: ブロック化
D: 可変長 ISO/ANSI テープ・レコード
F: 固定長
S: スパン形式
U: 不定長
V: 可変長

指定可能な値は以下のとおりです。U、F、FB、V、VB、VBS、VS、D、DB、DBS および DS。

recsize

recfmin が F または FB の場合、入力レコードの長さ。recfmin が F の場合は、デフォルトとして、最初のレコードの長さが使用されます。recfmin が FB の場合は、recsize は必須です。

reuse

出力データ・セットの既存のレコードを置換する場合は「YES」を指定します (出力データ・セットがカタログ上 REUSE パラメーターで定義されている場合)。古いレコードを削除せずに、新規レコードを追加する場合は「NO」を指定します。デフォルトは、NO です。

skip

スキップされる論理レコードの数。デフォルトは 0です。

/* REXX */
/* copy a tape file to a vsam data set       */
/* allocate input tape                       */
/* use SL processing.  required file is at   */
/* position 1                                */

"ALLOC FILE(TAPE) DA('FMNUSER.TAPEIN')",
      "VOLUME(FMO001) UNIT(CART) LABEL(SL)",
      "POSITION(1) OLD"

/* copy a tape file to a vsam data set       */

"FILEMGR $TV INPUT=TAPE,",
            "DSNOUT=VSAM.DISK.VT55.DATA"

/* free the tape unit                        */

"FREE FILE(TAPE)"

return