SMARTFORMS

[Former Member]

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 .

[Former Member]

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.

or

Smartform avoid print window

Reward points if useful.

[Former Member]

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 .

[Former Member]

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

[Former Member]

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 .

[Former Member]

dats it u hav done correctly

post ur code so dat v can hlp

[Former Member]

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 .

[Former Member]

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

[Former Member]

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 .

[Former Member]

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.

[Former Member]

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.

[Former Member]

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