Teles Tips

  Vamos esconder um checkbox da tela. Para isso vamos começar com as declarações das variáveis:  SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001. PARAMETERS: ch_rel AS CHECKBOX, ch_pr_lc AS CHECKBOX. SELECTION-SCREEN SKIP. SELECTION-SCREEN BEGIN OF LINE. SELECTION-SCREEN PUSHBUTTON (30) btn USER-COMMAND click1. PARAMETER: gd_ucomm LIKE sy-ucomm NO-DISPLAY. SELECTION-SCREEN END OF LINE. SELECTION-SCREEN END OF BLOCK b1. O comando "Skip" serve  para dar um espaçamento, como se fosse para pular uma linha.   Logo após temos a declaração do botão que irá nos auxiliar no "Hide"(esconder) do nosso objeto, neste tutorial, o checkbox.   No último parâmetro temos um pequeno truque: caso você queira mais de um botão poderá declará-lo como um parâmetro que não será exibido na tela. Além disso você também pode deixar um valor padrão no parâmetro. INITIALIZATION.   CONCATENATE '@02@' text-010 INTO btn. AT SELECTION-SCREEN.  ...

 DATA: tl_doc_files   TYPE TABLE OF bapi_doc_files2,       tl_comp        TYPE TABLE OF sdokcomprp,       tl_bad_obj     TYPE TABLE OF sdokerrkey,       tl_dms_comp    TYPE dms_tbl_comp,       tl_content     TYPE TABLE OF drao. DATA: wl_comp      TYPE sdokcomprp,       wl_prop      TYPE sdokfilepr,       wl_phio      TYPE sdokobject. DATA: vl_filep       TYPE draw-filep,       vl_comp_get(1) TYPE c.   CALL FUNCTION 'BAPI_DOCUMENT_GETDETAIL2'      EXPORTING        documenttype    = wl_drat-dokar        documentnumber  = wl_drat-doknr        documentpart    = wl_drat-doktl        documentversion = wl_drat-dokvr     ...

 Para apagar um DMS pode ser usada a função BAPI_DOCUMENT_DELETE_DIRECT informando os dados básicos do DMS: classe, número do DMS, partição e versão.

 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.            <...

  A função EASYDMS_ECL_OPEN_DOCUMENT gera um pop-up com todos os arquivos de um DMS como a imagem a seguir: E o uso é bem simples: basta informar a classe, número do DMS, partição e versão. CALL FUNCTION 'EASYDMS_ECL_OPEN_DOCUMENT' EXPORTING doc_number = ls_drat-doknr doc_part = ls_drat-doktl doc_type = ls_drat-dokar doc_vers = ls_drat-dokvr.

Um mesmo número de DMS pode corresponder a vários arquivos. Você pode inserir todos na criação, mas também pode incluir depois. Um exemplo do uso é quando um usuário precisa anexar mais um comprovante a algum tipo de solicitação. Para isso vamos usar a BAPI_DOCUMENT_CHANGE2:   wl_doc_file-documenttype      = wl_drat-dokar.  wl_doc_dt-documenttype        = wl_drat-dokar.    wl_doc_file-documentnumber    = wl_drat-doknr.  wl_doc_dt-documentnumber      = wl_drat-doknr.  wl_doc_file-documentpart      = wl_drat-doktl.  wl_doc_dt-documentpart        = wl_drat-doktl.  wl_doc_file-documentversion   = wl_drat-dokvr.  wl_doc_dt-documentversion     = wl_drat-dokvr.  wl_doc_file-originaltype      = wl_anexo-item.  wl_doc_file-description       = wl_anexo-descr.  wl_doc_file-ws...