Sintoma

Quando a tabela t_dados era passada para a função de batch-input da F-30 sem a work area preenchida,

ou mesmo sem work area, o batch input pára no filtro de partidas.

Solução

A t_dados passa a ser inicializada com a primeira linha da tabela t_dados.

Informações Complementares

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

Nota Número 05207 Data: 13/11/2007 Hora: 10:26:28

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

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

Nota Número              : 05207

Categoria                : Erro de Programa

Prioridade               : Baixa

Versão PW.CE             : 7.0

Pacote                   : 00003

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

Texto Rápido:

INICIALIZAR OS DADOS CORRETAMENTE NA TRANSAÇÃO F-30

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

Palavras Chave:

F-30 T_DADOS

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

Objetos da nota:

FUNC /PWS/ZYCE_TRANSACAO_F_30C

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

Modificações efetuadas em FUNC /PWS/ZYCE_TRANSACAO_F_30C

...

    v_dmbtr(16)          TYPE c,

    v_num1(5)            TYPE n,

    v_ver_agrup(1),

    v_date2              LIKE t009b-bdatj,

    v_page               TYPE n.

  MOVE t_zycbt036[] TO itab_zycbt036[].

  SELECT SINGLE posicao FROM /pws/zycbt033

                        INTO (/pws/zycbt033-posicao)

                        WHERE tcode = 'F-30'.

  CONCATENATE 'RF05A-XPOS1(' /pws/zycbt033-posicao ')' INTO v_xpos.

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

  READ TABLE t_dados INDEX 1.

* << Fim da inclusão

  CLEAR v_xpos1.

  IF t_dados-mwskz IS INITIAL.

    SELECT SINGLE selps FROM t021r

      INTO  v_xpos1

      WHERE event = 'SU-AG'

        AND feldn = 'BUDAT'.

  ELSE.

    SELECT SINGLE selps FROM t021r

      INTO  v_xpos1

      WHERE event = 'SU-AG'

...