3、调用'SET_PRINT_PARAMETERS'函数设置打印参数
call function 'SET_PRINT_PARAMETERS'
exporting
archive_id = gs_test-pri_archive_id
archive_info = gs_test-pri_archive_info
archive_mode = gs_test-pri_archive_mode
archive_text = gs_test-pri_archive_text
ar_object = gs_test-pri_archive_object
authority = gs_test-pri_authority
copies = gs_test-pri_copy
cover_page = gs_test-pri_coverp(企业资源计划2)age
data_set = gs_test-pri_dataset
department = gs_test-pri_department
destination = gs_test-pri_destination
expiration = gs_test-pri_expiration
immediately = gs_test-pri_immediatly
* IN_ARCHIVE_PARAMETERS = ' '
* IN_PARAMETERS = ' '
layout = gs_test-pri_layout
line_count = gs_test-pri_line_count
line_size = gs_test-pri_line_size
list_name = gs_test-pri_list_name
list_text = gs_test-pri_list_text
new_list_id = gs_test-pri_new_list_id
receiver = gs_test-pri_receiver
release = gs_test-pri_release
sap_cover_page = gs_test-pri_sap_coverp(企业资源计划2)age
host_cover_page = gs_test-pri_host_coverp(企业资源计划2)age
priority = gs_test-pri_priority
sap_object = gs_test-pri_sap_object
type = gs_test-pri_type
foot_line = gs_test-pri_footline.
exporting
archive_id = gs_test-pri_archive_id
archive_info = gs_test-pri_archive_info
archive_mode = gs_test-pri_archive_mode
archive_text = gs_test-pri_archive_text
ar_object = gs_test-pri_archive_object
authority = gs_test-pri_authority
copies = gs_test-pri_copy
cover_page = gs_test-pri_coverp(企业资源计划2)age
data_set = gs_test-pri_dataset
department = gs_test-pri_department
destination = gs_test-pri_destination
expiration = gs_test-pri_expiration
immediately = gs_test-pri_immediatly
* IN_ARCHIVE_PARAMETERS = ' '
* IN_PARAMETERS = ' '
layout = gs_test-pri_layout
line_count = gs_test-pri_line_count
line_size = gs_test-pri_line_size
list_name = gs_test-pri_list_name
list_text = gs_test-pri_list_text
new_list_id = gs_test-pri_new_list_id
receiver = gs_test-pri_receiver
release = gs_test-pri_release
sap_cover_page = gs_test-pri_sap_coverp(企业资源计划2)age
host_cover_page = gs_test-pri_host_coverp(企业资源计划2)age
priority = gs_test-pri_priority
sap_object = gs_test-pri_sap_object
type = gs_test-pri_type
foot_line = gs_test-pri_footline.
4、调用GET_PRINT_PARAMETERS函数读取打印参数
data: ls_arc_params type arc_params,
ls_pri_params type pri_params,
l_valid type char1. "#EC NEEDED
call function 'GET_PRINT_PARAMETERS'
exporting
archive_id = gs_test-pri_archive_id
archive_info = gs_test-pri_archive_info
archive_mode = gs_test-pri_archive_mode
archive_text = gs_test-pri_archive_text
ar_object = gs_test-pri_archive_object
* ARCHIVE_REPORT = C_CHAR_UNKNOWN
authority = gs_test-pri_authority
copies = gs_test-pri_copy
cover_page = gs_test-pri_coverp(企业资源计划2)age
data_set = gs_test-pri_dataset
department = gs_test-pri_department
destination = gs_test-pri_destination
expiration = gs_test-pri_expiration
immediately = gs_test-pri_immediatly
* IN_ARCHIVE_PARAMETERS = ' '
* IN_PARAMETERS = ' '
layout = gs_test-pri_layout
line_count = gs_test-pri_line_count
line_size = gs_test-pri_line_size
list_name = gs_test-pri_list_name
list_text = gs_test-pri_list_text
* MODE = ' '
new_list_id = gs_test-pri_new_list_id
* PROTECT_LIST = C_CHAR_UNKNOWN
* NO_DIALOG = C_FALSE
receiver = gs_test-pri_receiver
release = gs_test-pri_release
* REPORT = C_CHAR_UNKNOWN
sap_cover_page = gs_test-pri_sap_coverp(企业资源计划2)age
host_cover_page = gs_test-pri_host_coverp(企业资源计划2)age
priority = gs_test-pri_priority
sap_object = gs_test-pri_sap_object
type = gs_test-pri_type
* USER = SY-UNAME
* USE_OLD_LAYOUT = ' '
importing
out_archive_parameters = ls_arc_params
out_parameters = ls_pri_params
valid = l_valid
exceptions
archive_info_not_found = 1
invalid_print_params = 2
invalid_archive_params = 3
others = 4.
if sy-subrc <> 0.
message id sy-msgid type sy-msgty number sy-msgno
with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
move-corresponding ls_arc_params to gs_test.
move-corresponding ls_pri_params to gs_test.
ls_pri_params type pri_params,
l_valid type char1. "#EC NEEDED
call function 'GET_PRINT_PARAMETERS'
exporting
archive_id = gs_test-pri_archive_id
archive_info = gs_test-pri_archive_info
archive_mode = gs_test-pri_archive_mode
archive_text = gs_test-pri_archive_text
ar_object = gs_test-pri_archive_object
* ARCHIVE_REPORT = C_CHAR_UNKNOWN
authority = gs_test-pri_authority
copies = gs_test-pri_copy
cover_page = gs_test-pri_coverp(企业资源计划2)age
data_set = gs_test-pri_dataset
department = gs_test-pri_department
destination = gs_test-pri_destination
expiration = gs_test-pri_expiration
immediately = gs_test-pri_immediatly
* IN_ARCHIVE_PARAMETERS = ' '
* IN_PARAMETERS = ' '
layout = gs_test-pri_layout
line_count = gs_test-pri_line_count
line_size = gs_test-pri_line_size
list_name = gs_test-pri_list_name
list_text = gs_test-pri_list_text
* MODE = ' '
new_list_id = gs_test-pri_new_list_id
* PROTECT_LIST = C_CHAR_UNKNOWN
* NO_DIALOG = C_FALSE
receiver = gs_test-pri_receiver
release = gs_test-pri_release
* REPORT = C_CHAR_UNKNOWN
sap_cover_page = gs_test-pri_sap_coverp(企业资源计划2)age
host_cover_page = gs_test-pri_host_coverp(企业资源计划2)age
priority = gs_test-pri_priority
sap_object = gs_test-pri_sap_object
type = gs_test-pri_type
* USER = SY-UNAME
* USE_OLD_LAYOUT = ' '
importing
out_archive_parameters = ls_arc_params
out_parameters = ls_pri_params
valid = l_valid
exceptions
archive_info_not_found = 1
invalid_print_params = 2
invalid_archive_params = 3
others = 4.
if sy-subrc <> 0.
message id sy-msgid type sy-msgty number sy-msgno
with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
move-corresponding ls_arc_params to gs_test.
move-corresponding ls_pri_params to gs_test.
