谢谢大家了!
DATA _NULL_;
FILE &MYLIB;
SET TMP5.WRK;
IF BEG = TERM THENDELETE;
IF TERM = . THENTERM2 = '9901-01-01';
ELSE TERM2 =PUT(TERM,YYMMDD10.);
SPACE = ' ';
PUT @001 MBR2 $2.
@003 LNAME $25.
@028 FNAME $18.
.
.
.
;
RUN;
DATA _NULL_;
FILE &MYLIB1;
SET TMP6.WRK;
IF BEG = TERM THENDELETE;
IF TERM = . THENTERM2 = '9901-01-01';
ELSE TERM2 =PUT(TERM,YYMMDD10.);
SPACE = ' ';
PUT @001 MBR2 $2.
@003 LNAME $25.
@028 FNAME $18.
;
RUN;



雷达卡


京公网安备 11010802022788号







