ZFI19135 双层循环取管控对账信息

最新推荐文章于 2023-03-02 13:27:08 发布

zq35185

最新推荐文章于 2023-03-02 13:27:08 发布

阅读量72

点赞数

文章标签： abap

本文链接：https://blog.csdn.net/zq35185/article/details/119975936

版权

第一层循环在最后结束。
LOOP AT IT_GK_KMYE .
TAB_KMYE_O-HKONT = IT_GK_KMYE-HKONT .
TAB_KMYE_O-GKKMBH = IT_GK_KMYE-GKKMBH .
TAB_KMYE_O-GKKMMC = IT_GK_KMYE-GKKMMC .
TAB_KMYE_O-QMFX = IT_GK_KMYE-QMFX .
TAB_KMYE_O-QMYE = IT_GK_KMYE-QMYE .
TAB_KMYE_O-ZZFI02 = IT_GK_KMYE-ZZFI02 .
TAB_KMYE_O-ZZFI03 = IT_GK_KMYE-ZZFI03 .
TAB_KMYE_O-ZZFI04 = IT_GK_KMYE-ZZFI04 .
TAB_KMYE_O-ZZFI09 = IT_GK_KMYE-ZZFI09 .
TAB_KMYE_O-ZZFI10 = IT_GK_KMYE-ZZFI10 .
TAB_KMYE_O-ZDNLX = IT_GK_KMYE-ZDNLX .
TAB_KMYE_O-ZRZLX = IT_GK_KMYE-ZRZLX .
TAB_KMYE_O-ZYHZH = IT_GK_KMYE-ZYHZH .
APPEND TAB_KMYE_O .
CLEAR WA_KMYE.
第二层循环先于第一层结束
LOOP AT IT_KMYE INTO WA_KMYE WHERE HKONT = IT_GK_KMYE-GKKMBH
AND ERP_ZZFI09 = IT_GK_KMYE-ZZFI09
AND ERP_ZZFI10 = IT_GK_KMYE-ZZFI10
AND ERP_ZZFI02 = IT_GK_KMYE-ZZFI02
AND ERP_ZZFI03 = IT_GK_KMYE-ZZFI03
AND ERP_ZZFI04 = IT_GK_KMYE-ZZFI04
AND ERP_ZYHZH = IT_GK_KMYE-ZYHZH
AND ERP_ZDNLX = IT_GK_KMYE-ZDNLX
AND ERP_ZRZLX = IT_GK_KMYE-ZRZLX.
WA_KMYE-GKKMBH = IT_GK_KMYE-GKKMBH .
WA_KMYE-GKKMMC = IT_GK_KMYE-GKKMMC .
WA_KMYE-GK_ZZFI02 = IT_GK_KMYE-ZZFI02.
WA_KMYE-GK_ZZFI03 = IT_GK_KMYE-ZZFI03.
WA_KMYE-GK_ZZFI04 = IT_GK_KMYE-ZZFI04.
WA_KMYE-GK_ZZFI09 = IT_GK_KMYE-ZZFI09.
WA_KMYE-GK_ZZFI10 = IT_GK_KMYE-ZZFI10.
WA_KMYE-GK_ZYHZH = IT_GK_KMYE-ZYHZH.
WA_KMYE-GK_ZDNLX = IT_GK_KMYE-ZDNLX.
WA_KMYE-GK_ZRZLX = IT_GK_KMYE-ZRZLX.
MODIFY IT_KMYE FROM WA_KMYE .
ENDLOOP .
结束第二层循环，继续第一层循环
IF WA_KMYE-GKKMBH IS INITIAL."管控有数据而ERP无数据的记录追加到内表展示出来
CLEAR IT_KMYE .
IT_KMYE-GKKMBH = IT_GK_KMYE-GKKMBH .
IT_KMYE-GKKMMC = IT_GK_KMYE-GKKMMC .
IT_KMYE-GK_ZZFI02 = IT_GK_KMYE-ZZFI02.
IT_KMYE-GK_ZZFI03 = IT_GK_KMYE-ZZFI03.
IT_KMYE-GK_ZZFI04 = IT_GK_KMYE-ZZFI04.
IT_KMYE-GK_ZZFI09 = IT_GK_KMYE-ZZFI09.
IT_KMYE-GK_ZZFI10 = IT_GK_KMYE-ZZFI10.
IT_KMYE-GK_ZYHZH = IT_GK_KMYE-ZYHZH.
IT_KMYE-GK_ZDNLX = IT_GK_KMYE-ZDNLX.
IT_KMYE-GK_ZRZLX = IT_GK_KMYE-ZRZLX.
APPEND IT_KMYE .
ENDIF.