我有兩組月度數(shù)據(jù)，一邊里面的year month是字符型Length 12., Format12,informat12.。另一個(gè)是數(shù)值型length 8 Format Best12.,informat Best32.這兩個(gè)要怎么轉(zhuǎn)換成一個(gè)類型然后用merge呢？

data a1;
input a b @@;
cards;
23 45 34 34 54 34
;
run;
data _null_;
set a1;
array tmp[*] _character_;
call symputx("nvar",dim(tmp));
run;

data tmp;
set a1 end=eof;
array tmp[*] _character_;
length vars $ 32767;
retain vars "";
array num[&nvar.];
do i=1 to dim(tmp);
num[i]=input(tmp[i],best.);
if eof then vars=catx(" ",vars,cats(vname(num[i]),"=",vname(tmp[i])));
end;
if eof then call symputx ("vars",vars);
drop _character_ i;
run;

data a4;
set tmp;
rename &vars.;
run;

proc contents data=a4; title "字符型批量變成數(shù)字型"; run;