hi experts doubt in smartform

[Former Member]

i need to run a smartform which contains range of purchase orders.

when i run it i need a new spool request for each purchase orders so that i can mail it to corresponding vendors.

[Former Member]

Hi

This can be achieved by configuration.

Create a output type for medium 5 and call your driver program and smartform in the NACE transaction and maintain the condition records.

Pls check with your function consultant, he should be able to help you

Regards

Madhan

[christine_evans]

Have a look at field TDNEWID which is part of the SmartForms function import structure OUTPUT_OPTIONS.

[Former Member]

hi,

refer the below code:

TABLES:

spfli.

DATA:

t_spfli type

STANDARD TABLE OF spfli.

DATA:

fs_spfli TYPE spfli.

DATA:

w_form TYPE tdsfname,

w_flag TYPE i,

f_nam TYPE rs38l_fnam,

w_input TYPE ssfcompin,

w_control TYPE ssfctrlop.

SELECTION-SCREEN BEGIN OF BLOCK blk WITH FRAME.

SELECT-OPTIONS s_carrid FOR spfli-carrid.

SELECTION-SCREEN END OF BLOCK blk .

SELECTION-SCREEN BEGIN OF BLOCK block1 WITH FRAME.

PARAMETERS:

p_single RADIOBUTTON GROUP rad1,

p_ind RADIOBUTTON GROUP rad1.

SELECTION-SCREEN END OF BLOCK block1.

START-OF-SELECTION.

PERFORM display_data.

PERFORM ssf_function_module_name.

PERFORM spool_request.

&----

---

*& Form display_data

&----

---

• text

----

---

• --> p1 text

• <-- p2 text

----

---

FORM display_data .

SELECT *

FROM spfli

INTO TABLE t_spfli

WHERE carrid IN s_carrid.

ENDFORM. " display_data

&----

---

*& Form ssf_function_module_name

&----

---

• text

----

---

• --> p1 text

• <-- p2 text

----

---

FORM ssf_function_module_name .

CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'

EXPORTING

formname = ' '

IMPORTING

fm_name = f_nam

EXCEPTIONS

no_form = 1

no_function_module = 2.

• IF sy-subrc NE 0.

• MESSAGE 'Form cannot be displayed' TYPE 'E' .

• ENDIF. " IF sy-subrc eq 0

ENDFORM. " ssf_function_module_name

&----

---

*& Form spool_request

&----

---

• text

----

---

• --> p1 text

• <-- p2 text

----

---

FORM spool_request .

w_input-dialog = 'X'.

CALL FUNCTION 'SSFCOMP_OPEN'

EXPORTING

input = w_input

EXCEPTIONS

error = 1.

*" LOOP AT t_spfli .....................................................

LOOP AT t_spfli INTO fs_spfli.

w_control-no_open = ' '.

w_control-no_close = ' '.

*"Single spool request..................................................

IF p_single EQ 'X'.

w_control-no_open = 'X'.

w_control-no_close = 'X'.

ELSE.

*"Individual spool request.............................................

IF w_flag NE '1'.

w_control-no_open = 'X'.

w_control-no_close = ' '.

w_flag = 1.

CALL FUNCTION ' '

EXPORTING

control_parameters = w_control

fs_spfli = fs_spfli

EXCEPTIONS

formatting_error = 1

internal_error = 2

send_error = 3

user_canceled = 4.

endif. " IF w_flag ne '1'

ENDIF. " IF p_single eq 'X'.

CALL FUNCTION ' '

EXPORTING

control_parameters = w_control

fs_spfli = fs_spfli

EXCEPTIONS

formatting_error = 1

internal_error = 2

send_error = 3

user_canceled = 4.

ENDLOOP. " LOOP at t_spfli into ...

&----

---

*&This function module close the spool request *

&----

---

CALL FUNCTION 'SSFCOMP_CLOSE'

EXCEPTIONS

error = 1.

ENDFORM.