sap submit 的例子应用

DATA:rspar_tab TYPE TABLE OF  rsparams,wa_rspar  LIKE  rsparams.
  DATA:rspar_tab1 TYPE TABLE OF  rsparams,
       rspar_tab2 TYPE TABLE OF rsparams.
  DEFINE rsp.
    wa_rspar-selname = &1.
    wa_rspar-kind = 'P'.
    wa_rspar-sign = 'I'.
*    wa_rspar-option = 'BT'.
    wa_rspar-option = 'EQ'.
    wa_rspar-low  = &2.
*    wa_rspar-high = &3.
    append wa_rspar to rspar_tab.
  END-OF-DEFINITION.

loop 内表 取到调用程序屏幕上的字段数据

  LOOP AT lt_ekko.
    rsp : 'GR_EBELN' lt_ekko-ebeln ,"lt_ekko-ebeln,
          'GR_LIFNR' lt_ekko-lifnr ,"lt_ekko-lifnr,
          'GR_MATNR' lt_ekko-matnr ,"lt_ekko-matnr,
          'GR_ZKFNF' lt_ekko-zzkfnf ,"lt_ekko-zzkfnf,
          'GR_ZKFJJ' lt_ekko-zzkfjj ,"lt_ekko-zzkfjj,
          'GR_ZPPBM' lt_ekko-zzppbm ,"lt_ekko-zzppbm.
*****************************
          'SO_MATNR' lt_ekko-matnr ,"lt_ekko-matnr,
          'SO_LIFNR' lt_ekko-lifnr ,"lt_ekko-lifnr,
          'SO_EBELN' lt_ekko-ebeln ,"lt_ekko-ebeln,
************
          'P_AH' 'X'.
  ENDLOOP.

SUBMIT zmm0377 USING SELECTION-SCREEN '1000'
                   WITH SELECTION-TABLE rspar_tab
                   EXPORTING LIST TO MEMORY
                     AND RETURN.
  IMPORT gt_data[] FROM MEMORY ID 'ZMMR074'.
  FREE MEMORY ID 'ZMMR074'.
  SORT gt_data .

不要忘记 gt_data 定义成与被调用程序的输出alv的内表一样

上面的是需要写在自己创建的程序中 

下面来看看被调用的程序中

  FREE MEMORY ID 'ZMMR074'.
  EXPORT gt_data[] TO MEMORY ID 'ZMMR074'.

注意： 在被调用程序将 展示的 perform showdata的子程序注释掉