You might try this: proc sort data=has; by id descending time; run; data want; set has; by id; retain select; if first.id then select = 1; if select = 1 and score ne . then do; select = 0; output; end; run; RW9 beat me with a more elegant solution!
... View more
You MUST reference an array element by a NUMERICAL index, NOT by its name outside of the array: From the SAS documentation: subscript specifies the subscript, which can be a numeric constant, the name of a variable whose value is the number, a SAS numeric expression, or an asterisk (*). In your code, the numerical index is taken from the contents of any of the occ_* variables, which causes the crash when it is not between 1 and 22.
... View more
Is "date" a numeric variable formatted with mmddyy10.? If so, then you need to write the condition like that: if '29feb2008'd <= date <= '31may2009'd 'ddmmmyyyy'd is a date constant. Similar modifiers are t for time or x for hexadecimal. If "date" is a string that contains MM/DD/YYYY values, I would recommend to use input(date,mmddyy10.) between the constants.
... View more
How about getting the number of lines first with wc -l (or simply divide the file size by record size if you have fixed length records), then split that into 8 parts and do 8 data steps in succession where you supply firstobs= and obs= on the infile statement? I would not recommend running 8 concurrent jobs against the same file and physical devices, it might cause delays.
... View more
First, your example has 2 seemingly small but significant errors: proc sort data=short_state_soc22 ; by state; run; %macro srt(); data wide_state; set short_state_soc22; by state; array soc22{22} occ_11 occ_13 occ_15 occ_17 occ_19 occ_21 occ_23 occ_25 occ_27 occ_29 occ_31 occ_33 occ_35 occ_37 occ_39 occ_41 occ_43 occ_45 occ_47 occ_49 occ_51 occ_53 ; %do i=11 %to 53 %by 2; retain soc22; if soc_22 ="&i" %then soc22[occ_&i]=count; *"%then" is wrong, should be "then"; %end; if last.state=1 %then output; *"%then" is wrong, should be "then"; run; %mend srt; %srt; Remember that the macro facility is just a code generator. What your macro does looks like this: data wide_state; set short_state_soc22; by state; array soc22{22} occ_11 occ_13 occ_15 occ_17 occ_19 occ_21 occ_23 occ_25 occ_27 occ_29 occ_31 occ_33 occ_35 occ_37 occ_39 occ_41 occ_43 occ_45 occ_47 occ_49 occ_51 occ_53 ; retain soc22; if soc_22 ="11" then soc22[occ_11]=count; retain soc22; if soc_22 ="13" then soc22[occ_13]=count; retain soc22; if soc_22 ="15" then soc22[occ_15]=count; retain soc22; if soc_22 ="17" then soc22[occ_17]=count; retain soc22; if soc_22 ="19" then soc22[occ_19]=count; retain soc22; if soc_22 ="21" then soc22[occ_21]=count; retain soc22; if soc_22 ="23" then soc22[occ_23]=count; retain soc22; if soc_22 ="25" then soc22[occ_25]=count; retain soc22; if soc_22 ="27" then soc22[occ_27]=count; retain soc22; if soc_22 ="29" then soc22[occ_29]=count; retain soc22; if soc_22 ="31" then soc22[occ_31]=count; retain soc22; if soc_22 ="33" then soc22[occ_33]=count; retain soc22; if soc_22 ="35" then soc22[occ_35]=count; retain soc22; if soc_22 ="37" then soc22[occ_37]=count; retain soc22; if soc_22 ="39" then soc22[occ_39]=count; retain soc22; if soc_22 ="41" then soc22[occ_41]=count; retain soc22; if soc_22 ="43" then soc22[occ_43]=count; retain soc22; if soc_22 ="45" then soc22[occ_45]=count; retain soc22; if soc_22 ="47" then soc22[occ_47]=count; retain soc22; if soc_22 ="49" then soc22[occ_49]=count; retain soc22; if soc_22 ="51" then soc22[occ_51]=count; retain soc22; if soc_22 ="53" then soc22[occ_53]=count; if last.state=1 then output; run; Decide for yourself which code is more efficient and readable! All those ifs eat a lot of CPU power, BTW. The macro facility lets you create dynamic code. If the code remains static, do it in the data step itself. Edit: replaced %then with then
... View more
What you want is this: proc sort data=short_state_soc22 ; by state; run; data wide_state (drop=soc soc_22 count i); set short_state_soc22; by state; array soc22{22} occ_11 occ_13 occ_15 occ_17 occ_19 occ_21 occ_23 occ_25 occ_27 occ_29 occ_31 occ_33 occ_35 occ_37 occ_39 occ_41 occ_43 occ_45 occ_47 occ_49 occ_51 occ_53 ; retain soc22; if first.state then do i = 1 to 22; soc22 = .; end; soc22[(soc_22-9)/2] = count; if last.state then output; run;
... View more
%if soc_22 ="&i" %then soc22[occ_&i]=count; In this macro statement, soc_22 is not a variable, but a value! Therefore you are comparing (the string!) soc_22 to "11", "13" and so on, which is never true. The same goes for %if last.state last.state is just a string when the macro executes (long before the data step even is compiled and starts) and the whole construct has no meaning.
... View more
first. and last. are only generated for variables in the "by" list. Try this: data int; set old; int_day = datepart(Transaction_Date); run; proc sort data=int; by Acc_Nr Transaction_Date; run; data wanted (drop=int_day); set int; by Acc_Nr int_date; if first.int_date; run;
... View more
How about doing it the other way around, by counting workdays? IF DLVR_STRT_DTS = . THEN C= 'N/A'; ELSE DO; SELECT (REGION); WHEN ('Americas') DO; check = 0; do iter_date = DATEPART(ORD_ENTRY_DATE) to DATEPART(DLVR_STRT_DTS); if (WEEKDAY(iter_date) not IN (1,7) and INPUT(PUT(iter_date,AMERHOL.),9.) ne 1 then check = check + 1; * count the actual number of workdays; end; IF check le 3 THEN C = 'MADE'; ELSE C = 'MISS'; END;
... View more
