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 .
文章来自于网络,如果侵犯了您的权益,请联系站长删除!