thanks to your help, the solution is data have; input client date date9. datetime datetime20. status $ ; informat datetime datetime20.; format datetime datetime20. date date9.; datalines ;   12345 10NOV2020 10NOV2020:10:10:10 A 12345 11NOV2020 11NOV2020:11:11:11 S 12345 12NOV2020 12NOV2020:12:12:12 S 12345 12NOV2020 12NOV2020:12:13:13 S 12345 12NOV2020 12NOV2020:12:14:14 A 92345 10NOV2020 10NOV2020:10:10:10 A 92345 11NOV2020 11NOV2020:11:11:11 S 92345 12NOV2020 12NOV2020:12:12:12 S 92345 12NOV2020 12NOV2020:12:13:13 S 92345 12NOV2020 12NOV2020:12:14:14 A ; proc sort data=have; by client datetime ;run ;   　 data want (drop=_:); set have (where=(status='S') in=ins) have (in=keep); by client; if first.client then call missing(_last_s_date); if ins then _last_s_date=date; retain _last_s_date; if keep; if date=_last_s_date and status='S' then flag=1; else flag=0; run; data want(drop=_:) ; format _last_s_datetime datetime20. ; set have (where=(status='S') in=ins) have (in=keep); by client date ; if first.datetime then call missing(_last_s_datetime); if ins then _last_s_datetime=datetime; retain _last_s_datetime; if keep; if datetime=_last_s_datetime and status='S' then flag=1; else flag=0; run;   ... View more

Hello,   You can take a look at the sashelp.vmacro view and adapt the following program to your needs.   %let x=1; %let y=hello; data _NULL_; set sashelp.vmacro(where=(scope='GLOBAL')); call execute(catx(' ','%nrstr(%symdel)',name,';')); run; ... View more

Yes, that's how it is. These two variables are empty inside macros. The easy way out is probably to put the two variables in another macro variable, e.g.: %let filepath=&SYSINCLUDEFILEDIR/&SYSINCLUDEFILENAME; /* This is in the top of the %include'd program */ Then you can call the macro like this %mc_get_prog_info_inc(&filepath); You already got one solution for this, earlier. ... View more

A slight modification to my solution: you can also put the RUN statement inside the macro, as log as you do not put the final semicolon. %macro mc_get_program_name; data _null_; call symputx('v_path_prog',catx('/',symget('SYSINCLUDEFILEDIR'),symget('SYSINCLUDEFILENAME'))); run %mend; Then, in your %INCLUDE program, just use the macro call with a semicolon: %mc_get_program_name; and things should work as you want, the datastep does not get executed before SAS encounters the semicolon (which is outside the macro). ... View more

It looks like your delimiter is actually a semicolon so as long you specify the correct delimiter it should work. Can you post the code you used and we can show you what needs to be changed? ... View more

Hi @Nasser_DRMCP    Could you elaborate a bit more about your issue?   when I ran your code (with ALL keyword added for summary): data encaiss_8dertrim_detail; input trim_enc tx_enc s; cards; 39 0.011938547 8 39 0.008377295 7 39 0.010034088 6 39 0.005785525 5 39 0.007288286 1 ; run; ods html; proc tabulate data=encaiss_8dertrim_detail order=DATA ; title j=l "TAUX MOYEN DES 8 DERNIERS TRIMSTRES CTX (detail)" ; where s > 0 ; class s trim_enc ; var tx_enc ; table trim_enc="" , (s="" ALL)*tx_enc=""*mean=""*f=10.5 ; /* ALL added*/ quit; SAS returned following output: ------------------------------------------------------------------------------------------------ | | 8 | 7 | 6 | 5 | 1 | All | |----------------------------+----------+----------+----------+----------+----------+----------| |39 | 0.01194| 0.00838| 0.01003| 0.00579| 0.00729| 0.00868| ------------------------------------------------------------------------------------------------ and the average is as you wrote 0.0086.   All the best Bart ... View more

Hi,   Do you mean something like that (it's more general when there may be more beginnings or none): data have; input contract classe_201801 $ classe_201802 $ classe_201803 $ classe_201804 $ classe_201805 $ classe_201806 $ classe_201807 $ classe_201808 $ classe_201809 $ classe_201810 $ classe_201811 $ classe_201812 $ ; datalines; 111111 A B B B A A A B B B B C 222222 B B B B B B B B B B B C 333333 A A A A A A A A A A A A 444444 A B A B A B A B A B A B 555555 B A B A B A B A B A B A ; run; data want; set have ; _fake_ = " "; array array_classe[0:12] _fake_ classe_:; array begin_[6] $ 32; j=0; do i = 1 to hbound(array_classe); if array_classe[i] = "B" and array_classe[i-1] ne "B" then do; j+1; begin_[j] = vname(array_classe[i]); end; end; drop i j _fake_; run;   All the best Bart ... View more