Execute sap script using print program

[Former Member]

Hi,

I want to execute a sap script using print program.Can anyone please tell me the Function modules required for the same.

Regards,

Sreeja

[Former Member]

FM used for print programs are:

OPEN_FORM function

CLOSE_FORM function

WRITE_FORM

START_FORM function

END_FORM function

CONTROL_FORM function

[Former Member]

Hi,

CALL FUNCTION 'OPEN_FORM'

EXPORTING

device = 'PRINTER'

form = 'ZSS_SCRIPT_1' <FORM_NAME>.

CALL FUNCTION 'WRITE_FORM'

EXPORTING

element = 'HEAD' <element name>

function = 'SET'

type = 'BODY'

window = 'MAIN' <Window name>

CALL FUNCTION 'CLOSE_FORM'.

Best Regards,

Suresh

[Former Member]

Hi !

for example look at below code it is driver program for sapscripts

CALL FUNCTION 'OPEN_FORM'

EXPORTING

• APPLICATION = 'TX'

• ARCHIVE_INDEX =

• ARCHIVE_PARAMS =

device = 'PRINTER'

dialog = 'X'

• FORM = 'ZSCPT_HR_APPT'

language = sy-langu

OPTIONS = struct

• MAIL_SENDER =

• MAIL_RECIPIENT =

• MAIL_APPL_OBJECT =

• RAW_DATA_INTERFACE = '*'

• SPONUMIV =

• IMPORTING

• LANGUAGE = sy-langu

• NEW_ARCHIVE_PARAMS =

• RESULT =

• EXCEPTIONS

• CANCELED = 1

• DEVICE = 2

• FORM = 3

• OPTIONS = 4

• UNCLOSED = 5

• MAIL_OPTIONS = 6

• ARCHIVE_ERROR = 7

• INVALID_FAX_NUMBER = 8

• MORE_PARAMS_NEEDED_IN_BATCH = 9

• SPOOL_ERROR = 10

• CODEPAGE = 11

• OTHERS = 12

.

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 'START_FORM'

EXPORTING

• ARCHIVE_INDEX =

form = 'ZSCPT_HR_M1_SALE'

language = sy-langu.

• STARTPAGE = ' '

• PROGRAM = ' '

• MAIL_APPL_OBJECT =

• IMPORTING

• LANGUAGE =

• EXCEPTIONS

• FORM = 1

• FORMAT = 2

• UNENDED = 3

• UNOPENED = 4

• UNUSED = 5

• SPOOL_ERROR = 6

• CODEPAGE = 7

• OTHERS = 8

• .

*IF sy-subrc <> 0.

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

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

*ENDIF.

*if sy-pagno ne 1.

CALL FUNCTION 'WRITE_FORM'

EXPORTING

element = 'HEADER1'

• FUNCTION = 'SET'

type = 'BODY'

window = 'WINDOW1'.

CALL FUNCTION 'WRITE_FORM'

EXPORTING

element = 'FOOTER1'

• FUNCTION = 'SET'

type = 'BODY'

window = 'WINDOW2'.

CALL FUNCTION 'WRITE_FORM'

EXPORTING

element = 'HEADER2'

function = 'SET'

type = 'BODY'

window = 'WINDOW3'.

*

*

CALL FUNCTION 'WRITE_FORM'

EXPORTING

element = 'FOOTER2'

function = 'SET'

type = 'BODY'

window = 'WINDOW4'.

CALL FUNCTION 'WRITE_FORM'

EXPORTING

element = 'HEADER3'

function = 'SET'

type = 'BODY'

window = 'WINDOW5'.

CALL FUNCTION 'WRITE_FORM'

EXPORTING

element = 'FOOTER3'

function = 'SET'

type = 'BODY'

window = 'WINDOW6'.

CALL FUNCTION 'WRITE_FORM'

EXPORTING

element = 'MAIN'

• FUNCTION = 'SET'

type = 'BODY'

window = 'MAIN'.

IF sy-subrc = 0.

ENDIF.

*

CALL FUNCTION 'END_FORM'.

CALL FUNCTION 'CLOSE_FORM'