Sintoma

Ao exibir o Histórico Contábil de uma captação, não estão aparecendo os documentos da tabela

de Histórico Contábil. Isso ocorre para casos antigos que foram gerados antes do pacote 9, ou seja,

após atualizar o ambiente passou a não demonstrar os documentos.

Solução

Retirar esta opção CONT_DESMEMB do select da /pws/zycbt084 e inserir, após ela, a exclusão dos

registros que possuem este campo = 'X', desta forma retorna o mesmo resultado e atende todos os

cenários.

Informações Complementares

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

Nota Número 08865 Data: 21/08/2009 Hora: 15:10:35

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

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

Nota Número              : 08865

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 7.0

Pacote                   : 00010

Agrupamento              : 00110

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

Referência às notas relacionadas:

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

08536  - 00001 - 7.0    - 00009  - DA-VINCULAÇÃO/LIQUIDAÇÃO-OTIMIZAÇÃO-BUSCA TAXAS/TIPO DOCTO. POR C

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

HISTÓRICO CONTÁBIL - NÃO EXIBE DOCUMENTOS QUE ESTÃO NA /PWS/ZYCBT084

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

Palavras Chave:

LIQUIDAÇÃO HISTÓRICO CONTÁBIL NÃO EXIBE DOCUMENTOS QUE ESTÃO

NA /PWS/ZYCBT084

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

Objetos da nota:

REPS /PWS/ZYCBR059

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

Modificações efetuadas em REPS /PWS/ZYCBR059

...

    CLEAR v_vlvinc.

    LOOP AT itab_zycbt005.

      v_vlvinc = v_vlvinc + itab_zycbt005-vlvinc.

    ENDLOOP.

    SELECT * FROM /pws/zycbt084

             INTO TABLE itab_zycbt084

             FOR ALL ENTRIES IN itab_zycbt005

             WHERE nrseqc       EQ itab_zycbt005-nrseqc

             AND   nrinvoic     EQ itab_zycbt005-nrinvoic

             AND   gsberf       EQ itab_zycbt005-gsberf

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

             AND   dtvincul     EQ itab_zycbt005-dtvincul

             AND   cont_desmemb NE 'X'.

* << Fim da exclusão

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

             and   dtvincul     eq itab_zycbt005-dtvincul.

    delete itab_zycbt084 where cont_desmemb eq 'X'.

* << Fim da inclusão

    SELECT * FROM /pws/zycbt069

            INTO TABLE itab_zycbt069

            FOR ALL ENTRIES IN itab_zycbt005

            WHERE nrseqc   EQ itab_zycbt005-nrseqc

            AND   nrinvoic EQ itab_zycbt005-nrinvoic

            AND   nrparcf  EQ itab_zycbt005-nrparcf

            AND   gsberf   EQ itab_zycbt005-gsberf

            AND   nrparc   EQ itab_zycbt005-nrparc

            AND   dtvincul EQ itab_zycbt005-dtvincul

            AND   dtvencto EQ itab_zycbt005-dtvencto.

...