how do we call smartforms in abap program or web services

[Former Member]

how do we call smartforms in abap program or web services

How many types of smartforms are there?

points will be rewarded

[Former Member]

chk this example

Given below is FM name required to smart form

 CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'

    EXPORTING

      formname                 =  0.

Endif.

reward points if useful

[Former Member]

Hi

See this sample program

Using the fun module smartform is called from the program

Calling SMARTFORMS from your ABAP program

REPORT ZSMARTFORM.

• Calling SMARTFORMS from your ABAP program.

• Collecting all the table data in your program, and pass once to SMARTFORMS

• SMARTFORMS

• Declare your table type in :-

• Global Settings -> Form Interface

• Global Definintions -> Global Data

• Main Window -> Table -> DATA

• TABLES: MKPF.

• [Removed by the moderator.]

DATA: FM_NAME TYPE RS38L_FNAM.

DATA: BEGIN OF INT_MKPF OCCURS 0.

INCLUDE STRUCTURE MKPF.

DATA: END OF INT_MKPF.

SELECT-OPTIONS S_MBLNR FOR MKPF-MBLNR MEMORY ID 001.

SELECT * FROM MKPF WHERE MBLNR IN S_MBLNR.

MOVE-CORRESPONDING MKPF TO INT_MKPF.

APPEND INT_MKPF.

ENDSELECT.

• At the end of your program.

• Passing data to SMARTFORMS

<b>call function 'SSF_FUNCTION_MODULE_NAME'

exporting

formname = 'ZSMARTFORM'</b>

• VARIANT = ' '

• DIRECT_CALL = ' '

IMPORTING

FM_NAME = FM_NAME

EXCEPTIONS

NO_FORM = 1

NO_FUNCTION_MODULE = 2

OTHERS = 3.

if sy-subrc <> 0.

WRITE: / 'ERROR 1'.

• MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

• WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

endif.

call function <b>FM_NAME</b>

• 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

GS_MKPF = INT_MKPF

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.

<b>Reward points for useful Answers</b>

Regards

Anji