CE PLUS - Nota 005337
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Despesas
Data/Hora da Publicação: 28/11/2007 00:00:00
Data/Hora Última Alteração: 22/02/2011 15:49:54
Descrição da Nota: TRATATIVA PARA MOEDAS QUE NÃO POSSUEM CASAS DECIMAIS
Sintoma
O programa esta enviando o valor incorreto para a MIRO.
Solução
Adicionada tratativa para casas decimais.
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 05337 Data: 28/11/2007 Hora: 07:56:19
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 05337
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
05189 - 00001 - 7.0 - 00003 - TRATATIVA PARA MOEDAS SEM CASAS DECIMAIS
----------------------------------------------------------------------------------------------------
TRATATIVA PARA MOEDAS QUE NÃO POSSUEM CASAS DECIMAIS
----------------------------------------------------------------------------------------------------
Palavras Chave:
CASAS DECIMAIS FATURA IMPOSTOS AMERICA LATINA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F02
...
LOOP AT itab_zycit483.
CLEAR: itab_account, itab_zyglt316.
READ TABLE itab_zyglt316
WITH KEY codaux1 = itab_zycit483-tpdesp.
READ TABLE itab_ivaped INDEX 1.
itab_glaccount-item_amount = itab_zycit483-vldp.
itab_glaccount-db_cr_ind = 'S'.
itab_glaccount-comp_code = /pws/zycie006-bukrs .
itab_glaccount-tax_code = itab_zycit483-iva .
itab_glaccount-gl_account = itab_zyglt316-konts.
* >> Início da inclusão: FORM MIRO_AM_LA
PERFORM retorna_decimais USING itab_zycit483-waers
CHANGING itab_glaccount-item_amount.
* << Fim da inclusão
IF itab_ivaped-knttp IS INITIAL.
CLEAR itab_marc. REFRESH itab_marc.
SELECT SINGLE matnr prctr FROM marc INTO itab_marc
WHERE matnr EQ itab_ivaped-matnr AND
werks EQ itab_ivaped-werks.
IF sy-subrc NE 0.
SELECT SINGLE matnr prctr FROM marc INTO itab_marc
WHERE matnr EQ itab_ivaped-matnr.
ENDIF.
itab_glaccount-profit_ctr = itab_marc-prctr.
...