如何把内表数据从行转为列

SAP_Damon

已于 2024-02-21 13:11:03 修改

阅读量492

点赞数 9

文章标签： sap SAP ABAP

于 2024-02-21 13:03:30 首次发布

本文链接：https://blog.csdn.net/tsj19881202/article/details/136209052

版权

实战代码：



  DATA: lr_alv_data TYPE REF TO data.

  FIELD-SYMBOLS : <lt_alv_data> TYPE ANY TABLE .
  FIELD-SYMBOLS : <ls_data> TYPE any.

  DATA lt_sap_all TYPE STANDARD TABLE OF  eop_cal_s.
  DATA ls_sap_all TYPE  eop_cal_s.
  DATA ls_output TYPE eop_alv_s.
  DATA lt_output TYPE STANDARD TABLE OF  eop_alv_s.


  "Convert row data to column data

  LOOP AT lt_sap_all INTO ls_sap_all.
    READ TABLE lt_output ASSIGNING FIELD-SYMBOL(<ls_col>) WITH KEY desc = ls_sap_all-desc.
    IF sy-subrc <> 0.
      CLEAR ls_output.
      ls_output-desc = ls_sap_all-desc.
      INSERT ls_output INTO TABLE lt_output ASSIGNING <ls_col>.
    ENDIF.
    IF <ls_col> IS ASSIGNED .
      ASSIGN COMPONENT ls_sap_all-z01trck OF STRUCTURE <ls_col> TO FIELD-SYMBOL(<ls_sl>).
      IF sy-subrc EQ 0.
        <ls_sl> = ls_sap_all-qty.
      ENDIF.
    ENDIF.
    CLEAR ls_sap_all.
  ENDLOOP.