CE PLUS - Nota 005193

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Custo Efetivo

Data/Hora da Publicação: 12/11/2007 00:00:00

Data/Hora Última Alteração: 22/02/2011 14:30:08

Descrição da Nota: VALOR FICA APENAS REALIZADO E DIFERENÇA QDO ORIGEM = FAT

Sintoma

VALOR FICA APENAS REALIZADO E DIFERENÇA QDO ORIGEM = FAT

 

 

Solução

corrigir seleção de taxa da fatura.

 

Versões Tratadas

7.0


Pré-Requisitos

Produto:

Nota

Descrição

AJUSTE PARA MELHORIA DE PERFORMANCE DO CUSTO

Informações Complementares

----------------------------------------------------------------------------------------------------

Nota Número 05193 Data: 12/11/2007 Hora: 10:59:10

----------------------------------------------------------------------------------------------------

 

----------------------------------------------------------------------------------------------------

Nota Número              : 05193

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 7.0

Pacote                   : 00003

Agrupamento              : 00020

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Versão - Pacote - Descrição Breve

 

05006  - 00001 - 7.0    - 00003  - AJUSTE PARA MELHORIA DE PERFORMANCE DO CUSTO

----------------------------------------------------------------------------------------------------

VALOR FICA APENAS REALIZADO E DIFERENÇA QDO ORIGEM = FAT

----------------------------------------------------------------------------------------------------

Palavras Chave:

CUSTO EFETIVO - TAXA FATURA - CONVERSÃO - VALOR DIFERENÇA.

 

----------------------------------------------------------------------------------------------------

Objetos da nota:

REPS /PWS/ZYCIR006

 

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/ZYCIR006

 

...

        IF itab_zycit036-origem = 'FAT'.

          READ TABLE itab_zycit003 WITH KEY

                      nrseq = itab_zycit036-nrseq

                      ebeln = itab_zycit036-ebeln

                      ebelp = itab_zycit036-ebelp.

          IF sy-subrc = 0.

            READ TABLE itab_zycit263 WITH KEY

                                 nrseq = itab_zycit003-nrseq

                                 ebeln = itab_zycit003-ebeln

                                 ebelp = itab_zycit003-ebelp.

* >> Início da exclusão: FORM CALCULAR_OUTROS_CUSTOS

            CLEAR: itab_zycit006_fat.

            READ TABLE itab_zycit006_fat

                    WITH KEY  nrseq_pgfat = itab_zycit263t-nrseq_pgfat.

            v_nrseq_fat = itab_zycit006_fat-nrseq.

            v_belnr_p = itab_zycit006_fat-belnr_p.

            v_dtincl  = itab_zycit006_fat-dtincl .

* << Fim da exclusão

* >> Início da inclusão: FORM CALCULAR_OUTROS_CUSTOS

            CLEAR: itab_zycit006.

            READ TABLE itab_zycit006

                    WITH KEY  nrseq_pgfat = itab_zycit263-nrseq_pgfat.

            v_nrseq_fat = itab_zycit006-nrseq.

            v_belnr_p = itab_zycit006-belnr_p.

            v_dtincl  = itab_zycit006-dtincl .

* << Fim da inclusão

            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.

            READ TABLE itab_zycit006

                    WITH KEY nrseq_pgfat = itab_zycit263-nrseq_pgfat.

            IF sy-subrc NE 0 OR itab_zycit006-dt_belnrp IS INITIAL.

...