CE PLUS - Nota 004010
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Rotina Mensal
Data/Hora da Publicação: 22/06/2007 00:00:00
Data/Hora Última Alteração: 10/03/2010 15:45:24
Descrição da Nota: ROTINA MENSAL - CONTABILIZAÇÃO DE PARCELAS DE COMISSÃO
Sintoma
Ao executar a rotina mensal, quando existem duas parcelas de comissão para o mesmo fechamento, o
programa está contabilizando somente a segunda parcela.
Solução
Foram efetuados ajustes e o programa passou a considerar também a primeira parcela ao contabilizar
as parcelas de comissão.
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 04010 Data: 22/06/2007 Hora: 08:59:01
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 04010
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00027
Agrupamento : 00171
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
ROTINA MENSAL - CONTABILIZAÇÃO DE PARCELAS DE COMISSÃO
----------------------------------------------------------------------------------------------------
Palavras Chave:
ROTINA MENSAL CONTABILIZAÇÃO PARCELA COMISSÃO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/ZYCBR003
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/ZYCBR003
...
ADD itab_relat-vlmeir TO v_vlmeir_w.
CHECK ( wa_zycbt007-fprovisao NE 'C' AND
/pws/zyglt009-calc_rot_sep NE 'S' AND
/pws/zyglt009-cont_rot_sep NE 'S' ) OR
wa_zycbt007-fprovisao EQ 'C'.
IF wa_zycbt007-fprovisao EQ space.
ADD itab_relat-vlrprov TO v_vlprov.
ADD itab_relat-vlirprov TO v_vlprovir.
ELSE.
IF itab_relat-tpcontab EQ 'C' AND
* >> Início da exclusão: FORM PROCESSA_ABERTO
itab_relat-nrparcj NE v_nrparcj.
* << Fim da exclusão
* >> Início da inclusão: FORM PROCESSA_ABERTO
( itab_relat-nrparcj = '001' OR
itab_relat-nrparcj NE v_nrparcj ).
* << Fim da inclusão
v_nrparcj = itab_relat-nrparcj.
ADD itab_relat-vlmej TO v_vlmej_w.
ADD itab_relat-vlmeir TO v_vlmeir_w.
ADD itab_relat-vlrprov TO v_vlprov.
ADD itab_relat-vlirprov TO v_vlprovir.
IF NOT itab_relat-vlrprov IS INITIAL.
MOVE-CORRESPONDING wa_itab_relat TO itab_contabil.
itab_contabil-vlmetransf = wa_itab_relat-vlmetransf.
itab_contabil-nrparcp = wa_itab_relat-nrparcj.
itab_contabil-dtcont = s_dtentr.
...