topic Re: SMARTFORMS in Application Development and Automation Discussions

SMARTFORMS

Former Member — Sat, 19 Jan 2008 05:55:07 GMT

Hi all ,

while executing smartforms, i dont want the pop-window, (which consists print/ printview) . instead i want the Output screen.

CAN ANYBODY TELL ME HOWS ITS POSSIBLE ?

thanks in advance .

regards saurabh .

Re: SMARTFORMS

Former Member — Sat, 19 Jan 2008 06:00:01 GMT

Take one global FLAG in GLOBAL Data...

Like:

FLAG TYPE C [/code]

This FLAG must be initial always...

Now, go to your window.. open the conditions.. and put the condition like:

codeFLAG = 'X'.

FLAG's value will never be set to "X" so, your window will not be called by SMARTform.

Smartform avoid print window

Reward points if useful.

Re: SMARTFORMS

Former Member — Sat, 19 Jan 2008 06:13:33 GMT

Hi all ,

i did flag = 'X' in conditions, as u said, but still window is coming, should i change something also in driver program ?

plz.tell me ASAP .

regards saurabh .

Re: SMARTFORMS

Former Member — Sat, 19 Jan 2008 06:32:37 GMT

hi,

do this

wa_control_parameters-no_dialog = 'X'

and pass it to the smartform func module

CALL FUNCTION v_fname

EXPORTING

control_parameters = wa_control_parameters

Re: SMARTFORMS

Former Member — Sat, 19 Jan 2008 07:09:12 GMT

hi soura

this is so-simple.

i have a same requirement which i did.

hope dis vil be very useful.

these are the things which are all neccessary

wa_l_control_parms-no_dialog = 'X'.

wa_l_control_parms-device = 'PRINTER'.

wa_l_control_parms-preview = 'X'.

wa_l_control_parms-langu = nast-spras.

wa_ls_composer_param-tddest = 'LOCL'.

wa_ls_composer_param-tdarmod = 1.

in the call function module jus pass this

CALL FUNCTION fm_name

EXPORTING

ARCHIVE_INDEX =

CONTROL_PARAMETERS = wa_l_control_parms

MAIL_APPL_OBJ =

OUTPUT_OPTIONS = wa_ls_composer_PARAM

USER_SETTINGS = ''

mara = mara

wa_qty = wa_qty

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

hope dis vil be useful to uuuuuuuuuuu.

Reward if its useful.

Re: SMARTFORMS

Former Member — Sat, 19 Jan 2008 07:18:02 GMT

hi....

dear actually i m not getting Function module V_NAME

by pattern .. and rest i have done but window is still coming.

i did this ...

wa_control_parameters-no_dialog = 'X'

CALL FUNCTION '/1BCDWB/SF00000074'

EXPORTING

control_parameters = wa_control_parameters

can u plz. tell me how is it possible ?

regards saurabh .

Re: SMARTFORMS

Former Member — Sat, 19 Jan 2008 07:21:37 GMT

dats it u hav done correctly

post ur code so dat v can hlp

Re: SMARTFORMS

Former Member — Sat, 19 Jan 2008 07:35:17 GMT

hi .... i m using this code....

DATA : ITAB TYPE TABLE OF ZEMP WITH HEADER LINE .

data : wa_print type SSFCTRLOP .

CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'

EXPORTING

FORMNAME = 'ZSMART1'

VARIANT = ' '
DIRECT_CALL = ' '
IMPORTING
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.

WA_PRINT-DEVICE = 'LOCL'. "Pass this value

WA_PRINT-NO_DIALOG = 'X'. "Pass X for preview else blank

SELECT * FROM ZEMP INTO TABLE ITAB .

LOOP AT ITAB .

CALL FUNCTION '/1BCDWB/SF00000074'

EXPORTING

ARCHIVE_INDEX =
ARCHIVE_INDEX_TAB =
ARCHIVE_PARAMETERS =

CONTROL_PARAMETERS = wa_print

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.

ENDLOOP .

Re: SMARTFORMS

Former Member — Sat, 19 Jan 2008 07:45:11 GMT

Hi,

DATA: ls_control_param TYPE ssfctrlop.

DATA: ls_composer_param TYPE ssfcompop.

DATA: ls_recipient TYPE swotobjid.

DATA: ls_sender TYPE swotobjid.

DATA: ls_addr_key LIKE addr_key.

Data: lf_retcode type sy-subrc.

Seting Print Parameter

Perform set_print_param using ls_addr_key

changing ls_control_param

ls_composer_param

ls_recipient

ls_sender

lf_retcode.

call smartform delivery note

CALL FUNCTION lf_fm_name

EXPORTING

archive_index = toa_dara

archive_parameters = arc_params

control_parameters = ls_control_param

mail_appl_obj =

mail_recipient = ls_recipient

mail_sender = ls_sender

output_options = ls_composer_param

user_settings = ' ' "n_542652

letraconfsta = gs_confsta

TABLES

g_likp = ig_likp

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.

FORM SET_PRINT_PARAM USING IS_ADDR_KEY LIKE ADDR_KEY

CHANGING CS_CONTROL_PARAM TYPE SSFCTRLOP

CS_COMPOSER_PARAM TYPE SSFCOMPOP

CS_RECIPIENT TYPE SWOTOBJID

CS_SENDER TYPE SWOTOBJID

CF_RETCODE TYPE SY-SUBRC.

DATA: LS_ITCPO TYPE ITCPO.

DATA: LF_REPID TYPE SY-REPID.

DATA: LF_DEVICE TYPE TDDEVICE.

DATA: LS_RECIPIENT TYPE SWOTOBJID.

DATA: LS_SENDER TYPE SWOTOBJID.

LF_REPID = SY-REPID.

CALL FUNCTION 'WFMC_PREPARE_SMART_FORM'

EXPORTING

PI_NAST = NAST

PI_ADDR_KEY = IS_ADDR_KEY

PI_REPID = LF_REPID

IMPORTING

PE_RETURNCODE = CF_RETCODE

PE_ITCPO = LS_ITCPO

PE_DEVICE = LF_DEVICE

PE_RECIPIENT = CS_RECIPIENT

PE_SENDER = CS_SENDER.

IF CF_RETCODE = 0.

MOVE-CORRESPONDING LS_ITCPO TO CS_COMPOSER_PARAM.

CS_CONTROL_PARAM-NO_OPEN
CS_CONTROL_PARAM-NO_CLOSE

CS_CONTROL_PARAM-DEVICE = LF_DEVICE.

CS_CONTROL_PARAM-NO_DIALOG = 'X'.

CS_CONTROL_PARAM-PREVIEW = XSCREEN.

CS_CONTROL_PARAM-GETOTF = LS_ITCPO-TDGETOTF.

CS_CONTROL_PARAM-LANGU = NAST-SPRAS.

CS_CONTROL_PARAM-REPLANGU1
CS_CONTROL_PARAM-REPLANGU2
CS_CONTROL_PARAM-REPLANGU3
CS_CONTROL_PARAM-STARTPAGE

ENDIF.

ENDFORM. " SET_PRINT_PARAM

Re: SMARTFORMS

Former Member — Sat, 19 Jan 2008 08:05:25 GMT

hi soura

this is so-simple.

i have a same requirement which i did.

hope dis vil be very useful.

these are the things which are all neccessary

wa_l_control_parms-no_dialog = 'X'.

wa_l_control_parms-device = 'PRINTER'.

wa_l_control_parms-preview = 'X'.

wa_l_control_parms-langu = nast-spras.

wa_ls_composer_param-tddest = 'LOCL'.

wa_ls_composer_param-tdarmod = 1.

in the call function module jus pass this

CALL FUNCTION fm_name

EXPORTING

ARCHIVE_INDEX =

CONTROL_PARAMETERS = wa_l_control_parms

MAIL_APPL_OBJ =

OUTPUT_OPTIONS = wa_ls_composer_PARAM

USER_SETTINGS = ''

mara = mara

wa_qty = wa_qty

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

hope dis vil be useful to uuuuuuuuuuu.

Reward if its useful.

Re: SMARTFORMS

Former Member — Sat, 19 Jan 2008 08:13:01 GMT

just modify ur code like dis

DATA : ITAB TYPE TABLE OF ZEMP WITH HEADER LINE .

data : wa_print type SSFCTRLOP ,

wa_output_options TYPE ssfcompop.

CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'

EXPORTING

FORMNAME = 'ZSMART1'

VARIANT = ' '

DIRECT_CALL = ' '

IMPORTING

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.

wa_output_options-tdimmed = 'X'.

WA_PRINT-DEVICE = 'PRINTER'. "Pass this value

WA_PRINT-NO_DIALOG = 'X'. "Pass X for preview else blank

SELECT * FROM ZEMP INTO TABLE ITAB .

LOOP AT ITAB .

CALL FUNCTION '/1BCDWB/SF00000074'

EXPORTING

ARCHIVE_INDEX =

ARCHIVE_INDEX_TAB =

ARCHIVE_PARAMETERS =

CONTROL_PARAMETERS = wa_print

MAIL_APPL_OBJ =

MAIL_RECIPIENT =

MAIL_SENDER =

OUTPUT_OPTIONS = wa_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.

ENDLOOP .

Re: SMARTFORMS

Former Member — Sat, 19 Jan 2008 08:13:48 GMT

sorry yaar,

i forgt 2 send dis code declaration.

DATA : wa_l_control_parms TYPE ssfctrlop,

wa_ls_composer_param TYPE ssfcompop.

wa_l_control_parms-no_dialog = 'X'.

wa_l_control_parms-device = 'PRINTER'.

wa_l_control_parms-preview = 'X'.

wa_l_control_parms-langu = nast-spras.

wa_ls_composer_param-tddest = 'LOCL'.

wa_ls_composer_param-tdarmod = 1.

CALL FUNCTION fm_name

EXPORTING

ARCHIVE_INDEX =
ARCHIVE_INDEX_TAB =
ARCHIVE_PARAMETERS =

CONTROL_PARAMETERS = wa_l_control_parms

MAIL_APPL_OBJ =
MAIL_RECIPIENT =
MAIL_SENDER =

OUTPUT_OPTIONS = wa_ls_composer_PARAM

USER_SETTINGS = ''

mara = mara

wa_qty = wa_qty

IMPORTING
DOCUMENT_OUTPUT_INFO =
JOB_OUTPUT_INFO =
JOB_OUTPUT_OPTIONS =

TABLES

it_mard = it_mard

EXCEPTIONS

FORMATTING_ERROR = 1

INTERNAL_ERROR = 2

SEND_ERROR = 3

USER_CANCELED = 4

OTHERS = 5