Módulo: DOC. EXPORTAÇÃO
Funcionalidade: Agrupamento de Embarque
Data/Hora da Publicação: 02/02/2006 00:00:00
Data/Hora Última Alteração: 21/02/2011 15:59:16
Descrição da Nota: ESTORNO DE AGRUPAMENTO DE EMBARQUE
Sintoma
No estorno do agrupamento está sendo preenchido no campo BSIS-BUDAT (Data de Lançamento) da FB08 a
data de Lançamento do documento contábil a ser estornado, quando deveria lançar a data do dia.
Isto acontece para o caso de se estornar documentos contábeis de períodos contábeis que estejam
fechados. Da forma que está não é possível fazê-lo.
Solução
Envio da data correta.
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 00781 Data: 02/02/2006 Hora: 14:48:43
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 00781
Categoria : Erro de Programa
Prioridade : Baixa
Versão PW.CE : 6.0
Pacote : 00022
Agrupamento : 00099
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
ESTORNO DE AGRUPAMENTO DE EMBARQUE
----------------------------------------------------------------------------------------------------
Palavras Chave:
ESTORNO AGRUPAMENTO EMBARQUE
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/ZYCER306
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/ZYCER306
...
SELECT SINGLE budat FROM bkpf INTO itab_zycee005-budat
WHERE bukrs = wa_zycet001-bukrs AND
belnr = itab_zycbt030-belnr AND
gjahr = itab_zycbt030_aux-budat.
v_monat = itab_zycee005-budat+4(2).
* >> Início da inclusão: FORM FILL_DATE_FB08
itab_zycee005-bldat = itab_zycee005-budat.
* << Fim da inclusão
itab_zycee005-gjahs = itab_zycee005-budat(4).
CALL FUNCTION 'FI_PERIOD_CHECK'
EXPORTING
i_bukrs = itab_zycee005-bukrs
i_gjahr = itab_zycee005-budat+0(4)
...
...
OTHERS = 3.
IF sy-subrc = 0.
itab_zycee005-stgrd = '01'.
ELSE.
itab_zycee005-stgrd = '02'.
* >> Início da exclusão: FORM FILL_DATE_FB08
itab_zycee005-budat = wa_zycet001-dtemb.
* << Fim da exclusão
* >> Início da inclusão: FORM FILL_DATE_FB08
itab_zycee005-budat = sy-datum.
* << Fim da inclusão
ENDIF.
APPEND itab_zycee005.
ENDFORM.
FORM executa_fbra.
IMPORT v_mode FROM MEMORY ID '035'.
...