Hi, instead of using filename STATEMENT I suggest to use filename() FUNCTION 🙂 Code is below. all the best Bart /* assuming that files and folders exist */
data W47XXFM;
input file_name $ : 20.;
cards;
test.pdf
test1.pdf
test2.pdf
;
run;
Proc sort data=work.W47XXFM
out =loop (keep= file_name);
by file_name;
run;
options msglevel=i;
data _null_;
set loop;
length msg $ 384;
i=filename('ii', 'C:\SAS_WORK\input\' || strip(file_name), "DISK", "RECFM=N");
o=filename('oo', 'C:\SAS_WORK\output\' || strip(file_name), "DISK", "RECFM=N");
rc=fcopy('ii', 'oo');
if rc=0 then
put 'Copied _bcin to _bcout.';
else do;
msg=sysmsg();
put rc= msg=;
end;
i=filename('ii');
o=filename('oo');
run;
... View more