abap 日期格式转换

转载地址：ABAP日期格式转换成SAP内部格式_用户1562829431_新浪博客（亲测有效）

应用场景：将excel的数据导入到 abap内表的时候，excel 储存的日期格式为 YYYY/MM/DD，sap内部的标准格式为YYYYMMDD，需要通过一个函数，将格式进行转换。

FORM formatdate CHANGING L_PDATU  .
     DATA : L_Y(4) TYPE C ,
            L_M(2) TYPE C ,
            L_D(2) TYPE C ,
            L_T(10) TYPE C ,
            L_N TYPE I .
    L_T = L_PDATU+5(5) .
    L_Y = L_PDATU+0(4) .
    SEARCH L_T FOR '/'.
     IF sy-fdpos = 2 .
        L_M = l_pdatu+5(2) .
        L_D = l_pdatu+8(2) .
    ENDIF .
     IF sy-fdpos = 1 .
        L_M = l_pdatu+5(1) .
        L_D = l_pdatu+7(2) .
     ENDIF .
    L_N = L_M .
     IF L_N < 10 .
         CONCATENATE '0' L_M INTO L_M .
     ENDIF .
    L_N = L_D .
    IF L_N < 10 .
         CONCATENATE '0' L_D INTO L_D .
     ENDIF .
    CONCATENATE L_Y L_M L_D INTO L_PDATU .
ENDFORM .