You can process data using BY -group in data step, where first.variable  and last.variable determine the start and the end counts of your accounts (running counts).   data have; input Account_All Account_ID Person_ID; cards; 123 123 1234 456 456 4568 456 456 4569 789 789 78910 789 789 78911 789 789 78912 101123 101123 1011213 121314 121314 12131415 131415 . . ; proc print;run; data want; set have; by account_all account_id; if first.account_id then Total_person=1; else Total_person+1; proc print;run;  In case you need only totals by accoint_id, use proc sql; proc sql; create table want as select*, count(*) as Total_person from have group by account_all, account_id; quit; ... View more

One way to get the result is to create a macro variable to reference all person_id that have met the criteria., then subset the data based on the macro variable values.  Eg (assuming person_id is a numeric variable): data have; input Obs person_id MX $; cards; 1 10000103722 PFR 2 10000103722 PFR 3 10000181132 NVX 4 10000181132 MOD 5 10000189649 PFR 6 10000189649 PFR 7 10000189649 NVX 8 10000189649 PFR 9 10000371289 PFR 10 10000371289 PFR 11 10000751831 NVX 12 10000810473 MOD 13 10000810473 MOD 14 10000829168 JSN 15 10000864651 PFR 16 10000864651 PFR 17 10000865007 PFR 18 10000865007 NVX 19 10000865500 PFR 20 10000865500 PFR 21 10000865883 MOD 22 10000865883 MOD 23 10000866093 PFR 24 10000866093 NVX 25 10000866093 NVX ; proc print; run; proc sql noprint; select distinct person_id format=16. into: ids separated by ',' from have where upcase(strip(mx)) eq 'NVX'; %put Selected Person_id= &ids; quit; data want1 want2; set have; if person_id in (&ids) then output want1; else output want2; run; ... View more

I guess in your SET statement WHERE dataset option affecting the previously sorted order.  SET nsih_hosp(where=(dt_end_site is null)); Try to apply this where dataset option in your previous step.   ... View more

proc sort data=have; by id item descending price; run; data want; set have; by id item; retain temp; if first.item then temp=price; if price=temp; proc print;run; ... View more

Your ON clause has a typo: It shouldn't be on sc.SIN=ct.SIN, but ON ST.SIN=CT.SIN   ... View more

As per description by the owner (@GN0001) : 2- Each key maps to a couple of subkeys. 3-How can I write the program in a data step that I only capture a couple of subkeys for each key, I don't need all of them.  Assuming the user interested in mapping only 'subkey1' and 'subkey4' among all 'subkey' s, those values were mapped to a new Key variables. But it could be any 'subkey', not only those 2.  ... View more

One example;  data have; infile cards dlm=',' truncover; length key $100; input key $; cards; subkey1 subkey0 subkey2 subkey4 subkey5, subkey2 subkey subkey subkey2 subkey3, subkey1 subkey5 subkey subkey4 subkey3 ; proc print;run; data want; set have; if find(key, 'subkey1', 'i') gt 0 then var1='subkey1'; if find(key, 'subkey4', 'i') gt 0 then var2= 'subkey4'; key_of_interest= catx(' ', of var:); proc print; run; ... View more

Hi @Tom ,  It's nice of you to give an explanations to every single statement. Like me, most of the Community members must have appreciated your time and effort to help others.  As  a new starter in Regular Expressions, I have  a question on your comment above: Here is the regular expression being used /\(\d\d\d\d\)/ Which means to look for a 6 character string that has 4 digits with parentheses on the outside.   What I see here (according to manuals) is: /.../  - start and end of regular expression (...) - grouping of values \d\d\d\d - 4 digits \ (the very first forward slash outside the parenthesis) - Overrides the next metacharacter such as a ( or ?  I'm wondering which metacharacter or which part of reg.expression here specifies 6 character string ? Or would it be incorrect to write the statement as /(\d\d\d\d)/   or  /(\d{4})/    ? Trying to understand the expressions advantages one over another.  Thank you!   ... View more

You can add proc sort just before proc print. And you might need to specify exact variables in BY statement, if not interested in sorting all variables that listed in &_field macro variable.  %let target_table=&datasource; %global prompt; proc sort data= "&envPath/data/gb/&datasource" out=sorted nodupkey /*or noduprecs if sorting all vars*/; by &_field /* or list of vars */; run; proc print data= sorted noobs; where &parameter_1 in ("&parameter_2"); var &_field; run; ... View more

ARRAY _num _mon1-_mon6;   Rename should be done outside the array ... View more

You are referring to the same variables both as character and numeric, and a SAS variable cannot be of both datatype at the same time.  You need to get new names for numeric vars, like _mon1-_mon6.  ... View more