Hi. You must change your data's structure firstly. This will waste some times.Good Luck. [pre] data op; input prd_grp : $20. prd_subgroup & $20. prd_desc & $20. loan_amount ; datalines; ASSETS All Other Loans 234 ASSETS All Other abc 345 ASSETS All Other Quoted Shares Held 213 LIABILIITES Deposits Current Deposits 435 LIABILIITES Deposits Fixed 325 LIABILIITES Deposits NIDs & Repos 256 LIABILIITES Deposits Savings 218 ; run; data op; set op; if prd_grp eq lag(prd_grp) and prd_subgroup eq lag(prd_subgroup) then call missing ( prd_grp,prd_subgroup); run; data temp(where=(item is not missing)); set op; item=prd_grp;output; item=prd_subgroup;output; item=prd_desc; _loan_amount=loan_amount;output; keep item _loan_amount prd_subgroup; run; data report; set temp; retain id; if not missing(prd_subgroup) then id=prd_subgroup; drop prd_subgroup; run; options missing=' '; ods html file='c:\temp\report.html' style=sasweb; proc report data=report nowd ; column id item _loan_amount; define id /group noprint; define item /display; define _loan_amount / analysis sum; compute after id; item='Total'; line ' '; endcomp; break after id /summarize ; run; ods html close; [/pre] Ksharp ... View more

Hi.ArtC I guess your sas version is before 9.2.So 'nozero' is worked for PDF RTF..... Unfortunately, After SAS9.2 'nozero' is only supported for listing destination. Ksharp ... View more

Just as Cynthia said.If you have installed Adobe software,then you can open external html file to print it as pdf file. ... View more

Hi. For the sake of your complex logic , I am afraid you need more iterations. [pre] data i; input ID $ ADATE : MMDDYY10. SERVICE $; format adate mmddyy10.; datalines; 1 12/7/2009 I 2 1/12/2009 I 2 1/13/2009 OP 3 6/5/2009 I 4 7/29/2009 LA 5 3/23/2009 OP ; proc sort data=i nodupkey; by id adate service; run; data index; set i; where service not eq 'I'; run; proc sql feedback; *createing table contained observations which is needed to change into I; create table flag as select a.* from index as a left join i as b on a.id eq b.id where ( b.adate eq a.adate ) or ( b.adate eq (a.adate - 1)) group by a.id,a.service having count(*) ge 2; quit; proc sort data=flag nodupkey; by id adate service; run; data flag; set flag; service='I'; run; proc sort data=i; by id adate; run; data result; merge i flag; by id adate; run; [/pre] Ksharp Message was edited by: Ksharp ... View more

Hi. your code has lots lots of if statement which is a big mistake for a programmer,especially when have lots of if statement.And I am sure @chang_y_chung@hotmail.com will mock you very much. I agree with Cynthia ,it is only execute one if statement each data step.And yours will execute lots lots of if statements for each data step to exhaust system source. So I supported Cynthia. And I also am curious that why your code can not use macro ? Especia for your situation which is not included function. Ksharp ... View more

Hi. There is an option in proc report 'nozero' can do it. But it only work for listing destination. Maybe you can save the output of listing destination to txt file or something else. [pre] data makedata; set sashelp.class(obs=3); if _n_ = 3 then do; height=.; weight=.; end; run; proc report data=makedata nowd; title 'Cannot "remove" variables for height and weight for Barbara obs'; column _character_ _numeric_; define name / group; define height/ display nozero; define weight/display nozero; break after name / page; run; [/pre] Ksharp ... View more

Hi. The code is very brilliant. But your code has some little different with op's code. [pre] col_EXP="intnx('day',today(),2)";output; col_EXP="intnx(day,%sysfunc(today()),2)";output; [/pre] When I add two ' into your code ,and I got Error. [pre] 364 data want; 365 set test; 366 format col_DT date9.; 367 col_DT = resolve('%sysfunc('||col_exp||')'); 368 run; NOTE: Character values have been converted to numeric values at the places given by: (Line):(Column). 367:10 ERROR: Required operator not found in expression: today() ERROR: Argument 2 to function INTNX referenced by the %SYSFUNC or %QSYSFUNC macro function is not a number. ERROR: Invalid arguments detected in %SYSCALL, %SYSFUNC, or %QSYSFUNC argument list. Execution of %SYSCALL statement or %SYSFUNC or %QSYSFUNC function reference is terminated. ERROR: Required operator not found in expression: today() ERROR: Argument 2 to function INTNX referenced by the %SYSFUNC or %QSYSFUNC macro function is not a number. ERROR: Invalid arguments detected in %SYSCALL, %SYSFUNC, or %QSYSFUNC argument list. Execution of %SYSCALL statement or %SYSFUNC or %QSYSFUNC function reference is terminated. NOTE: The SAS System stopped processing this step because of errors. NOTE: There were 2 observations read from the data set WORK.TEST. WARNING: The data set WORK.WANT may be incomplete. When this step was stopped there were 2 observations and 2 variables. WARNING: Data set WORK.WANT was not replaced because this step was stopped. NOTE: DATA statement used (Total process time): real time 0.04 seconds cpu time 0.00 seconds [/pre] Ksharp Message was edited by: Ksharp ... View more

Macro statement can solve your problem. And I think 'call symput, symget, resolve' would not solve your problem,because you request to dynamic invoke Macro variables ,it is hard to achieve. [pre] DATA test; length col_EXP $ 100; col_EXP="intnx('day',today(),2)";output; col_EXP="intnx('day',today(),10)";output; RUN; DATA _null_; set test nobs=num_obs; call symput (cats('col_EXP_DT',_n_), col_EXP); call symput ('nobs',num_obs); RUN; %put _user_; %macro data; data test2; set test; if _n_ eq 1 then col_DT=&col_EXP_DT1; %do i=2 %to &nobs; else if _n_ eq &i then col_DT=&&col_EXP_DT&i ; %end; format col_DT yymmdd10.; run; %mend; %data proc print;run; [/pre] Ksharp Message was edited by: Ksharp ... View more

Cynthia. &COL_EXP_DT (without a number) is actually from OP's code and I revise it,then got this curious result. And I receive these notes as yours. When I close SAS session and re-run the code,the following is LOG. [pre] 6 7 DATA test2; 8 set test; 9 call symput (cats('col_EXP_DT',_n_), col_EXP); 10 col_DT = symget('col_EXP_DT'); 11 RUN; NOTE: Invalid argument to function SYMGET at line 10 column 10. col_EXP=intnx('day',today(),2) col_DT= _ERROR_=1 _N_=1 NOTE: Invalid argument to function SYMGET at line 10 column 10. col_EXP=intnx('day',today(),10) col_DT= _ERROR_=1 _N_=2 NOTE: There were 2 observations read from the data set WORK.TEST. NOTE: The data set WORK.TEST2 has 2 observations and 2 variables. NOTE: DATA statement used (Total process time): real time 0.22 seconds cpu time 0.05 seconds 12 %put _user_; GLOBAL COL_EXP_DT1 intnx('day',today(),2) GLOBAL COL_EXP_DT2 intnx('day',today(),10) [/pre] and maybe change it a little more. [pre] DATA test2; set test; call symput (cats('col_EXP_DT',_n_), col_EXP); col_DT = symget(cats('col_EXP_DT',_n_)); RUN; %put _user_; [/pre] then These notes will not appear again. [pre] 18 19 DATA test2; 20 set test; 21 call symput (cats('col_EXP_DT',_n_), col_EXP); 22 col_DT = symget(cats('col_EXP_DT',_n_)); 23 RUN; NOTE: There were 2 observations read from the data set WORK.TEST. NOTE: The data set WORK.TEST2 has 2 observations and 2 variables. NOTE: DATA statement used (Total process time): real time 0.05 seconds cpu time 0.02 seconds 24 %put _user_; GLOBAL COL_EXP_DT1 intnx('day',today(),2) GLOBAL COL_EXP_DT2 intnx('day',today(),10) [/pre] Ksharp ... View more

Cynthia. I have not received these NOTEs. I am using SAS 9.2 TS1M0 for Windows. The following is my LOG. [pre] 132 133 DATA test2; 134 set test; 135 call symput (cats('col_EXP_DT',_n_), col_EXP); 136 col_DT = symget('col_EXP_DT'); 137 RUN; NOTE: There were 2 observations read from the data set WORK.TEST. NOTE: The data set WORK.TEST2 has 2 observations and 2 variables. NOTE: DATA statement used (Total process time): real time 0.27 seconds cpu time 0.01 seconds 138 %put _user_; GLOBAL COL_EXP_DT intnx('day',today(),2) GLOBAL COL_EXP_DT1 intnx('day',today(),2) GLOBAL COL_EXP_DT2 intnx('day',today(),10) [/pre] Ksharp ... View more

Just as Cynthia said that your UNIX-SAS has not this tagsets.excelxp. You can use another approach that Cynthia mentioned before. [pre] proc export data=sashelp.shoes outfile="c:\temp\op.xls" dbms=xls replace; sheet='one'; run; proc export data=sashelp.class outfile="c:\temp\op.xls" dbms=xls replace; sheet='two'; run; [/pre] Ksharp ... View more

Why not use Windows self-own search functionality. Start-> Search->File->File There is option can select the modified date of file, And there are also some another option can use. ... View more

There is another problem. You need assign long enough space for variable col_EXP. [pre] DATA test; length col_EXP $ 100; col_EXP="intnx('day',today(),2)";output; col_EXP="intnx('day',today(),10)";output; RUN; DATA test2; set test; call symput (cats('col_EXP_DT',_n_), col_EXP); col_DT = symget('col_EXP_DT'); RUN; %put _user_; [/pre] Ksharp ... View more

Hi. I think FILENAME + PIPE is just more simple. It can easily get the modifed date of file. [pre] filename date pipe 'dir c:\temp\ /a'; data temp(keep=date time file_name); infile date length=len; input whole $varying200. len; date=scan(whole,1,' '); time=scan(whole,2,' '); size=scan(whole,3,' '); file_name=scan(whole,4,' '); if findc(file_name,'.') and file_name not in ('.' '..') then output; run; proc print;run; [/pre] Ksharp ... View more