Hi, Try this.. proc sql; create table adv_vwretd as select a.* , b.* from tt.sorted_main_vwretd200 a left join  tt.sortcompustat b on a.permno=b.lpermno and a.fyear=b.fyear order by a.permno, a.fyear; quit; Thanks, Shiva ... View more

Hi, Is this the output you required... data have; input price size; cards; 10 3 20 5 30 5 45 1 2 3 20 5 30 5 45 1 38 3 20 5 39 5 55 1 ; run; proc univariate data=have noprint;    var price size;    output out=want mean=mean std=std pctlpts  = 1 99 pctlpre  = price size                                        pctlname = pct1 pct99; run; proc sql; select min(price) into :minimum from have where price in(select price from have having price<>MIN(price) ); select max(price) into :maximum from have where price in(select price from have having price<>max(price) ); select min(size) into :sminimum from have where size in(select size from have having size<>MIN(size) ); select max(size) into :smaximum from have where size in(select size from have having size<>max(size) ); select pricepct1,pricepct99,sizepct1,sizepct99 into :actual1,:actual99,:size1,:size99 from want; quit; data test; merge have want; if price=&actual1 then price=&minimum; else if price=&actual99 then price=&maximum; if size=&size1 then size=&sminimum; else if size=&size99 then size=&smaximum; run; Thanks, Shiva ... View more

Hi, Try this.. data y1; input year :firm $; firm=lowcase(firm); cards; 2000     A 2000     B 2001     A 2002     A 2002     C 2002     D ; RUN; data y2; input year firm $ ; cards; 2000    a 2000    c  2000     o 2000     p 2001     q 2001     r 2002     s 2002     t 2002     c 2002      v 2002     w 2002     x ; RUN; proc sort data=y1;by firm;run; proc sort data=y2;by firm;run; data want; merge y1(in=a) y2(in=b); by firm; if b and not a ; run; Thanks, Shiva ... View more

Hi, Try this.. data want; input date; informat date mmddyy10.; format date date9.; year=year(date); qtr=qtr(date); DateValue=compress('Q'||qtr||'_'||year); cards; 01/25/2011 12/25/2010 ; run; Thanks, Shiva ... View more