data work.numbers; *A;
length name $4 month $3 status $7;
infile "d:/sas/sas70di2ti.txt" dsd;
input name $ month $;
if month="FEB" then input week1 week2 week3 week4 status$;
else if month="MAR" then input week1 week2 week3 week4 week5 status$;
format week1-week5 dollar6.;
run;
proc print;
run;
data work.numbers;*B;
length name $4 month $3 status $7;
infile "d:/sas/sas70di2ti.txt" dlm="," missover;
input name $ month $;
if month="FEB" then input week1 week2 week3 week4 status$;
else if month="MAR" then input week1 week2 week3 week4 week5 status$;
format week1-week5 dollar6.;
run;
proc print;
run;
data work.numbers;*C;
length name $4 month $3 status $7;
infile "d:/sas/sas70di2ti.txt" dlm=",";
input name $ month $@;
if month="FEB" then input week1 week2 week3 week4 status$;
else if month="MAR" then input week1 week2 week3 week4 week5 status$;
format week1-week5 dollar6.;
run;
proc print;
run;
data work.numbers;*D;
length name $4 month $3 status $7;
infile "d:/sas/sas70di2ti.txt" dsd@;
input name $ month $;
if month="FEB" then input week1 week2 week3 week4 status$;
else if month="MAR" then input week1 week2 week3 week4 week5 status$;
format week1-week5 dollar6.;
run;
proc print;
run;