CE PLUS - Nota 011174

Módulo: CÂMBIO EXPORTAÇÃO

Funcionalidade: Vinculação

Data/Hora da Publicação: 24/05/2011 00:00:00

Data/Hora Última Alteração: 24/05/2011 09:45:50

Descrição da Nota: VINCULAÇÃO - LIQUIDAÇÃO - BAIXA DO CLIENTE

Sintoma

O sistema utilizava a data de lançamento incorreta para verificar se o documento do cliente

estava em aberto

 

 

Solução

Foi efetuada uma correção para que o sistema utilize a Data de Lançamento corretamente

de acordo com os documentos contábeis gravados na tabela de faturas

 

Versões Tratadas

8.0


Pré-Requisitos

Produto:

Nota

Descrição

DA-LIQUIDAÇÃO E VINCULAÇÃO LIQ. AUTOMÁT - NORMAL/ARBITRAGEM/PERFORMANCE

VINC DP AUTOMÁTICA-MSG DOC. COMPEN/NÃO AUTOM ERRO BI-ERRO /PWS/ZYGL007

Informações Complementares

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

Nota Número 11174 Data: 24/05/2011 Hora: 09:37:55

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

 

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

Nota Número              : 11174

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 8.0

Pacote                   : 00007

Agrupamento              : 00072

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

Referência às notas relacionadas:

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

 

07760  - 00001 - 7.0    - 00007 - DA-LIQUIDAÇÃO E VINCULAÇÃO LIQ. AUTOMÁT - NORMAL/ARBITRAGEM/PERFOR

09751  - 00002 - 8.0    - 00002 - VINC DP AUTOMÁTICA-MSG DOC. COMPEN/NÃO AUTOM ERRO BI-ERRO /PWS/ZYG

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

Texto Rápido:

VINCULAÇÃO - LIQUIDAÇÃO - BAIXA DO CLIENTE

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

Palavras Chave:

VINCULAÇÃO - LIQUIDAÇÃO - BAIXA DO CLIENTE -

DATA DE LANÇAMENTO

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

Objetos da nota:

REPS /PWS/MZYCB004F03

REPS /PWS/MZYCB009F04

 

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

Modificações efetuadas em REPS /PWS/MZYCB004F03

 

...

          <fs_belnr>

          <fs_budat>

          'S'.

    endif.

    read table itab_zycbt030 with key nrinvoic = p_vinculacao-nrinvoic

                                      nrparcf  = p_vinculacao-nrparcf

                                      gsberf   = p_vinculacao-gsberf.

    if itab_zycbt030-vlsltrans > 0.

      if not <fs_zycbt030>-budat_t is initial

         and <fs_zycbt030>-budat_t > <fs_zycbt030>-budat

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

         and <fs_zycbt030>-belnr ne <fs_zycbt030>-belnr6.

* << Fim da exclusão

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

         and <fs_zycbt030>-belnr ne <fs_zycbt030>-belnr6

         and not <fs_zycbt030>-belnr6 is initial.

* << Fim da inclusão

        assign <fs_zycbt030>-budat_t to <fs_budat>.

      else.

        assign <fs_zycbt030>-budat to <fs_budat>.

      endif.

      if <fs_zycbt030>-belnr6 is initial.

        assign <fs_zycbt030>-belnr to <fs_belnr>.

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

        assign itab_zycbt030-dtbelnr to <fs_budat>.

* << Fim da inclusão

      else.

...

 

 

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

Modificações efetuadas em REPS /PWS/MZYCB009F04

 

...

          <fs_belnr>

          <fs_budat>

          'S'.

    ENDIF.

    READ TABLE itab_zycbt030 WITH KEY nrinvoic = p_fatura-nrinvoic

                                      nrparcf  = p_fatura-nrparcf

                                      gsberf   = p_fatura-gsberf.

    IF itab_zycbt030-vlsltrans > 0.

      IF NOT <fs_zycbt030>-budat_t IS INITIAL

         AND <fs_zycbt030>-budat_t > <fs_zycbt030>-budat

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

         AND <fs_zycbt030>-belnr NE <fs_zycbt030>-belnr6.

* << Fim da exclusão

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

         AND <fs_zycbt030>-belnr NE <fs_zycbt030>-belnr6

         and not <fs_zycbt030>-belnr6 is initial.

* << Fim da inclusão

        ASSIGN <fs_zycbt030>-budat_t TO <fs_budat>.

      ELSE.

        ASSIGN <fs_zycbt030>-budat TO <fs_budat>.

      ENDIF.

      IF <fs_zycbt030>-belnr6 IS INITIAL.

        ASSIGN <fs_zycbt030>-belnr TO <fs_belnr>.

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

        ASSIGN itab_zycbt030-dtbelnr TO <fs_budat>.

* << Fim da inclusão

      ELSE.

...