zoukankan      html  css  js  c++  java
  • SY-SUBRC

    一般是对read table和select语句使用。

    loop at g_it_data where level < <wa_data>-level and seq < <wa_data>-seq and  ( item_category 'M' and assembly 'X' or level ).
            <wa_data>-cpmtr = g_it_data-cpmtr.
            if <wa_data>-cpmtr is not initial.
              exit.
            endif.
          endloop.

    if <wa_data>-cpmtr is not initial. 不要写成 if sy-subrc = 0,这样的逻辑是有问题的。

    下面这段代码问题很严重:

            CLEAR g_it_data.
          READ TABLE g_it_data WITH KEY cpmtr = <wa_data>-cpmtr level = <wa_data>-level .
          IF sy-subrc eq 0.
            IF g_it_data-ctgry IS NOT INITIAL.
              <wa_data>-ctgry = g_it_data-ctgry.
            ENDIF.
          ELSE.
            CLEAR: tmp_sublevel,g_it_data.
            tmp_sublevel = <wa_data>-level + 1.
            READ TABLE g_it_data WITH KEY cpmtr = <wa_data>-cpmtr level = tmp_sublevel.
            IF sy-subrc eq 0.
              <wa_data>-ctgry = g_it_data-ctgry.
            ENDIF.
          ENDIF.

    自己写这段代码的目的是,先从同样level,同样cpmtr的记录里去找,找不到就往下一层去找。

    当在同样的level找时,read table一但有记录,那么sy-subrc就为零,没读到才不会为零,才会继续在g_it_data里去找下一层。

    注意这里,本意是找不到就往下一层找,而代码是read table,没有找到同样level,同样cpmtr的记录就往下找,可是同一个内表里,肯定是会让read table的sy-subrc为零的。

    这里应该换判断,不使用嵌套的read table,而是像上面一样,单独判断“ctgry”是否为零。

  • 相关阅读:
    python基础之函数
    MySQL 安装 5.0
    MySQL安装 MySQL5.7.10免安装版配置,mysql5.7.10免安装版
    安装MYSql Windows7下MySQL5.5.20免安装版的配置
    网站集合
    andorid 开放工具集合
    Win7 x64 Eclipse无法识别手机 / adb interface有黄色感叹号,无法识别
    字符集 ISO-8859-1(3)
    字符集 ISO-8859-1(2)
    字符集 ISO-8859-1(1)
  • 原文地址:https://www.cnblogs.com/aurora-cj/p/9397254.html
Copyright © 2011-2022 走看看