Aprende en Comunidad
Avalados por :
Como executar a publicação F-47 com BAPI e BTE no SAP
- Creado 01/03/2024
- Modificado 01/03/2024
- 127 Vistas
Para a publicação F-47, apenas um item de linha é publicado, enquanto o BAPI "BAPI_ACC_DOCUMENT_POST" deve ser publicado em 2 linhas para equilibrar a conta. Aqui estão os passos para realizar a publicação F-47 (Solicitação de pagamento antecipado) através do BAPI e BTE com 1 item de linha:
1) Crie um novo grupo de funções usando o código de transação SE80.
2) Copie o módulo de função padrão do BTE "SAMPLE_INTERFACE_RWBAPI01" para um módulo de função Z, por exemplo, "ZSAMPLE_INTERFACE_RWBAPI01"
3) Vá para a transação FIBF para criar o BTE para o processo "RWBAPI01".
Consulte o link na sessão de configuração - Evento de Transação Comercial - RWBAPI01 - Para a Interface de Documento Contábil - Desenvolvimento ABAP - SCN W...
4) Antes de chamar o BAPI "BAPI_ACC_DOCUMENT_POST", prepare a tabela de extensão1 conforme mostrado abaixo:
DEFINE mac_assign_extension.
clear lv_string.
concatenate &1 &2
into lv_string.
concatenate &3 lv_string
into &3
separated by ';'.
END-OF-DEFINITION.
*-> preparar extensão
CONCATENATE '0001' ls_accountpayable-itemno_acc
INTO ls_extension1-field1. " 0001 => número de execução para um propósito diferente para ativar BTE "RWBAPI01"
CONCATENATE 'BSTAT' 'S' INTO ls_extension1-field2.
mac_assign_extension 'BSCHL' '39' ls_extension1-field2.
mac_assign_extension 'UMSKZ' 'F' ls_extension1-field2.
mac_assign_extension 'ZUMSK' 'Z' ls_extension1-field2.
mac_assign_extension 'SHKZG' 'H' ls_extension1-field2.
APPEND ls_extension1 TO lt_extension1.
5) No módulo de função "ZSAMPLE_INTERFACE_RWBAPI01" , leia a tabela de extensão1 e preencha o campo na tabela IT_ACCIT.
TIPOS : INICIO DE ty_extension,
campo TIPO char50,
FIN DE ty_extension.
TIPOS : tty_extension TIPO TABLA ESTÁNDAR DE ty_extension.
DATOS : ls_extension TIPO bapiacextc,
ws_extension TIPO ty_extension,
lt_extension TIPO tty_extension,
lv_tabix TIPO sytabix,
lv_len TIPO i.
DATOS : lv_bstat TIPO char01,
lv_bschl TIPO char01,
lv_umskz TIPO char01,
lv_zumsk TIPO char01,
lv_shkzg TIPO char01.
DEFINE mac_assign_value.
clear lv_len.
if &4 is initial.
find first occurrence of &1 in &2 match length lv_len.
if sy-subrc = 0.
&3 = &2+lv_len.
&4 = 'X'.
endif.
endif.
END-OF-DEFINITION.
LOOP AT extension INTO ls_extension.
CASE ls_extension-field1(4).
WHEN '0001'. "Para solicitação de pagamento antecipado
MOVE 'RFST' TO document_header-glvor.
READ TABLE it_accit WITH KEY posnr = ls_extension-field1+4(10).
IF sy-subrc = 0.
lv_tabix = sy-tabix.
SPLIT ls_extension-field2 AT ';'
INTO TABLE lt_extension
IN CHARACTER MODE.
LOOP AT lt_extension INTO ws_extension.
mac_assign_value 'BSTAT' ws_extension
Sin respuestas
No hay respuestas para mostrar
Se el primero en responder
contacto@primeinstitute.com
(+51) 1641 9379
(+57) 1489 6964
© 2024 Copyright. Todos los derechos reservados.
Desarrollado por Prime Institute