/*You could rename these files by RENAME() funtion.*/
%let path= c:\temp\ ; *the folder included "Virage Survey.xml" ;
data _null_;
rc=filename('x',"&path.");
did=dopen('x');
do i=1 to dnum(did);
fname=dread(did,i);
rc=rename(cats("&path.\",fname),cats("&path.\",compress(fname,'._','kad')),'file');
end;
did=dclose(did);
run;