Form doesn't exists after calling driver program

Question

Hi,
     I had created a invoice form, and i called through driver program in se38.After executing i m getting as 'Form doesn't exists'.
'zinvoice1'   is the name of the smartform.
Code as follows:
REPORT  ZINVOICE1.
tables: kna1,vbrp,vbrk.
parameters: p_kunnr like vbrk-kunag,
            p_vbeln like vbrk-vbeln.
data : fm_name type rs38l_fnam.
data: t_vbrp like standard table of vbrp,
      t_vbrk like standard table of vbrk.
data: fs_kna1 type kna1,
      fs_vbrk like line of t_vbrk,
      fs_vbrp like line of t_vbrp.
start-of-selection.
select single * from kna1 into fs_kna1
       where kunnr eq p_kunnr.
select * from vbrk into table t_vbrk
        where kunag eq p_kunnr and vbeln eq p_vbeln.
select * from vbrp into table t_vbrp for all entries in t_vbrk
         where vbeln = t_vbrk-vbeln.
  CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
    EXPORTING
      FORMNAME                 = 'zinvoice1'
    VARIANT                  = ' '
    DIRECT_CALL              = ' '
   IMPORTING
     FM_NAME                  = fm_name
  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.
  CALL FUNCTION '/1BCDWB/SF00000050'
  EXPORTING
    ARCHIVE_INDEX              =
    ARCHIVE_INDEX_TAB          =
    ARCHIVE_PARAMETERS         =
    CONTROL_PARAMETERS         =
    MAIL_APPL_OBJ              =
    MAIL_RECIPIENT             =
    MAIL_SENDER                =
    OUTPUT_OPTIONS             =
    USER_SETTINGS              = 'X'
      IM_FS_KNA1                 = fs_kna1
      IM_T_VBRP                  = t_vbrp
  IMPORTING
    DOCUMENT_OUTPUT_INFO       =
    JOB_OUTPUT_INFO            =
    JOB_OUTPUT_OPTIONS         =
    TABLES
      IM_T_VBRK                  = t_vbrk
  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.

Answer 1

CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
EXPORTING
FORMNAME = 'ZINVOICE1'
VARIANT = ' '
DIRECT_CALL = ' '
IMPORTING
FM_NAME = fm_name
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.
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'
IM_FS_KNA1 = fs_kna1
IM_T_VBRP = t_vbrp
IMPORTING
DOCUMENT_OUTPUT_INFO =
JOB_OUTPUT_INFO =
JOB_OUTPUT_OPTIONS =
TABLES
IM_T_VBRK = t_vbrk
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.