topic Re: How can I split a table and join in SAS Programming

How can I split a table and join

jb9977 — Fri, 21 Jul 2017 20:48:34 GMT

I have two tables on is

id value

1 aa

2 bb

3 cc

the other is

No value

25 aa

25 bb

25 cc

26 aa

26 bb

26 cc

I need a output like this

id value no value no value

1 aa 25 aa 26 aa

2 bb 25 bb 26 bb

3 cc 25 cc 26 cc

Thanks.

Re: How can I split a table and join

ballardw — Fri, 21 Jul 2017 20:55:41 GMT

If you want a data set as output you should provide some additional variable names as you can only have one variable named "value" in a data set.

Or do you want a report with text?

Re: How can I split a table and join

LinusH — Fri, 21 Jul 2017 20:58:10 GMT

To me your output looms like a report. If that's your goal I suggest that you simply first join on the columns "value", and then use e.g. PROC REPORT to get the desired layout.

Re: How can I split a table and join

Reeza — Fri, 21 Jul 2017 22:54:53 GMT

Do you need a dataset or a report that looks like that?

Re: How can I split a table and join

Jagadishkatam — Sat, 22 Jul 2017 03:11:41 GMT

Please try the below code, you will get the expected output. however the variable names will be different. So if you want to display the variable names same then please update the label statement as mentioned in the code.

data have1;
input id  value$;
cards;
1     aa
2     bb
3     cc
;
data have2;
input No    value$;
cards;
25      aa
25      bb
25       cc
26       aa
26      bb
26      cc
;

proc sort data=have1;
by value;
run;

proc sort data=have2;
by value;
run;

data have;
merge have1 have2;
by value;
run;

data have;
set have;
by value;
retain num;
if first.value then num=1;
else num+1;
run;

data want;
set have;
array val(*) $ value1-value2;
array nos(*)$ no1-no2;
by value notsorted;
retain value1-value2 no1-no2;
if first.value then do;
call missing (of val(*));
call missing (of nos(*));
end;
val(num)=value;
nos(num)=no;
if last.value;
drop num;
label value1='Value'
      value2='Value'
      no1='No'
      no2='No';
run;