CE PLUS - Nota 001263

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Relatórios

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

Data/Hora Última Alteração: 20/06/2011 12:18:48

Descrição da Nota: LIBERAÇÃO DE PRESTAÇÃO DE CONTA VIA ESTRATÉGIA

Sintoma

Ao liberar a Prestação de Contas via estratégia de liberação, se por acaso ocorrer algum erro na

contabilização, o sistema muda o número do documento de status (de Bloqueados -"1" pra Liberados -

"2").

 

 

Solução

Atualizado a Prestação de Contas para verificação de Estratégia de Liberação com relação ao status

de Bloqueados -"1" pra Liberados - "2".

 

Versões Tratadas

6.0


Pré-Requisitos

Produto:

Nota

Descrição

NO MOMENTO DE EFETUAR A ÚLTIMA LIBERAÇÃO DE UMA ESTRATÉGIA DE PRESTAÇÃO

Informações Complementares

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

Nota Número 01263 Data: 28/04/2006 Hora: 15:46:46

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

 

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

Nota Número              : 01263

Categoria                : Melhoria

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00023

Agrupamento              : 00111

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

Referência às notas relacionadas:

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

 

01123  - 00001 - 6.0    - 00023  - NO MOMENTO DE EFETUAR A ÚLTIMA LIBERAÇÃO DE UMA ESTRATÉGIA DE PRE

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

LIBERAÇÃO DE PRESTAÇÃO DE CONTA VIA ESTRATÉGIA

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

Palavras Chave:

ESTRATÉGIA, STATUS, LIBERA, PRESTAÇÃO, CONTABILIZAÇÃO, BLOQUEADOS,

LIBERADOS

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

Objetos da nota:

REPS /PWS/ZYCIR103

 

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

Modificações efetuadas em REPS /PWS/ZYCIR103

 

...

    MODIFY /PWS/ZYCIT337 FROM TABLE IT_ZYCIT337[].

  ENDIF.

  V_APROVA = 'X'.

  REFRESH ITAB_MESSAGE.

  CLEAR ITAB_MESSAGE.

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

  DATA: BEGIN OF itab_zycit026_erro OCCURS 0.

          INCLUDE STRUCTURE /pws/zycit026.

  DATA: END OF itab_zycit026_erro.

* << Fim da inclusão

  perform chama_tela.

  if not itab_message[] is initial.

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

    SELECT * FROM /pws/zycit026

     INTO TABLE itab_zycit026_erro

      FOR ALL ENTRIES IN itab_message

       WHERE nrpres EQ itab_message-nrdoc.

    LOOP AT itab_message.

     READ TABLE itab_zycit026_erro WITH KEY nrpres = itab_message-nrdoc.

      IF sy-subrc = 0.

        IF     itab_zycit026_erro-frgsx1 EQ v_frggr.

          CLEAR itab_zycit026_erro-frgsx1.

          itab_zycit026_erro-frgzu = '1'.

        ELSEIF itab_zycit026_erro-frgsx2 EQ v_frggr.

          CLEAR itab_zycit026_erro-frgsx2.

          itab_zycit026_erro-frgzu = '1'.

        ELSEIF itab_zycit026_erro-frgsx3 EQ v_frggr.

          CLEAR itab_zycit026_erro-frgsx3.

          itab_zycit026_erro-frgzu = '1'.

        ELSEIF itab_zycit026_erro-frgsx4 EQ v_frggr.

          CLEAR itab_zycit026_erro-frgsx4.

          itab_zycit026_erro-frgzu = '1'.

        ELSEIF itab_zycit026_erro-frgsx5 EQ v_frggr.

          CLEAR itab_zycit026_erro-frgsx5.

          itab_zycit026_erro-frgzu = '1'.

        ENDIF.

        MODIFY itab_zycit026_erro INDEX sy-tabix.

      ENDIF.

    ENDLOOP.

    MODIFY /pws/zycit026 FROM TABLE itab_zycit026_erro.

* << Fim da inclusão

    call screen 0102 starting at 5 5  ending at 122 30.

  endif.

  DELETE ITAB_DADOS WHERE GRAVADO = 'X'.

  CALL FUNCTION 'SAPGUI_SET_FUNCTIONCODE'

       EXPORTING

...