SAP ABAP 在已定义好的结构体中添加一条类型为String的字段

最新推荐文章于 2023-03-08 14:16:42 发布

GingerGY

最新推荐文章于 2023-03-08 14:16:42 发布

阅读量529

点赞数

分类专栏： SAP ABAP 文章标签： sap abap

本文链接：https://blog.csdn.net/weixin_39531816/article/details/126123072

版权

SAP ABAP 专栏收录该内容

5 篇文章 0 订阅

订阅专栏

前面是我判断的逻辑

" append component to componentstable
  CASE gs_component-name.
    WHEN 'DOCUMENTHEADER_Z_DOC_DATE'.
      gs_component-type ?= cl_abap_elemdescr=>get_string( ).
      APPEND gs_component TO gt_components.
    WHEN 'DOCUMENTHEADER_Z_PSTNG_DATE'.
      gs_component-type ?= cl_abap_elemdescr=>get_string( ).
      APPEND gs_component TO gt_components.
    WHEN 'ACCOUNTGL_Z_VALUE_DATE'.
      gs_component-type ?= cl_abap_elemdescr=>get_string( ).
      APPEND gs_component TO gt_components.
    WHEN OTHERS.
      gs_component-type ?= cl_abap_datadescr=>describe_by_data( <fs_field> ).
      APPEND gs_component TO gt_components.
  ENDCASE.

  gs_component_upl-type ?= cl_abap_datadescr=>describe_by_data( <fs_field_upl> ).
  APPEND gs_component_upl TO gt_components_upl.

通过 CONVERT_DATE_TO_INTERNAL来实现

" convert dates to internal format
IF gs_component-name EQ 'DOCUMENTHEADER_Z_DOC_DATE' OR gs_component-name EQ 'DOCUMENTHEADER_Z_PSTNG_DATE' OR gs_component-name EQ 'ACCOUNTGL_Z_VALUE_DATE'." Inserted by ERDK909923
CALL FUNCTION 'CONVERT_DATE_TO_INTERNAL'
EXPORTING
   date_external            = <fs_fname>
IMPORTING
   date_internal            = <fs_fname2>
EXCEPTIONS
   date_external_is_invalid = 1
   OTHERS                   = 2.
   IF sy-subrc <> 0.
      <fs_fname2> = <fs_fname>.
   ENDIF.
   ELSE.
   <fs_fname2> = <fs_fname>.
 ENDIF.