CE PLUS - Nota 000610

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Recebimento

Data/Hora da Publicação: 05/01/2006 00:00:00

Data/Hora Última Alteração: 20/06/2011 11:55:13

Descrição da Nota: AO ESTORNAR RECEBIMENTO ACUSA PERÍODO CONTÁBIL FECHADO.

Sintoma

Ao tentar efetuar um estorno do recebimento, aparece mensagem referente ao período contábil fechado

e não deixa estornar.

 

 

Solução

Fazer verificação de ano contábil.

 

Versões Tratadas

6.0

Informações Complementares

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

Nota Número 00610 Data: 05/01/2006 Hora: 16:55:03

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

 

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

Nota Número              : 00610

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00022

Agrupamento              : 00094

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

AO ESTORNAR RECEBIMENTO ACUSA PERÍODO CONTÁBIL FECHADO.

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

Palavras Chave:

ESTORNO DO RECEBIMENTO - PERÍODO CONTÁBIL FECHADO

 

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

Objetos da nota:

REPS /PWS/MZYCI017F02

 

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

Modificações efetuadas em REPS /PWS/MZYCI017F02

 

...

         WHERE   codeven = '006IP' AND

                 codmod  = 'D' AND

                 chlanc  = 'D' AND

                tpcodaux = 'G'.

  i_monat  = wa_nf-dt_mr1m+4(2).

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

  i_gjahr  = wa_nf-dt_mr1m+0(4).

* << Fim da exclusão

  i_bukrs  = wa_nf-bukrs.

  v_contad = /pws/zycbt012-saknr1.

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

  CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'

       EXPORTING

            v_bukrs = i_bukrs

            v_date  = wa_nf-DTINCL

       IMPORTING

            v_year  = v_ano.

  IF sy-subrc  EQ  0.

    i_gjahr  = v_ano.

  ELSE.

    i_gjahr  = wa_nf-dt_mr1m+0(4).

  ENDIF.

* << Fim da inclusão

  CALL FUNCTION 'FI_PERIOD_CHECK'

       EXPORTING

            i_bukrs          = i_bukrs

            i_gjahr          = i_gjahr

            i_koart          = 'S'

...