會計憑證BTE替代 程式碼寫法

 LOOP AT T_BSEG[] ASSIGNING FIELD-SYMBOL(<FS_BSEG>).
          READ TABLE T_BSEGSUB[] ASSIGNING FIELD-SYMBOL(<FS_TBSEG>) INDEX SY-TABIX.
          IF SY-SUBRC = 0.
            IF <FS_BSEG>-KOART = 'K'.
              <FS_TBSEG>-HKONT = LS_ASSETS-KEY4TEXT.
            ENDIF.
          ENDIF.
        ENDLOOP.

根據SY-TABIX 讀取T_BSEGSUB 修改即可