Sintoma

Ao gerar juros ACE na liquidação, o valor é calculado corretamente, mas aparece na coluna de ACC e

esta incorreto, deveria aparecer na coluna de ACE. Devido à isso, também é contabilizado

incorretamente o ACE, pois esta lançando na conta de ACC.

Após fazer uma liquidação e gerar provisões, ao fazer uma nova liquidação, estorna as provisões

geradas anteriormente, mas não deveria, somente deve lançar as novas referente à nova liquidação.

Solução

Carregar o valor do juros com o tipo igual à 'E', fazendo a consistência pelas datas de lançamento,

assim carrega a coluna correta e lança na conta correta.

Informações Complementares

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

Nota Número 02862 Data: 11/01/2007 Hora: 15:33:28

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

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

Nota Número              : 02862

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00026

Agrupamento              : 00148

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

Referência às notas relacionadas:

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

02763  - 00001 - 6.0    - 00026  - LIQUIDAÇÃO - VALOR JUROS ACE ACC - CHAVES PVE E DSE.

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

LIQUIDAÇÃO - COLUNA VALOR JUROS ACC/ACE - ESTORNO PROVISÃO

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

Palavras Chave:

LIQUIDAÇÃO COLUNA VALOR JUROS ACC/ACE ESTORNO PROVISÃO

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

Objetos da nota:

FUNC /PWS/ZYCB_CALCULA_JUROS

REPS /PWS/MZYCB004F02

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

Modificações efetuadas em FUNC /PWS/ZYCB_CALCULA_JUROS

...

       zycbe005-dtvincul le v_dtate.

      clear itab_periodos_j.

      itab_periodos_j-dtde  = v_dtde.

      itab_periodos_j-dtate = zycbe005-dtvincul.

      itab_periodos_j-txjur = itab_zycbt002-txjtotal.

      itab_periodos_j-tptxj = itab_zycbt002-tptxjur.

      itab_periodos_j-tpper = v_tipo_per.

      append itab_periodos_j.

      v_dtde = zycbe005-dtvincul.

      v_tipo_per = 'E'.

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

    ELSEIF zycbe005-dtvincul EQ v_dtde.

      v_tipo_per = 'E'.

* << Fim da inclusão

    endif.

    check v_dtate > v_dtde.

    if v_dt_pror  is initial                   or

       v_tipo_per eq 'A'                       or

       ( v_tipo_per eq 'E'                and

         not v_dt_pror  is initial        and

         v_dtate le zycbe005-dtvencto    ).

      clear itab_periodos_j.

      itab_periodos_j-dtde  = v_dtde.

      if itab_zycbt002-nrdiasj is initial.

...

...

            i_vlme                       = v_vlmeaux

            i_txj                        = p_txj

            i_nrdiabase                  = v_nrdiabase

            i_nrdias                     = v_nrdias

            i_moeda                      = p_moeda

            i_ctmoeda                    = itab_zycbt009-kurst

            i_dtbase                     = sy-datum

       importing

            e_vlme                       = v_vljur

       TABLES

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

            /pws/zycbt007                = itab_zycbt007

* << Fim da inclusão

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

           /PWS/ZYCBT007                   = itab_zycbt007

* << Fim da exclusão

       exceptions

            taxa_nao_encontrada          = 1

            overflow_campo_local_amount  = 2

            fator_nao_encontrado         = 3

            margem_cambio_nao_encontrada = 4

            derived_2_times              = 5

            montante_nao_encontrado      = 6

            tx_juros_nao_encontrada      = 7

            dias_base_nao_encontrado     = 8

            dias_periodo_nao_encontrado  = 9

...

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

Modificações efetuadas em REPS /PWS/MZYCB004F02

...

                INTO v_codaux1 SEPARATED BY space.

  ELSE.

    CONCATENATE 'JUROS' v_prazo INTO v_codaux1 SEPARATED BY space.

  ENDIF.

  v_codaux2 = /pws/zycbt001-tpcontr.

  IF /pws/zyglt009-cont_rot_sep = 'S'.

    IF itab_periodos_j-tpper = 'A'.

      v_codaux3 = 'ACC'.

    ELSEIF itab_periodos_j-tpper = 'E'.

      v_codaux3 = 'ACE'.

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

    ENDIF.

* << Fim da exclusão

    ELSE.

    v_codaux3 = 'ACE'.

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

    ENDIF.

* << Fim da inclusão

  ENDIF.

  REFRESH itab_contas.

  CALL FUNCTION '/PWS/ZYGL_READ_ACCOUNT_NUMBER'

       EXPORTING

            bukrs           = /pws/zycbt001-bukrs

...