如何避免循环内循环。

2020-09-16 23:17发布

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

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


亲爱的

我有一个要求,我需要避免以下两个内部循环

KONV表。如何替换这些循环。我正在优化zreport。因此,我需要减少KONV表的这些内部循环。请提出一些解决方法或想法。

在it_vbrp处将LOOP循环到wa_vbrp中。
   读取表it_​​vbrk使用键vbeln = wa_vbrp-vbeln进入wa_vbrk
         二进制搜索。
   环聊it_konv INTO wa_konv
       在哪里knumv = wa_vbrk-knumv和kposn = wa_vbrp-posnr
         AND(kschl ='ZF00'OR kschl ='ZF01'OR kschl ='ZF02'
            或kschl ='ZF03'或kschl ='ZF04'
            或kschl ='ZF05'或kschl ='ZF06'
            或kschl ='ZF07'或kschl ='ZFCD'
            或kschl ='ZFI2'或kschl ='ZFIM'
            或kschl ='ZIFI')。

     如果wa_vbrk-waerk ='USD'。
       wa_konv-kwert = wa_konv-kwert/100。
     万一。
     tafkwert = tafkwert + wa_konv-kwert。
     wa_final-fkwert = wa_final-fkwert + wa_konv-kwert。
     wa_final-netwr = wa_final-netwr + wa_konv-kwert。
   结局。

   循环到it_konv INTO wa_konv处knumv = wa_vbrk-knumv
                                  AND kposn = wa_vbrp-posnr
                                  AND(kschl ='ZF01'或kschl ='ZF05')。
     如果wa_vbrk-waerk ='USD'。
       wa_konv-kwert = wa_konv-kwert/100。
     万一。
     wa_konv-kwert = wa_konv-kwert。

     tlfkwert = tlfkwert + wa_konv-kwert。"少运费
     wa_final-lfkwert = wa_konv-kwert。"少运费
     wa_final-netwr = wa_final-netwr + wa_konv-kwert。
   结局。
 结局。
 

请提出一些想法或解决方法。

致谢

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

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


亲爱的

我有一个要求,我需要避免以下两个内部循环

KONV表。如何替换这些循环。我正在优化zreport。因此,我需要减少KONV表的这些内部循环。请提出一些解决方法或想法。

在it_vbrp处将LOOP循环到wa_vbrp中。
   读取表it_​​vbrk使用键vbeln = wa_vbrp-vbeln进入wa_vbrk
         二进制搜索。
   环聊it_konv INTO wa_konv
       在哪里knumv = wa_vbrk-knumv和kposn = wa_vbrp-posnr
         AND(kschl ='ZF00'OR kschl ='ZF01'OR kschl ='ZF02'
            或kschl ='ZF03'或kschl ='ZF04'
            或kschl ='ZF05'或kschl ='ZF06'
            或kschl ='ZF07'或kschl ='ZFCD'
            或kschl ='ZFI2'或kschl ='ZFIM'
            或kschl ='ZIFI')。

     如果wa_vbrk-waerk ='USD'。
       wa_konv-kwert = wa_konv-kwert/100。
     万一。
     tafkwert = tafkwert + wa_konv-kwert。
     wa_final-fkwert = wa_final-fkwert + wa_konv-kwert。
     wa_final-netwr = wa_final-netwr + wa_konv-kwert。
   结局。

   循环到it_konv INTO wa_konv处knumv = wa_vbrk-knumv
                                  AND kposn = wa_vbrp-posnr
                                  AND(kschl ='ZF01'或kschl ='ZF05')。
     如果wa_vbrk-waerk ='USD'。
       wa_konv-kwert = wa_konv-kwert/100。
     万一。
     wa_konv-kwert = wa_konv-kwert。

     tlfkwert = tlfkwert + wa_konv-kwert。"少运费
     wa_final-lfkwert = wa_konv-kwert。"少运费
     wa_final-netwr = wa_final-netwr + wa_konv-kwert。
   结局。
 结局。
 

请提出一些想法或解决方法。

致谢

付费偷看设置
发送

一周热门 更多>