点击此处--->   群内免费提供SAP练习系统（在群公告中）

加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）

嗨，Abaper先生的

我正在获取多个PDF附件，我希望将其转换为一个pdf。

此致

斯里尼瓦斯

从ekbe中选择gjahr belnr
放入表it_ekbe
中，ebeln = p_ebeln。


在it_ekbe处将其放入IN_ekbe_line中。

**连接物料文档编号和 实例ID的年份
联接it_ekbe_line-belnr
it_ekbe_line-gjahr
INTO lwa_lporb-instid。

**对象类型
lwa_lporb-typeid = lc_typeid。
** 对象类别
lwa_lporb-catid = lc_catid。
刷新lt_links。
**调用方法以读取实例（GR）的关系记录
尝试。
调用方法cl_binary_relation => read_links_of_binrel
导出
is_object = lwa_lporb
ip_relation = lc_rel_typ
导入
et_links = lt_links。

捕获cx_obl_parameter_error。
清除sy-subrc。
捕获cx_obl_internal。 >清除sy-subrc。
捕捉cx_obl_model_error。
清除sy-subrc。
ENDTRY。


如果
lt_links []不初始化。
排序lt_links由utctime下降

循环AT lt_links INTO lwa_links。

刷新lt_contents _hex。
**业务对象中的实例ID
lv_docid = lwa_links-instid_b。
**调用功能模块以读取附加文档的内容
调用功能'SO_DOCUMENT_READ_API1'
导出
document_id = lv_docid
*筛选器='X'
导入
document_data = lwa_docdata
表格
contents_hex = lt_contents_hex
例外情况
document_id_not_exist = 1
operation_no_authorization = 2
> x_error = 3
其他=4。
如果sy-subrc EQ 0和lt_contents_hex不是INITIAL。
清除：lv_length，
lv_file_content。
描述表lt_contents_hex线lv_lin。
lv_length = lv_lin * sy-tleng。


CONCATENATE'C：\ Users \ BPSH066 \ Desktop/multitest'
sy-uzeit
'.pdf'
进入lv_path。< br>
调用功能'GUI_DOWNLOAD'
导出
bin_filesize = lv_length
文件名= lv_path
文件类型='BIN'
表格
data_tab = lt_contents_hex。
ENDIF。
ENDLOOP。
ENDIF。

ENDLOOP。