SAP_ABAP_双击跳转新程序

  WHEN '&IC1'.
      READ TABLE gt_output ASSIGNING FIELD-SYMBOL() INDEX rs_selfield-tabindex.
      IF sy-subrc = 0 .
        SUBMIT zmm020_m  WITH p_belnr = -belnr WITH p_gjahr = -gjahr WITH p_bukrs = -bukrs AND RETURN.
      ENDIF.

 WHEN '&IC1'.
      READ TABLE gt_output ASSIGNING FIELD-SYMBOL() INDEX rs_selfield-tabindex.
      IF sy-subrc = 0 .
        SUBMIT zmm020_m  WITH p_belnr = -belnr WITH p_gjahr = -gjahr WITH p_bukrs = -bukrs AND RETURN.
      ENDIF.

你可能感兴趣的:(Abap编程,经验分享)