Inferring a Time Interval

/*--------------------------------------------------------------

                    SAS Sample Library

        Name: tidex2.sas
 Description: Example program from SAS/ETS User's Guide,
              The TIMEID Procedure
       Title: Inferring a Time Interval
     Product: SAS/ETS Software
        Keys: TIME ID
        PROC: TIMEID
       Notes:

--------------------------------------------------------------*/

data workdays;
   format day weekdate.;
   input day : date. @@;
   datalines;
01AUG09 06AUG09 11AUG09 14AUG09 19AUG09 22AUG09
27AUG09 01SEP09 04SEP09 09SEP09 12SEP09 17SEP09
;

proc timeid data=workdays print=interval;
   id day;
run;