Here another option for calculating week_no:
data work.eclrsvs_fludata_new_NoDupkey;
do _dt='01aug2020'd, '02aug2020'd,'01Jul2020'd to '20Sep2020'd by 5;
Dt_Of_death=put(_dt,yymmdd10.);
output;
end;
drop _dt;
stop;
run;
data work.date_of_Death;
set work.eclrsvs_fludata_new_NoDupkey;
length death_date 8 Week_No $4;
death_date=input(Dt_Of_death,yymmdd10.);
format death_date mmddyy10.;
retain _base_dt;
format _base_dt date9.;
if _n_=1 then _base_dt=intnx('week','01AUG2020'd,-2031,'b');
week_no=put(intck('week',_base_dt,death_date), z4.);
/* drop _base_dt;*/
run;
... View more
