【SAPABAP】如何实现跨系统传输请求程序

内容： 当某公司有多个平行系统时，比如 多个dev ，但是部署在不同服务器。有时候需要传输请求至其它系统。

PS：传输至同系统中的不同client 用TCODE: SCC1.

*&---------------------------------------------------------------------*
*& Report ZTRANS_TR
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT ztrans_tr.

INCLUDE ztrans_tr_top.
INCLUDE ztrans_tr_form.





AT SELECTION-SCREEN ON VALUE-REQUEST FOR s_tr-low.
  PERFORM frm_value_trkorr.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_dfname.
*  PERFORM frm_upload_file.

* call f4-help
  PERFORM frm_valreq_ftfront USING
                            '1000'
                            'Quelldatei auf Frontend'(007).

START-OF-SELECTION.

  PERFORM frm_get_data.
  PERFORM frm_down_file.
*&---------------------------------------------------------------------*
*&      Form  FRM_VALUE_TRKORR
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
FORM frm_value_trkorr .

  DATA: lv_trfunctions  LIKE  trpari-w_longstat,
        lv_trstatus     LIKE  trpari-w_longstat,
        lv_trkorr       TYPE  e070-trkorr,
        ls_dynpfield  LIKE dynpread,
        lt_dynpfields LIKE dynpread    OCCURS 0.

  lv_trfunctions = sctsc_types_all.
  lv_trstatus    = sctsc_states_changeable.

  GET CURSOR FIELD ls_dynpfield-fieldname.
  APPEND ls_dynpfield TO lt_dynpfields.

  CALL FUNCTION 'DYNP_VALUES_READ'
       EXPORTING
            dyname     = 'ZTRANS_TR'
            dynumb     = sy-dynnr
       TABLES
            dynpfields = lt_dynpfields.

  READ TABLE lt_dynpfields INTO ls_dynpfield INDEX 1.
  lv_trkorr = ls_dynpfield-fieldvalue.

  CALL FUNCTION 'TR_F4_REQUESTS'
       EXPORTING
            iv_username         = space
            iv_trkorr_pattern   = lv_trkorr
            iv_trfunctions      = lv_trfunctions
            iv_trstatus         = lv_trstatus
       IMPORTING