CE PLUS - Nota 003258
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Custo Efetivo
Data/Hora da Publicação: 15/03/2007 00:00:00
Data/Hora Última Alteração: 08/03/2010 20:13:20
Descrição da Nota: FATURA, COM DATA DE INCLUSÃO DIFERENTE DA DATA DO DOCUMENTO
Sintoma
Caso a data da Fatura não seja a mesma do ano corrente, o valor da mercadoria cairá para coluna de
diferença no Custo efetivo. A contabilização ocorrerá mais o valor não irá para custo. No caso da
Fatura de Frete, não importa a data, ele sempre incidirá corretamente no custo.
Solução
Atualaziado o programa do custo efetivo para buscar a data do documento ao inves da data de inclusão
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 03258 Data: 15/03/2007 Hora: 15:48:44
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 03258
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00026
Agrupamento : 00156
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
FATURA, COM DATA DE INCLUSÃO DIFERENTE DA DATA DO DOCUMENTO
----------------------------------------------------------------------------------------------------
Palavras Chave:
FATURA - DT INCLUSÃO - DT DOCUMENTO - VL. DIFERENÇA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/ZYCIR006
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/ZYCIR006
...
SELECT SINGLE nrseq belnr_p dtincl FROM /pws/zycit006
INTO (v_nrseq_fat,v_belnr_p,v_dtincl)
WHERE nrseq_pgfat = itab_zycit263-nrseq_pgfat.
IF sy-subrc EQ 0 AND v_belnr_p IS INITIAL.
SELECT SINGLE belnr_p FROM /pws/zycit132
INTO (v_belnr_p)
WHERE nrseq EQ v_nrseq_fat.
ENDIF.
ENDIF.
IF sy-subrc = 0.
* >> Início da inclusão: FORM CALCULAR_OUTROS_CUSTOS
read table itab_zycit006
with key nrseq_pgfat = itab_zycit263-nrseq_pgfat.
if sy-subrc ne 0 or itab_zycit006-dt_belnrp is initial.
else.
v_dtincl = itab_zycit006-dt_belnrp.
endif.
* << Fim da inclusão
SELECT SINGLE kursf FROM bkpf INTO v_kursf
WHERE bukrs = /pws/zycit001-bukrs
AND belnr = v_belnr_p
AND gjahr = v_dtincl+0(4).
ENDIF.
...
...
SELECT SINGLE nrseq belnr_p dtincl FROM /pws/zycit006
INTO (v_nrseq_fat,v_belnr_p,v_dtincl)
WHERE nrseq_pgfat = itab_zycit263-nrseq_pgfat.
IF sy-subrc EQ 0 AND v_belnr_p IS INITIAL.
SELECT SINGLE belnr_p FROM /pws/zycit132
INTO (v_belnr_p)
WHERE nrseq EQ v_nrseq_fat.
ENDIF.
ENDIF.
IF sy-subrc = 0.
* >> Início da inclusão: FORM CALCULAR_OUTROS_CUSTOS_DA
read table itab_zycit006
with key nrseq_pgfat = itab_zycit263-nrseq_pgfat.
if sy-subrc ne 0 or itab_zycit006-dt_belnrp is initial.
else.
v_dtincl = itab_zycit006-dt_belnrp.
endif.
* << Fim da inclusão
SELECT SINGLE kursf FROM bkpf INTO v_kursf
WHERE bukrs = /pws/zycit001-bukrs
AND belnr = v_belnr_p
AND gjahr = v_dtincl+0(4).
ENDIF.
...