E mail body for smartform as attachment not using Function module

108 Views

Hi All,

I am sending smartform as email attachments. I am not using any function module to send smartform as attachment. Below is my code for reference.

control_parameters-device = 'MAIL'.

output_options-tdtitle = v_title.

CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'

EXPORTING
formname = 'ZSD_STANDARD_INVOICE'
* 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 = control_parameters
* MAIL_APPL_OBJ =
MAIL_RECIPIENT = LVS_RECIPIENT
MAIL_SENDER = LVS_SENDER
output_options = output_options
user_settings = 'X'
is_nast = nast
vbak = zvbak
vbdkr = vbdkr
zpayer = zpayer
zorder = zorder
komk = komk
zvbak = zvbak
komvd = komvd
* wk_dimensions = wk_dimensions
* wk_spec = wk_spec
* IMPORTING
* document_output_info = l_document_output_info
* job_output_info = l_job_output_info " job_output
* job_output_options = l_job_output_options
TABLES
it_vbdpr = tvbdpr
it_tkomvd = it_tkomvd
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.

But, Here I am getting smartform as e email attachment but I need to give some 2 lines of email body also.

How to achieve this.

Thanks,

Sreelakshmi.B