Sintoma

Nos relatórios da Rotina Mensal, na linha que se refere a transferência de valores do longo para o

curto prazo, está vindo descrita como "diferença a provisionar" mas na verdade não se trata de uma

diferença, e sim uma transferência de contas, logo, o programa deverá descrever "transferência

LP/CP".

Solução

Foi consistido os valores de transferência e a Diferença a provisionar para a impressão do

relatório.

Informações Complementares

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

Nota Número 01593 Data: 16/06/2006 Hora: 09:19:13

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

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

Nota Número              : 01593

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00023

Agrupamento              : 00117

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

IMPRESSÃO DOS VALORES DE TRANSFERÊNCIA DE LP PARA CP NA ROTINA MENSAL

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

Palavras Chave:

ROTINA MENSAL RELATÓRIO TRANSFERÊNCIA

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

Objetos da nota:

REPS /PWS/ZYCBI003

REPS /PWS/ZYCBR003

REPT /PWS/ZYCBR003

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

Modificações efetuadas em REPS /PWS/ZYCBI003

...

    ENDIF.

    WRITE AT sy-linsz sy-vline.

    FORMAT COLOR OFF.

    IF wa_zycbt007-fprovisao = 'C'.

      FORMAT COLOR 2 INVERSE OFF INTENSIFIED OFF.

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

      WRITE: sy-vline,

             199 text-059, 219 p_v_vlmej

                               CURRENCY wa_itab_relat-waers,

* << Fim da exclusão

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

      WRITE: sy-vline.

      IF wa_itab_relat-tpcontab NE 'T'.

        WRITE: 199 text-059.

      ELSE.

        WRITE: 199 text-137.

      ENDIF.

      WRITE: 219 p_v_vlmej CURRENCY wa_itab_relat-waers,

* << Fim da inclusão

                           260 p_v_vlmeir

                               CURRENCY wa_itab_relat-waers,

             AT sy-linsz sy-vline.

    ELSE.

      FORMAT COLOR 2 INVERSE OFF INTENSIFIED OFF.

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

      WRITE: sy-vline,

             199 text-059, 219 p_v_vlmej

                               CURRENCY wa_itab_relat-waers,

* << Fim da exclusão

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

      WRITE: sy-vline.

      IF wa_itab_relat-tpcontab NE 'T'.

        WRITE: 199 text-059.

      ELSE.

        WRITE: 199 text-137.

      ENDIF.

      WRITE: 219 p_v_vlmej CURRENCY wa_itab_relat-waers,

* << Fim da inclusão

                           260 p_v_vlmeir

                               CURRENCY wa_itab_relat-waers,

             AT sy-linsz sy-vline.

      CLEAR v_vlrjprov.

    ENDIF.

...

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

Modificações efetuadas em REPS /PWS/ZYCBR003

...

      WRITE: 252 itab_relat-aliqir,

             260 itab_relat-vlmeir CURRENCY itab_relat-waers NO-ZERO.

    ENDIF.

    WRITE: AT sy-linsz sy-vline.

    MOVE itab_relat TO wa_itab_relat.

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

    IF itab_relat-vlmitransf IS INITIAL.

* << Fim da exclusão

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

    IF itab_relat-vlmitransf IS INITIAL

       AND itab_relat-vlmetransf IS INITIAL.

* << Fim da inclusão

      ADD itab_relat-vlmej  TO v_vlmej_w.

      ADD itab_relat-vlmeir TO v_vlmeir_w.

      CHECK ( wa_zycbt007-fprovisao      NE 'C' AND

              /pws/zyglt009-calc_rot_sep NE 'S' AND

              /pws/zyglt009-cont_rot_sep NE 'S' ) OR

...

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

Modificações efetuadas em REPT /PWS/ZYCBR003

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 137

Texto: (19 caracteres)

"Transferência LP/CP"

Comprimento máximo: 19