Question

我正在输出一个包含一些发票和详细信息的列表，我希望它们按实体显示。它现在显示的方式是在列表的每一行中重复实体编号和名称，但是我想将它分组到例如，例如有4张发票：每个实体两张;它应该显示实体和所有相应的发票，然后显示另一个实体，依此类推。有人有什么想法吗？谢谢。

我的代码就是这个：

FORM select_data3 CHANGING lt_data LIKE gt_map1。 FIELD-SYMBOLS：TYPE zimposto_consumo。
SELECT a~belnr d~spart a~bldat a~waers c~wrbtr a~hwaer c~dmbtr
INTO CORRESPONDING FIELDS OF TABLE lt_data
FROM ( ( bkpf AS a
INNER JOIN bsis AS c ON c~belnr = a~belnr
                      AND buzei = 1 )
INNER JOIN vbrk AS d ON d~xblnr = c~belnr )
WHERE a~gjahr in gjahr.
在lt_data分配时循环。
clear <fs_main>-kbetr.
clear <fs_main>-fwste.
clear <fs_main>-hwste.
SELECT SINGLE kbetr fwste hwste FROM bset
  INTO (<fs_main>-kbetr, <fs_main>-fwste, <fs_main>-hwste)
  WHERE belnr = <fs_main>-belnr.

clear <fs_main>-koart.
SELECT SINGLE koart kunnr FROM bseg
  INTO (<fs_main>-koart, wa_bseg-kunnr)
  WHERE belnr = <fs_main>-belnr.
如果-koart ='D'。

SELECT SINGLE name1 FROM kna1       INTO（wa_bseg-name1）       kherenr = wa_bseg-kunnr。
IF sy-subrc = 0.
  FORMAT COLOR COL_TOTAL INTENSIFIED ON.

    WRITE:/ sy-uline(137), / sy-vline NO-GAP,
                    2 'Entidade: ', wa_bseg-kunnr, wa_bseg-name1,
                    137 sy-vline NO-GAP, / sy-uline(137).
格式化颜色   COL_NORMAL强化关闭。           写：/                   sy-vline NO-GAP，                   （16）-belnr NO-GAP，                   sy-vline NO-GAP，                   （16） - 部分NO-GAP，                   sy-vline NO-GAP，                   （10）-bldat NO-GAP，                   sy-vline NO-GAP。                   perc = -kbetr / 10。   ...   ENDLOOP。

端部结构。

Answer 1

只需要使用“at new ... endat”。宣言。

按实体ABAP分组发票

1 个答案: