Hi,   You can use following SQL query:- proc sql; create table want as select * from have t1 where end_time=(select max(end_time) from have t2 where t1.term=t2.term and t1.classday=t2.classday and t1.room=t2.room group by term,classday,room); quit; Please let me know if it helps you.   Regards, Abd. ... View more

Hi,   Not sure whether your query is solved or not....but I guess...following code will help. data have; coupunexpiry='20-02-2014'; output; coupunexpiry='21-02-2014'; output; coupunexpiry='22-02-2014'; output; coupunexpiry='23-02-2014'; output; run; data want; set have; coupunexpiry=compress(coupunexpiry,'-'); num_dt=input(coupunexpiry,ddmmyy10.); format num_dt date9.; run;   Please let me know if it helps.   Regards, Abd. ... View more

Hi,   Could you please explain criterian for removing multiple strings?    if (salary >= 0 & salary <= 25000) then salcat_1 = "C";    In the string above , you are eliminating "if" and "then". Will this be the same always? Every time we need to eliminate only "If" and "else"? Please be more explicit.   ... View more

Hi,   Please check if following logic is helpful:- %let TVAR = Y; %let col1 = ,3 as c; %let col2 = ,4 as d; %let col3 = ,5 as e; %macro ttestm; %let i = 1; Data Test; A = 5; run; proc sql; create table Test2 as select 1 as A ,2 as B %do %while (&i <= 3); %if &i = 3 %then %let TVAR = N; %if &TVAR = Y %then &&col&i.; %let i = %eval(&i + 1); %end; from Test ;quit; %mend; %ttestm; ... View more

    Hi,   You can use proc sql case expression. Here is a link to modify you code:-   http://support.sas.com/documentation/cdl/en/proc/61895/HTML/default/a002473682.htm   Please try following code:-   %let TVAR='Y'; %put &TVAR.; %macro ttestm;   Data Test; A = 5; run;   proc sql; create table test2 as select 1 as A, 2 as B, case when &TVAR. = 'Y' then 50 else 100 end as C from test; quit; %mend; %ttestm;   I hope it help you.   Regards, ABD ... View more

%macro send_email; data _null_; <X command to get values of disk space. Let us assume that this output is redirected to file "out.txt." stored at "<Your location>"; run; data input_data; infile "<Your file location>" firstobs = 1 dlm = ":" missover dsd lrecl = 32767; input Description : $char128. /*string field of 128 chars long*/ bytes_Occupied : $char128. /*numbers of all types ints, floats, etc */ ; run; data input_data; set input_data; Description=tranwrd(compress(Description,''),'#','no'); run; proc sql; select bytes_occupied into : free_bytes from input_data where description='Totalnooffreebytes'; select bytes_occupied into : total_bytes from input_data where description='Totalnoofbytes'; create table memory_stat ( Total_no_of_free_bytes char(10000), Total_no_of_bytes char(10000) ); insert into memory_stat values("&free_bytes.","&total_bytes."); quit; data memory_stat(drop=Total_no_of_free_bytes Total_no_of_bytes); set memory_stat; Total_no_of_free_bytes_num=input(Total_no_of_free_bytes,20.0); Total_no_of_bytes_num=input(Total_no_of_bytes,20.0); Disk_consumption_in_perctage=(Total_no_of_bytes-Total_no_of_free_bytes)/Total_no_of_bytes*100; call symputx("disk_utilization",Disk_consumption_in_perctage); run; %put &disk_utilization.; %if &disk_utilization. >= 75 %then %do; filename outbox email "<Email id>"; data _null_; file outbox subject="Alert!!!!!! Disk space is 75% occupied" ; put 'Your hard disk is 75% occupied. Please clean unused data.'; run; %end; %mend; %send_email; Not sure about Unix commnd but using windows command which is giving output as per attached snapshot we can code a mcaro mentioned above. Some calculations has to be done to get a macro parameter.I hope this will help. ... View more

Hi,   You can also try following solution:-   data have; input Company : $8. Revenue Year; cards; HP 100 2012 HP 200 2013 HP 300 2014 Sun 200 2011 Sun 400 2012 Sun 500 2013 Apple 150 2014 Apple 250 2015 Google 120 2010 Google 190 2011 Google 320 2012 Google 440 2013 Sun 600 2014 Sun 800 2015 ; run;   proc sort data=have; by Company Year; run;   proc sql noprint; Select "'" || strip(Company) || "'" into : company_Name separated by ',' From have group by Company having count(Company) > 3 ; quit;   %put company_Name =&company_Name;   data want; set have (where= (Company in(&company_Name))); by company notsorted; retain Total_revenue 0; if first.company then Total_revenue=0; Total_revenue = revenue + Total_revenue; run;   Let me know if it works for you. ... View more

Hi,   You can use following logic:-   By using X command please fire "DF" command on Linux. It will give you details of all drives available on Linux. Pipe these details into a macro variable for your desired drive. If that macro variable is having value more than 75% fire following data step:-     filename outbox email "<Email id to whom email is send>";   data _null_;         file outbox        subject="Alert!!!!!!  Disk space is 75% occupied"         ;         put 'Your hard disk is 75% occupied. Please clean unused data.';       run;   In short over all logic will be:-   %macro check_hard_disk_capacity;   /*X command to check desired hard disk capacity and take it into macro variable*/   %if &macro_varaible > 75 %then %do;     filename outbox email "<Email id to whom email is send>";   data _null_;         file outbox        subject="Alert!!!!!!  Disk space is 75% occupied"         ;         put 'Your hard disk is 75% occupied. Please clean unused data.';       run;   %end; %mend;   I hope this helps.   Regards, Abd. ... View more

Hi,   You can align it to Right so that it will have leading blanks. But will it solve your query.Could you please elaborate your exact problem with more details. Following code can align value of selected variable to right.   data person; infile datalines delimiter=','; input name $ dept $ value value1; datalines; John,Sales,-200,200 Mary,Accounts,-500,300 Johny,Sales,-200,200 Mak,Accounts,-100,100 ; run; data person; set person; name=right(name); dept=right(dept); run; ... View more