smartform using standard form

[Former Member]

hi,

I am using standard form from NACE-V3-BILLING-J1I0-ZSDF_EXCISE_INVOICE1.How to

write driver program for that.suggest some ideas.

[Former Member]

Hi,

Call the Function Module that was generated for the form in your main program & pass all the required parameters to it.

The FM shall call the Form from your main program and execute it.

Hope this help's!!

Thanks

Ravi

[Former Member]

Hello friend,

u have to write normal report its nothing but driver program in that program u need call u r smartform in that using the FM SSF_FUNCTION_MODULE_NAME small exp i can give u....

REPORT ZRGSSAMPLE.

TABLES: EKPO.

DATA: FM_NAME TYPE RS38L_FNAM.----Function Module which genarated when u run the smartform

PARAMETERS: P_EBELN LIKE EKPO-EBELN.

DATA: IT_EKPO LIKE EKPO OCCURS 0 WITH HEADER LINE.

SELECT * FROM EKPO INTO TABLE IT_EKPO

WHERE EBELN = P_EBELN.

CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'

EXPORTING

FORMNAME = 'ZRGS_SAMPLE' -

---

smartform Name

• 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'

I_EBELN = P_EBELN

• IMPORTING

• DOCUMENT_OUTPUT_INFO =

• JOB_OUTPUT_INFO =

• JOB_OUTPUT_OPTIONS =

TABLES

IT_EKPO = IT_EKPO

• 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.

Thank u,

santhosh

Edited by: santhosh kumar on Feb 11, 2009 5:05 AM

Edited by: santhosh kumar on Feb 11, 2009 5:10 AM

[Former Member]

Hi Bathrinath

Try this

parameters:
 p_form type tdsfname.
 data:
w_fm TYPE rs38L_fnam.

This function module will give the name of the FORM function module

CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
 EXPORTING
 formname                 = p_form
*  VARIANT                  = ' '
* DIRECT_CALL              = ' '
 IMPORTING
   fm_name                  = w_fm
 EXCEPTIONS
   no_form                  = 1
   no_function_module       = 2
   OTHERS                   = 3

.

This function module will call the forn function module

CALL FUNCTION w_fm
* 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         =
  TABLES
    itab                       = itab
 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.

This will solve your problem.

Regards

Hareesh Menon

[Former Member]

closed