输出INPUT ON读入内表更新透明表

WRITE: (18)   itab-matnr   NO-GAP INPUT ON. 输出时,这个字段是可以修改输入的状态。

下面是将有变动的数据读入内表.

DO.
        CLEAR tcheck.
        READ LINE sy-index OF CURRENT PAGE FIELD VALUE
                                 check       INTO tcheck
                                  itab-matnr  INTO itab2-matnr
.

IF sy-subrc <> 0.
          EXIT.
        ENDIF.

itab2-matnr = itab-matnr.

IF tcheck = 'X'.       
        APPEND itab2. CLEAR itab2.
        endif.
     enddo.

modify ztable FROM TABLE itab2.

posted @ 2011-08-21 23:09  VerySky  阅读(270)  评论(0)    收藏  举报