Módulo: DOC. EXPORTAÇÃO
Funcionalidade: Comissão de Agente
Data/Hora da Publicação: 02/12/2005 00:00:00
Data/Hora Última Alteração: 21/02/2011 15:20:34
Descrição da Nota: VALORES ERRADOS NO RATEIO DA COMISSÃO DE AGENTE
Sintoma
O programa estava sobrescrevendo o valor de Comissão Final de Agente com o valor Provisionado, além
de estar realizando o rateio erroneamente e não estar levando os dados de Fornecedor na linha de
Comissão de Agente.
Solução
Correção nos valores a contabilizar na Comissão de Agente.
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 00380 Data: 02/12/2005 Hora: 09:05:30
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 00380
Categoria : Erro de Programa
Prioridade : Baixa
Versão PW.CE : 6.0
Pacote : 00022
Agrupamento : 00090
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
00176 - 00001 - 6.0 - 00021 - CORREÇÃO EM CÁLCULO DE RATEIO POR CENTRO DE LUCRO DE COMISSÃO DE
00273 - 00002 - 6.0 - 00021 - PREENCHIMENTO DO CAMPO LOCAL DE NEGÓCIOS PARA CONTABILIZAÇÃO DE F
00332 - 00003 - 6.0 - 00022 - AJUSTES NO VALOR DA COMISSÃO DE AGENTE
----------------------------------------------------------------------------------------------------
VALORES ERRADOS NO RATEIO DA COMISSÃO DE AGENTE
----------------------------------------------------------------------------------------------------
Palavras Chave:
AGENTE; COMISSÃO; RATEIO; ERRADOS; VALORES
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCE017F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCE017F01
FORM rateio_at_ar.
DATA: v_percent TYPE f,
v_fornec LIKE /pws/zycet010-vlcomis,
v_cont TYPE i,
v_difer LIKE /pws/zycet010-vlcomis,
v_difer2 LIKE /pws/zycet010-vlcomis,
...
MOVE: itab_zycet002-nrseq TO itab_zycet013-nrseq,
itab_zycet002-gsber TO itab_zycet013-gsber,
itab_zycet002-prctr TO itab_zycet013-prctr,
itab_zycet002-waers TO itab_zycet013-waers.
ENDIF.
* >> Início da exclusão: FORM RATEIO_AT_AR
move: itab_zycet002-vlme_r to itab_zycet013-vlme,
* << Fim da exclusão
* >> Início da inclusão: FORM RATEIO_AT_AR
move: itab_zycet002-VLFOB to itab_zycet013-vlme,
* << Fim da inclusão
itab_zycet010-lifnr TO itab_zycet013-lifnr,
itab_saida-vlcomis TO itab_zycet013-vlagente.
COLLECT itab_zycet013.
ENDLOOP.
DELETE itab_zycet013 WHERE vlme IS initial.
...
IF NOT itab_zycet010-vlcomicalc IS INITIAL.
v_vlcomis = v_vlcomis_aux.
ENDIF.
ENDIF.
ENDIF.
ENDFORM. " rateio_at_ar