CE PLUS - Nota 001882

Módulo: CÂMBIO EXPORTAÇÃO

Funcionalidade: Captação

Data/Hora da Publicação: 04/08/2006 00:00:00

Data/Hora Última Alteração: 18/02/2011 15:17:46

Descrição da Nota: CAPTAÇÃO - DRILL DOWN - ESTORNO

Sintoma

O DRILL-DOWN DO PROGRAMA ESTAVA BUSCANDO O DOCUMENTO CONTÁBIL ERRADO PARA OS CASOS ESTORNADOS, POIS

O ATALHO ESTAVA SENDO EFETUADO NO DOCUMENTO DO EXERCÍCIO ERRADO.

 

 

Solução

O PROGRAMA TENTA BUSCAR PRIMEIRO O BLDAT, PARA DEPOIS TENTAR PEGAR O BUDAT.

 

Versões Tratadas

6.0

Informações Complementares

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

Nota Número 01882 Data: 04/08/2006 Hora: 16:42:50

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

 

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

Nota Número              : 01882

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00024

Agrupamento              : 00125

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

CAPTAÇÃO - DRILL DOWN - ESTORNO

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

Palavras Chave:

CAPTAÇÃO - DRILL DOWN

 

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

Objetos da nota:

FUNC /PWS/ZYCB_TRANSACAO_FB08

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_FB08

 

...

      SHIFT t_zycbt032-belnr RIGHT DELETING TRAILING space.

      TRANSLATE t_zycbt032-belnr USING ' 0'.

      APPEND t_zycbt032.

      CONTINUE.

    ENDIF.

* >> Início da inclusão: FUNCTION /PWS/ZYCB_TRANSACAO_FB08

   IF NOT t_dados-bldat IS INITIAL.

        CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'

      EXPORTING

        v_bukrs                      = t_dados-bukrs

        v_date                       = t_dados-bldat

     IMPORTING

        V_YEAR                       = v_date

     EXCEPTIONS

        VARIANTE_DE_EXERCICIO        = 1

        DATA_NAO_ENCONTRADA          = 2

        EMPRESA_NAO_ENCONTRADA       = 3

        PERIOD_IN_NOT_VALID          = 4

        PERIOD_NOT_ASSIGNED          = 5

        VERSION_UNDEFINED            = 6

        OTHERS                       = 7.

    ELSE.

* << Fim da inclusão

    CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'

      EXPORTING

        v_bukrs                      = t_dados-bukrs

        v_date                       = t_dados-budat

     IMPORTING

...

 

...

        EMPRESA_NAO_ENCONTRADA       = 3

        PERIOD_IN_NOT_VALID          = 4

        PERIOD_NOT_ASSIGNED          = 5

        VERSION_UNDEFINED            = 6

        OTHERS                       = 7.

* >> Início da inclusão: FUNCTION /PWS/ZYCB_TRANSACAO_FB08

ENDIF.

* << Fim da inclusão

    check t_dados-tcode = 'FB08'.

select single * from /pws/zycbt007

                where bukrs eq t_dados-bukrs.

  if t_dados-stgrd = '01'.

    if not /pws/zycbt007-percorr is initial.

...