REPORT  ZSMARTFORMS_07.

DATA : FORM_NAME TYPE RS38L_FNAM,
       L_NAME(20) TYPE C,
       L_ADDRESS(200) TYPE C,
       L_PHONE(13) TYPE C,
       L_TEL(13) TYPE C,
       GT_SFLIGHT LIKE SFLIGHT OCCURS 0 WITH HEADER LINE.

L_NAME    = '홍길동'.
L_ADDRESS = '서울시 OO구 OO동'.
L_PHONE   = '010-1234-5678'.
L_TEL     = '02-123-4567'.

* SFLIGHT 테이블에서 데이터를 가지고 와서 GT_SFLIGHT에 담아둔다.
SELECT * INTO TABLE GT_SFLIGHT
  FROM SFLIGHT.

* ZSMARTFORMS_03의 함수명을 가지고 온다.
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
  EXPORTING
    FORMNAME           = 'ZSMARTFORMS_06'
  IMPORTING
    FM_NAME            = FORM_NAME
  EXCEPTIONS
    NO_FORM            = 1
    NO_FUNCTION_MODULE = 2
    OTHERS             = 3.

* ZSMARTFORMS_06의 함수를 호출한다.
*CALL FUNCTION '/1BCDWB/SF00000215'
CALL FUNCTION FORM_NAME
  EXPORTING
    NAME       = L_NAME
    ADDRESS    = L_ADDRESS
    PHONE      = L_PHONE
    TEL        = L_TEL
          .
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.