Apagar um item/arquivo do DMS
O código a seguir é para apagar apenas um item do DMS, para os casos em que um anexo enviado pelo usuário está errado ou o setor que iria receber o anexo não aceitou, por exemplo.
Para apagar o DMS por completo verificar o post: https://telestips.wordpress.com/2022/11/13/apagar-dms/
CALL FUNCTION 'BAPI_DOCUMENT_GETDETAIL2'
EXPORTING
documenttype = wl_drat-dokar
documentnumber = wl_drat-doknr
documentpart = wl_drat-doktl
documentversion = wl_drat-dokvr
TABLES
documentfiles = tl_doc_files.
IF tl_doc_files IS NOT INITIAL.
READ TABLE tl_doc_files ASSIGNING <fl_doc> WITH KEY originaltype = wl_anexo-item.
IF sy-subrc IS INITIAL.
<fl_doc>-deletevalue = abap_true.
ENDIF.
ENDIF.
Na work-area wl_anexo-item utilize a chave que você precisa para indicar qual dos itens do DMS deverá ser apagado.
CALL FUNCTION 'BAPI_DOCUMENT_CHANGE2'
EXPORTING
documenttype = wl_drat-dokar
documentnumber = wl_drat-doknr
documentpart = wl_drat-doktl
documentversion = wl_drat-dokvr
documentdata = wl_doc_draw
documentdatax = wl_doc_drawx
IMPORTING
return = wl_return
TABLES
documentfiles = tl_doc_files.
Comentários
Postar um comentário