CE PLUS - Nota 002091

Módulo: CÂMBIO EXPORTAÇÃO

Funcionalidade: Liquidação de Fatura

Data/Hora da Publicação: 13/09/2006 00:00:00

Data/Hora Última Alteração: 22/02/2011 11:56:24

Descrição da Nota: LIQUIDAÇÃO DE FATURAS - DATA BASE DE CONVERSÃO PARA TAXA

Sintoma

Após a vinculação de várias faturas, ao tentar efetuar a liquidação, o programa efetuou a liquidação

da primeira fatura e ao fazer a segunda apareceu a seguinte mensagem "Processo XXXXXX, sem data de

conversão. Liquidação não permitida", acontece que o BI sai do programa sem voltar a

liquidação da primeira fatura e também não gravou nada nas tabelas /PWS/ZYCBT017 e

/PWS/ZYCBT030, e, se casualmente tentarmos liquidar novamente a primeira fatura, o programa não

acha partida em aberto devido o abandono incorreto do BI.

 

 

Solução

Incluir verificação da data base para conversão no form lancamento_provisao, antes de iniciar as

contabilizações. Caso não encontre, exibir a mensagem e abandonar o programa, conforme faz no form

lancamento_provisao2.

 

Versões Tratadas

6.0


Pré-Requisitos

Produto:

Nota

Descrição

LIQUIDAÇÃO COM SEQUEÊNCIAS IGUAIS MAS COM DIVISÕES DIFERENTES

Informações Complementares

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

Nota Número 02091 Data: 13/09/2006 Hora: 13:22:51

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

 

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

Nota Número              : 02091

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00024

Agrupamento              : 00129

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

Referência às notas relacionadas:

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

 

00403  - 00001 - 6.0    - 00022  - LIQUIDAÇÃO COM SEQUEÊNCIAS IGUAIS MAS COM DIVISÕES DIFERENTES

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

LIQUIDAÇÃO DE FATURAS - DATA BASE DE CONVERSÃO PARA TAXA

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

Palavras Chave:

LIQUIDAÇÃO DE FATURAS DATA BASE DE CONVERSÃO PARA TAXA

KURSF

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

Objetos da nota:

REPS /PWS/MZYCB004F01

REPS /PWS/MZYCB004F02

 

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

Modificações efetuadas em REPS /PWS/MZYCB004F01

 

...

ENDFORM.

FORM lancamento_provisao.

  DATA: v_docto LIKE /pws/zycbt030-belnr,

        v_chave LIKE /pws/zycbe033-cpochv.

  FREE itab_doc_f02.

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

  LOOP AT itab_zycbt006 WHERE v_status EQ 'I' AND

                              v_armda  NE 'X'.

    LOOP AT itab_zycbt030 WHERE nrinvoic = itab_zycbt006-nrinvoic

                          AND   gsberf   = itab_zycbt006-gsberf

                          and   nrparcf  = itab_zycbt006-nrparcf.

      PERFORM valida_taxa_parametro.

      IF itab_zycbt030-belnr EQ space.

        v_subrc = 4.

        EXIT.

      ENDIF.

    ENDLOOP.

  ENDLOOP.

* << Fim da inclusão

  LOOP AT itab_zycbt006 WHERE v_status = 'I'

                         AND  v_armda NE 'X'.

    PERFORM valida_taxa_parametro.

    IF /pws/zycet037-comis_provisao IS INITIAL OR

       /pws/zycet037-comis_provisao EQ 0.

...

 

 

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

Modificações efetuadas em REPS /PWS/MZYCB004F02

 

...

  ENDIF.

  LOOP AT itab_zycbt006 WHERE v_status EQ 'I' AND

                              v_armda  NE 'X' AND

                              v_performance NE 'X'.

    LOOP AT itab_zycbt030 WHERE nrinvoic = itab_zycbt006-nrinvoic

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

                          AND   gsberf   = itab_zycbt006-gsberf.

* << Fim da exclusão

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

                          AND   gsberf   = itab_zycbt006-gsberf

                          and   nrparcf  = itab_zycbt006-nrparcf.

* << Fim da inclusão

      PERFORM valida_taxa_parametro.

      IF itab_zycbt030-belnr EQ space.

        v_subrc = 4.

        EXIT.

      ENDIF.

...