CE PLUS - Nota 005312
Módulo: CÂMBIO FINANCEIRO
Funcionalidade: Rotina de Pagamento
Data/Hora da Publicação: 26/11/2007 00:00:00
Data/Hora Última Alteração: 18/02/2011 14:05:18
Descrição da Nota: COMPLEMENTO DO BOLETO - EMPRÉSTIMO-PRINCIPAL- F-51 - COMPENSA DOCTO F-63
Sintoma
Ao efetuar o complemento do boleto de uma parcela de principal, empréstimo, gera F-63 e na F-51 não
esta levando este documento, gerando diferença.
Solução
Verificar se a parcela é de comissão ou de principal, para carregar o documento da F-63 na
compensação(f-51)
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 05312 Data: 26/11/2007 Hora: 16:11:06
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 05312
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00003
Agrupamento : 00023
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
04196 - 00001 - 7.0 - 00002 - IRRF SOBRE COMISSÃO DE EMPRÉSTIMO CONTABILIZADO NO COMPLEMENTO DO
----------------------------------------------------------------------------------------------------
COMPLEMENTO DO BOLETO - EMPRÉSTIMO-PRINCIPAL- F-51 - COMPENSA DOCTO F-63
----------------------------------------------------------------------------------------------------
Palavras Chave:
COMPLEMENTO DO BOLETO EMPRÉSTIMO PRINCIPAL F-51 COMPENSA DOCTO F-63
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCA110F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCA110F01
...
ENDIF.
APPEND itab_zycbt036.
ENDLOOP.
READ TABLE itab_zycbt036 WITH KEY belnr = ' '.
IF sy-subrc EQ 0.
EXIT.
ENDIF.
itab_zycbt036-tcode = text-066.
itab_zycbt036-tabela = text-110.
itab_zycbt036-cpochv = /pws/zycbe031-nrseq.
* >> Início da exclusão: FORM EXECUTA_CLEARING_EMP
IF /pws/zycbe031-tpparc EQ 'C' AND sy-index NE '2'.
* << Fim da exclusão
* >> Início da inclusão: FORM EXECUTA_CLEARING_EMP
IF ( /pws/zycbe031-tpparc EQ 'C' AND sy-index NE '2' )
or /pws/zycbe031-tpparc EQ 'P'.
* << Fim da inclusão
itab_zycbt036-belnr = /pws/zycbe031-belnr_p.
ELSE.
itab_zycbt036-belnr = /pws/zycbe031-belnr_pi.
ENDIF.
SELECT SINGLE awkey FROM bkpf
INTO itab_zycbt036-awkey
WHERE belnr EQ itab_zycbt036-belnr
AND bukrs EQ /pws/zycbe031-bukrs
AND gjahr EQ /pws/zycbe031-dtcredpr(4).
APPEND itab_zycbt036.
...