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;

输出结果

---

SAS 系统 AAAA

Obsnamemonthstatusweek1week2week3week4week5
1JohnFEB29..$26$17.
2TinaFEB19..$29$14.

---

SAS 系统 BBBB

Obsnamemonthstatusweek1week2week3week4week5
1John  .....
2John  .....
3Tina  .....
4Tina  .....

---

SAS 系统 CCCC

Obsnamemonthstatusweek1week2week3week4week5
1JohnFEBFinal$13$25$14$27.
2JohnMARCurrent$26$17$29$11$23
3TinaFEBFinal$15$18$12$13.
4TinaMARCurrent$29$14$19$27$20

---

SAS 系统 DDDD

Obsnamemonthstatusweek1week2week3week4week5
1JohnFEBFinal$13$25$14$27.
2JohnMARCurrent$26$17$29$11$23
3TinaFEBFinal$15$18$12$13.
4TinaMARCurrent$29$14$19$27$20