作业debug - 关于 AT NEW

frankyhc

第二次作业中，我根据KUNRG和MATKL一组数据的改变，打印表头部分。结果如下列程序运行结果，即使KUNRG不变，MATKL也不变，write部分也重复打印了。可以帮忙debug或者解答么？谢谢
--------------------------我是头疼的分割线--------------------------------------------------
LOOP AT IT_VBRK INTO WA_VBRK.
  AT NEW KUNRG.
    READ TABLE IT_VBRP WITH KEY VBELN = WA_VBRK-VBELN INTO WA_VBRP.
    READ TABLE IT_MAKT WITH KEY MATNR = WA_VBRP-MATNR INTO WA_MAKT.
    READ TABLE IT_KNA1 WITH KEY KUNNR = WA_VBRK-KUNRG INTO WA_KNA1.
    READ TABLE IT_T023T WITH KEY MATKL = WA_VBRP-MATKL INTO WA_T023T.
IF CMATKL <> WA_VBRP-MATKL.
     NEW-PAGE.
ENDIF.
    CMATKL = WA_VBRP-MATKL.
    WRITE: TEXT-002, 30 WA_VBRK-KUNRG, 50 WA_KNA1-NAME1.
    WRITE:/ TEXT-003,30 WA_VBRP-MATKL, 50 WA_T023T-WGBEZ.
    ULINE.
    WRITE: TEXT-004,20 TEXT-005, 40 TEXT-006, 50 TEXT-007, 70 TEXT-008, 130 TEXT-009, 140 TEXT-010, 150 TEXT-011.
    ULINE.
    WRITE: WA_VBRK-FKDAT, 20 WA_VBRK-VBELN, 40 WA_VBRP-POSNR, 50 WA_VBRP-MATNR, 70 WA_MAKT-MAKTX, 130 WA_VBRP-FKIMG, 140 WA_VBRP-VRKME, 150 WA_VBRP-NETWR.
  ENDAT.
ENDLOOP.

admin

HEAD部分应该写在AT NEW里面,而发票号应该写在AT NEW后面

frankyhc

找到原因了。
VBELN在内部表中排在了KUNRG之前了。结果凭证号不同，支付人相同，在用NEW KUNRG时候，就造成这样问题。
解决办法，或者将NEW KUNRG写成IF形式，或者更改下两列的顺序。
我更改了两列顺序，这个问题得到初步解决

frankyhc

给自己加分可以？

admin

看来还是要多DEBUG，这样才能发现问题

冰糖葫芦

学习