CE PLUS - Nota 005650
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Rotina de Pagamento
Data/Hora da Publicação: 15/01/2008 00:00:00
Data/Hora Última Alteração: 18/02/2011 13:55:36
Descrição da Nota: SAÍDA DE PAGAMENTO - REMESSA COM ORIGEM - DATA DE LANÇAMENTO
Sintoma
Ao efetuar a saída de pagamento de uma remessa com origem, onde é feito o desmembramento do
documento origem, após efetuado o mesmo o sistema já estorna-o e exibe mensagem de erro data de
lançamento não encontrada, no relatório final.
Solução
Lançar o documento de saída de pagamento com a data de lançamento informada na tela.
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 05650 Data: 15/01/2008 Hora: 16:39:39
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 05650
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00004
Agrupamento : 00030
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
05469 - 00001 - 7.0 - 00003 - DESENVOLVIMENTO ADICIONAL - SAÍDA DE PAGAMENTO UTILIZANDO CONTA C
----------------------------------------------------------------------------------------------------
SAÍDA DE PAGAMENTO - REMESSA COM ORIGEM - DATA DE LANÇAMENTO
----------------------------------------------------------------------------------------------------
Palavras Chave:
SAÍDA DE PAGAMENTO - REMESSA COM ORIGEM - DATA DE LANÇAMENTO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB115F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB115F01
...
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
itab_zycbe033-budat = v_dtpagto.
ELSE.
IF NOT v_ccexterior IS INITIAL.
* >> Início da exclusão: FORM EXECUTA_F53_CP_ESPECIFICA
READ TABLE itab_zycbt232_assoc
WITH KEY nrboleto = itab_zycbt134-nrseq.
IF sy-subrc = 0.
* << Fim da exclusão
CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
EXPORTING
* >> Início da exclusão: FORM EXECUTA_F53_CP_ESPECIFICA
v_bukrs = itab_zycbt232_assoc-bukrs
v_date = itab_zycbt232_assoc-dtlancto_saida
* << Fim da exclusão
* >> Início da inclusão: FORM EXECUTA_F53_CP_ESPECIFICA
v_bukrs = itab_zycbt134-bukrs
v_date = v_dtlanc
* << Fim da inclusão
IMPORTING
v_year = v_ano
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
* >> Início da exclusão: FORM EXECUTA_F53_CP_ESPECIFICA
itab_zycbe033-budat = itab_zycbt232_assoc-dtlancto_saida.
ENDIF.
* << Fim da exclusão
* >> Início da inclusão: FORM EXECUTA_F53_CP_ESPECIFICA
itab_zycbe033-budat = v_dtlanc.
* << Fim da inclusão
ELSE.
CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
EXPORTING
v_bukrs = itab_zycbt031-bukrs
v_date = itab_zycbt031-dtcredpr
IMPORTING
v_year = v_ano
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
...