程序代码：

    *&---------------------------------------------------------------------*
    *& Report  ZTEST_SMARTFORM
    *&
    *&---------------------------------------------------------------------*
    *&
    *&
    *&---------------------------------------------------------------------*

    REPORT  ZTEST_SMARTFORM.
    INCLUDE zinc_sf_helper .

    DATA: BEGIN OF it_itab OCCURS 0,
            col1 TYPE i,
            col2 TYPE i,
            col3 TYPE i,
            col4 TYPE i,
          END OF it_itab.

    START-OF-SELECTION.
        PERFORM frm_get_data.
        PERFORM frm_print_data.

    *&---------------------------------------------------------------------*
    *&      Form  frm_get_data
    *&---------------------------------------------------------------------*
    *       text
    *----------------------------------------------------------------------*
    FORM frm_get_data.
        DO 20 TIMES.
            it_itab-col1 = it_itab-col1 + 1.
            it_itab-col2 = it_itab-col2 + 2.
            it_itab-col3 = it_itab-col3 + 3.
            it_itab-col4 = it_itab-col4 + 4.
            APPEND it_itab.
        ENDDO.
    ENDFORM.                "frm_get_data

    *&---------------------------------------------------------------------*
    *&      Form  frm_print_data
    *&---------------------------------------------------------------------*
    *       text
    *----------------------------------------------------------------------*
    FORM frm_print_data.
        DATA: m_fm TYPE rs38l_fnam.
        DATA: headername(22) TYPE c.
        DATA: itemsname(22) TYPE c.
        DATA: c_tst(22) TYPE c.
        DATA: l_tst TYPE timestampl.

        CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
        EXPORTING
            formname           = 'ZTEST_CYH3'
        IMPORTING
            fm_name            = m_fm
        EXCEPTIONS
            no_form            = 1
            no_function_module = 2
            OTHERS             = 3.
        IF sy-subrc <> 0.
            MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
                WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
        ENDIF.

        GET TIME STAMP FIELD l_tst.    "long form
        MOVE l_tst TO c_tst.

        CONCATENATE 'ZTEST_CYH3' c_tst+8(14) INTO itemsname .
        savebuffer it_itab[]  itemsname .  "如果要传入多个表的数据就接着savebuffer
    * savebuffer xxxxxxxxxxxxxxxxxx.

        CALL FUNCTION m_fm
            EXPORTING
                ptr            = itemsname  "这里可以传入多个表
    *   xxxxxxxx         = xxxxxxxxxx
        EXCEPTIONS
            formatting_error = 1
            internal_error   = 2
            send_error       = 3
            user_canceled    = 4
            OTHERS           = 5.
        IF sy-subrc <> 0.
            MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
                WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
        ENDIF.

        clearbuffer itemsname .
    ENDFORM.                    "frm_print_data

    INCLUDE程序：

    *&---------------------------------------------------------------------*
    *&  包括                ZINC_SF_HELPER
    *&---------------------------------------------------------------------*
    TYPES buffer_id(80) TYPE c.
    DATA wa_indx TYPE indx.

    DEFINE savebuffer.
        perform save_to_buffer using &1 &2.
    END-OF-DEFINITION.

    DEFINE clearbuffer.
        perform clear_buffer using &1.
    END-OF-DEFINITION.

    *&--------------------------------------------------------------------*
    *&      Form  Save_To_Buffer
    *&--------------------------------------------------------------------*
    *       text
    *---------------------------------------------------------------------*
    *      -->T          text
    *      -->BUFF_ID    text
    *---------------------------------------------------------------------*
    FORM save_to_buffer USING t TYPE table typeid TYPE c .
    wa_indx-aedat = sy-datum.
    wa_indx-usera = sy-uname.
    wa_indx-pgmid = sy-repid.
        EXPORT t TO DATABASE indx(hk) ID typeid from wa_indx.
    ENDFORM.                    "Save_To_Buffer

    *&--------------------------------------------------------------------*
    *&      Form  Clear_Buffer
    *&--------------------------------------------------------------------*
    *       text
    *---------------------------------------------------------------------*
    *      -->BUFF_ID    text
    *---------------------------------------------------------------------*
    FORM clear_buffer USING buffid TYPE c.
        DELETE FROM DATABASE indx(hk) ID buffid.
    ENDFORM.                    "Clear_Buffer

    运行效果：