ファイルデータバッファ(FDB)内の現在の列の位置を返します。
カテゴリ: | 外部ファイル |
%let filrf=myfile;
%let rc=%sysfunc(filename(filrf, physical-filename));
%let fid=%sysfunc(fopen(&filrf, o));
%if (&fid > 0) %then
%do;
%let record=This is data for the record.;
%let rc=%sysfunc(fput(&fid, &record));
%let pos=%sysfunc(fcol(&fid));
%let rc=%sysfunc(fpos(&fid, %eval(&pos+1)));
%let rc=%sysfunc(fput(&fid, more data));
%let rc=%sysfunc(fwrite(&fid));
%let rc=%sysfunc(fclose(&fid));
%end;
%let rc=%sysfunc(filename(filrf));
This is data for the record. more data