点击此处--->   群内免费提供SAP练习系统（在群公告中）

加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）

我的要求是使用带有4或5个循环的并行游标。 我想将此代码转换为

在it_mard INTO wa_mard中循环。

wa_final-matnr = wa_mard-matnr。
wa_final-werks = wa_mard-werks。
wa_final-lgort = wa_mard-lgort。
wa_final-lgort。 labst = wa_mard-labst。


清除：wa_mseg，wa_ser03，wa_objk。
在it_mseg处放入wa_mseg，其中matnr = wa_mard-matnr
和werks = wa_mard-werks
lgort = wa_mard-lgort。


wa_final-aufnr = wa_mseg-aufnr。


在it_ser03上循环到wa_ser03在mblnr = wa_mseg-mblnr。
在it_objk上循环 在into wa_objk中obknr = wa_ser03-obknr。

清除：wa_final-status2。

如果wa_mseg-bwart ='261'。 -----------------------
wa_final-status ='已消耗'.---------------- -----
wa_final-status2 ="活动"。----------------------
清除：wa_final-plnbez，wa_final-bldat 。

读取表it_​​afko使用键aufnr = wa_mseg-aufnr进入wa_afko。

如果sy-subrc =0。
wa_final-plnbez = wa_afko-plnbez。
ENDIF。 br>
读取表it_​​mkpf使用键mblnr = wa_mseg-mblnr插入wa_mkpf。

如果sy-subrc =0。
wa_final-bldat = wa_mkpf-bldat。
ENDIF。
-------------------------------------------------- -----------------------------------要添加
ELSEIF wa_mseg-bwart ='551'。
CLEAR：wa_final-status2。
wa_final-status2 ="废料"。
wa_final-status2 ="无效"。

如果wa_final-status ='Scrap'。
CLEAR wa_final-aufnr。
ENDIF。
wa_final-date =''。
ENDIF。

wa_final-sernr = wa_objk-sernr。
SHIFT wa_final-sernr左删除指针为'0 '。
APPEND wa_final到它_final。
ENDLOOP。
ENDLOOP。
ENDLOOP。


* ------------- -------------------------------------------------- -

将it_view循环到wa_view中，matnr = wa_mard-matnr
AND b_werk = wa_mard-werks
AND b_lager = wa_mard-lgort。

清除：wa_final-plnbez， wa_final-bldat。

如果wa_view-b_lager ='112A'或wa_view-b_lager ='113A'或wa_view-b_lager ='114A'或wa_view-b_lager ='111V'。
清除：wa_final- status2。

wa_final-status ='正在生产'。
wa_final-date = wa_view-aedat。
wa_final-status2 =''。
如果wa_final-status ='正在生产 生产'。
CLEAR wa_final-aufnr。
ENDIF。
ELSE。
CLEAR：wa_final-status2。

wa_final-status ='Available'。
wa_final-date =''。
wa_final-status2 =''。

如果wa_final-status ='Available'。
清除wa_final-aufnr。
ENDIF。
ENDIF。
wa_final-sernr = wa_view-sernr。
SHIFT wa_final-sernr左删除领先'0'。
将wa_final附加到it_final。
ENDLOOP。
ENDLOOP。