CALL TRANSACTION 'SUIM' AND SKIP FIRST SCREEN.

SET PARAMETER ID: '屏幕字段' FIELD   填充的字段值,

                 '屏幕字段' FIELD 填充的字段值.

CALL TRANSACTION  'DEMO_TRANSACTION'.

  FREE MEMORY ID g_memory.

    "将结果导出到主调用程序

    EXPORT gt_mard FROM gt_mard TO MEMORY ID g_memory.

SUBMIT 目标程序名 WITH 选择屏幕字段(单值) = 填充字段值

                                      WITH 选择屏幕字段(单值) = 填充字段值

                           "传递selection类型的参数到被调用程序中

                                      WITH SELECTION-TABLE(范围值或内表) gt_tabsel(内表或范围值)

                           AND RETURN.

   "从被调用程序中导入结果

  IMPORT gt_mard TO gt_mard FROM MEMORY ID g_memory.

  FREE MEMORY ID  g_memory.

最后为不影响源程序，在源程序选择屏幕中加一段，当p_call = ‘X’,导出数据

PARAMETERS:p_call TYPE c NO-DISPLAY.