Sintoma

Erro ao determinar o exercício contábil da comissão de agente provisionada.

Solução

Ajustes para determinação correta do exercício, a partir do campo /pws/zycet013-dtlanc.

Informações Complementares

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

Nota Número 03307 Data: 23/03/2007 Hora: 11:52:55

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

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

Nota Número              : 03307

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00026

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

Texto Rápido:

DATA INCORRETA UTILIZADA PARA IDENTIFICAR O EXERCICIO DA COMISSAO AGENTE

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

Palavras Chave:

COMISSÃO, AGENTE, DATA, EXERCÍCIO, CONTÁBIL, PROVISIONADA

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

Objetos da nota:

REPS /PWS/MZYCE017I01

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

Modificações efetuadas em REPS /PWS/MZYCE017I01

...

        ENDLOOP.

      ENDIF.

  ENDCASE.

ENDMODULE.

MODULE user_command_0202 INPUT.

  CASE okcode.

    WHEN 'CLI'.

      GET CURSOR FIELD v_campo VALUE v_valor.

      IF v_campo EQ '/PWS/ZYCEE013-BELNR' OR

         v_campo EQ '/PWS/ZYCEE013-BELNR_IR'.

* >> Início da inclusão: MODULE USER_COMMAND_0202

        v_data = /pws/zycee013-dtlanc.

        CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'

             EXPORTING

                  v_bukrs                = /pws/zycee001-bukrs

                  v_date                 = v_data

             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.

* << Fim da inclusão

        SET PARAMETER ID 'BUK' FIELD /pws/zycee001-bukrs.

        SET PARAMETER ID 'BLN' FIELD v_valor.

* >> Início da exclusão: MODULE USER_COMMAND_0202

        SET PARAMETER ID 'GJR' FIELD /pws/zycee001-dtemb+0(4).

* << Fim da exclusão

* >> Início da inclusão: MODULE USER_COMMAND_0202

        SET PARAMETER ID 'GJR' FIELD v_date.

* << Fim da inclusão

        CALL TRANSACTION 'FB03' AND SKIP FIRST SCREEN.

      ENDIF.

...