The code: %global device sdate edate _odsdest; *ProcessBody; data _null_; d1="&sdate"; d2="&edate"; ds=input(d1,date11.); de=input(d2,date11.); call symput('start',ds); call symput('end',de); data ip; set pricea.nc_cs_upgrd_201205_n(keep=device device_type equip_inst_eff_dt acct_type prior_device prior_device_type where=(device=:"&device" and acct_type=:'U')); upgds=1; if &start le equip_inst_eff_dt le &end; proc sort; by equip_inst_eff_dt device prior_device_type prior_device; proc means sum noprint; output out=sums(drop=_type_ _freq_) sum=; var upgds; by equip_inst_eff_dt device prior_device_type prior_device; %STPBEGIN; proc print; TITLE1 "From Upgrades for &device"; FOOTNOTE ; RUN; %STPEND;
... View more