ZDVRED

【機能】

   ファイルを読込む（可変長データの場合）


【使用形式】

  CALL ZDVRED(ID,IBUF,L,DATA,IER)


【引数説明】

  ［INPUT］
	ID      ：データセット番号
	IBUF(*) ：入出力バッファ（ファイルの1レコード＋3ワード）

  ［OUTPUT］
  	L       ：読込んだデータのワード数
	DATA(*) ：読込んだデータ
  	IER     ：エラーフラグ
	           　0；正常
  	           　1；ファイルを読終った
	           −1；読込みエラー


【機能説明】

  ・ファイルから可変長データを読込む。
  ・データの終了は、L＝0,IER＝1のどちらの場合によっても認識できる。