/* question 1 */

data work.CST_Booking;
    format  DPT_DT yymmdd8.;
   informat DPT_DT yymmdd8.;
input DPT_DT;
datalines;
20090101
20080101
; run;

data _null_;
set work.cst_booking;
call symputx('YMDF2Y',put(intnx('month',DPT_DT,-23),yymmddn8.));
run;

/*question2*/
%LET YYYYMM0=201303;      
%LET base_rec_date=%SYSFUNC(mdy(%substr(&YYYYMM0,5,2),1,%substr(&YYYYMM0,1,4)),date9.);


data _null_;
DPT_DT=put(intnx('month',"&base_rec_date"d,-23),yymmddn8.);
put  DPT_DT=;

YMD_EXP=COMPRESS(INPUT(SUBSTR(DPT_DT,1,4),4.)+2||SUBSTR(DPT_DT,5,2)||'31');
put  YMD_EXP=;

YMD_EXP2=COMPRESS(INPUT(SUBSTR(DPT_DT,1,4),4.)+2||SUBSTR(DPT_DT,5,2)||SUBSTR(DPT_DT,7,2));
put  YMD_EXP2=;

YMD_EXP3=intnx('day',input( YMD_EXP2,yymmdd8.),-1);
put  YMD_EXP3  date9.;
run;

/* Question 2 */
data work.CST_Booking;
    format  DPT_DT yymmdd8.;
   informat DPT_DT yymmdd8.;
input DPT_DT;
datalines;
20090101
20080101
; run;

data test;
format YMD_EXP yymmdd8.;
set work.cst_booking;
YMD_EXP = intnx('month', DPT_DT, 24, 'sameday')-1;
call symputx('YMDF2Y',put(intnx('month',DPT_DT,-23),yymmddn8.));
run;

日期转换学习了，谢谢。