图有点乱，下边的是图一，上边的是图二

input输入格式有待商榷

楼上正解

data test;
     length trddt  trddt_long  $20.;
     format trddt  trddt_long  $20.
            date   yymmdd10.
            date_L yymmdd10.;
   informat trddt trddt_long $20.
            date yymmdd10.
            date_L yymmdd10.;

    input trddt trddt_long;

            date = input(trddt,      yymmdd10.);
        date_L = input(trddt_long, yymmdd10.);
          year = year(date);
        year_L = year(date_L);

datalines;
2013-01-02 2013-01-03:11:23:07
2012-02-01 2012-02-02:22:01:03
2011-04-01 2011-03-03:01:01:01
;

proc print data=test; title 'test'; run;
test

output

                                            test

Obs    trddt                             trddt_long                    date              date_L         year    year_L

1     2013-01-02              2013-01-03:11:23:07     2013-01-02    2013-01-03    2013     2013
2     2013-02-01              2013-02-02:22:01:03     2013-02-01    2013-02-02    2013     2013
3     2013-04-01              2013-03-03:01:01:01     2013-04-01    2013-03-03    2013     2013


proc contents data=test; run;

output
         Alphabetic List of Variables and Attributes

#    Variable      Type    Len    Format       Informat

3    date              Num       8    YYMMDD10.    YYMMDD10.
4    date_L          Num       8    YYMMDD10.    YYMMDD10.
1    trddt            Char     20    $20.         $20.
2    trddt_long    Char     20    $20.         $20.
5    year             Num       8
6    year_L         Num       8

谢谢~问题已解决~O(∩_∩)O~

谢谢！用你的方法，问题已经解决~~