
Pass the root key from the table.
SELECT ATF_FILE_KEY FROM EHHSSD_INC_ATDOC INTO TABLE IT_FIN
WHERE PARENT_KEY = lv_inc_root AND USER_ID_CH ne 'SAP_WFRT'.
READ TABLE IT_FIN INTO WA_FIN INDEX 1.
LV_ATF_FILE_KEY1 = WA_FIN-LV_ATF_FILE_KEY.
call function 'SCMS_R3DB_IMPORT'
exporting
crep_id = 'BS_ATF_DB_REPOSITORY'
doc_id = LV_ATF_FILE_KEY1
IMPORTING
DOC_PROT = ld_doc_prot
CREA_TIME = ld_crea_time
CHNG_TIME = ld_chng_time
TABLES
CONTENT_INFO = it_content_info
CONTENT_TXT = it_content_txt
CONTENT_BIN = it_content_bin
EXCEPTIONS
ERROR_IMPORT = 1
ERROR_CONFIG = 2
OTHERS = 3
.
if sy-subrc <> 0.
* Implement suitable error handling here
endif.
LOOP AT it_content_info into wa_bin.
lv_len = wa_bin-comp_size.
ENDLOOP.
string = wa_bin-comp_id.
call function 'SCMS_BINARY_TO_XSTRING'
exporting
input_length = lv_len
IMPORTING
BUFFER = xstring
tables
binary_tab = it_content_bin
EXCEPTIONS
FAILED = 1
OTHERS = 2
.
if sy-subrc <> 0.
* Implement suitable error handling here
endif.
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
3 | |
2 | |
2 | |
2 | |
1 | |
1 | |
1 | |
1 | |
1 | |
1 |