topic Re: how to delete date suffixed files in a location in SAS Programming

how to delete date suffixed files in a location

suhas1 — Sun, 01 Dec 2019 09:54:01 GMT

Re: how to delete date suffixed files in a location

Patrick — Sun, 01 Dec 2019 20:55:35 GMT

A subject line alone is insufficient to provide us with enough information for your question.

Please provide much more detailed information like: Are you talking about SAS tables in a library or some other files on the file system? Unix/Linux or Windows - OS? SAS version?

HOW does the naming pattern look like. Where is the date part in the name and what sort of logic would you required to delete the files (like: older than x days based on current system date)?

Provide some sample data / actual file names showing the actual naming pattern you're dealing with.

Re: how to delete date suffixed files in a location

suhas1 — Sun, 01 Dec 2019 11:29:17 GMT

i am having sas tables in a library.some filenames start like 15011990(ddmmyyyy)pattern.some filenames like custseg01 like that .i want to delete datesuffix files in that particular location

Thanks

Re: how to delete date suffixed files in a location

Tom — Sun, 01 Dec 2019 17:38:21 GMT

If the pattern as at the beginning it would be easier as SAS allows the use of colon as a wildcard for the end of a name.

To search for pattern at the end you will need to get the list of names as data and search that.

So you could use PROC CONTENTS output or the DICTIONARY.TABLES or DICTIONARY.MEMBERS metadata tables to get the names.

libname mylib 'my directory name';
proc contents data=mylib._all_ noprint out=contents; run;
data names ;
  set contents;
  by memname ;
  if first.memname;
  keep memname libname;
run;

Now that you have all of the names of the datasets in that directory. You can then use some code to find the ones you want to delete and then generate code to delete them. For example to delete any dataset where the last 8 characters are a valid date in DDMMYYYY style.

data _null_;
  set names ;
  if length(memname) > 8
  and input(substr(memname,length(memname-7)),??ddmmyy8.) ne . then do;
    call execute(catx(' ','proc delete data=',catx('.',libname,memname),';run;'));
  end;
run;