Data format;
infile "&savepath\&file1..txt" firstobs=1;
input sic $2. value $ ;
;
data format;
set format;
informat start $16. end $16. label $40. fmtname $32. type $1.;
start=sic;
end=sic;
label=value;
fmtname='aa';
type='c';
keep start end label fmtname type;
run;
proc format library=work cntlin=format;run;
data new;
infile "&savepath\&file2..txt" firstobs=1;
informat sic1-sic10 $2. ;
format sic1-sic10 $aa.;
input sic1-sic10 $ ;
run;
PROC EXPORT DATA= new OUTFILE= "&savepath\&outfile..txt"
DBMS=TAB REPLACE;
RUN;[/code:1hsa2ko3]