SAP ABAP 程序调用FORM

 *&---------------------------------------------------------------------*
 *& Report  ZHAIM_FORM_TEST
 *&
 *&---------------------------------------------------------------------*
 *&
 *&
 *&---------------------------------------------------------------------*

 REPORT  ZHAIM_FORM_TEST.

 DATA: FM_NAME TYPE RS38l_FNAM.

 CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
   EXPORTING
     FORMNAME                 = 'ZHAIMTEXT_001'
 *   VARIANT                  = ' '
 *   DIRECT_CALL              = ' '
   IMPORTING
     FM_NAME                  = FM_NAME
 * EXCEPTIONS
 *   NO_FORM                  = 1
 *   NO_FUNCTION_MODULE       = 2
 *   OTHERS                   = 3
           .
 IF SY-SUBRC <> .
 * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 *         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 ENDIF.

 CALL FUNCTION FM_NAME
 * EXPORTING
 *   ARCHIVE_INDEX              =
 *   ARCHIVE_INDEX_TAB          =
 *   ARCHIVE_PARAMETERS         =
 *   CONTROL_PARAMETERS         =
 *   MAIL_APPL_OBJ              =
 *   MAIL_RECIPIENT             =
 *   MAIL_SENDER                =
 *   OUTPUT_OPTIONS             =
 *   USER_SETTINGS              = 'X'
 * IMPORTING
 *   DOCUMENT_OUTPUT_INFO       =
 *   JOB_OUTPUT_INFO            =
 *   JOB_OUTPUT_OPTIONS         =
 * EXCEPTIONS
 *   FORMATTING_ERROR           = 1
 *   INTERNAL_ERROR             = 2
 *   SEND_ERROR                 = 3
 *   USER_CANCELED              = 4
 *   OTHERS                     = 5
           .
 IF SY-SUBRC <> .
 * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 *         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 ENDIF.