Sintoma

No estorno da fatura com pagamento antecipado não está sendo preenchido o campo divisão no

lançamento da F-43.

Solução

Preencher a divisão na tabela do batch-input.

Informações Complementares

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

Nota Número 06709 Data: 06/06/2008 Hora: 14:53:20

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

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

Nota Número              : 06709

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 7.0

Pacote                   : 00006

Agrupamento              : 00053

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

PREENCHE DIVISÃO NO ESTORNO DA FATURA COM PAGAMENTO ANTECIPADO

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

Palavras Chave:

ESTORNO - FATURA - PAGAMENTO - ANTECIPADO - DIVISÃO

/PWS/SAPMZYCI003

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

Objetos da nota:

REPS /PWS/MZYCI003F02

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

Modificações efetuadas em REPS /PWS/MZYCI003F02

...

  ELSE.

    LOOP AT itab_zycbt032.

      MESSAGE i015 WITH itab_zycbt032-msg+0(50)

                        itab_zycbt032-msg+50(50).

    ENDLOOP.

  ENDIF.

ENDFORM.

FORM fill_date_f-43_pag_antecipado TABLES p_itab_bseg STRUCTURE bseg.

  LOOP AT p_itab_bseg.

    MOVE-CORRESPONDING p_itab_bseg TO itab_contas.

* >> Início da inclusão: FORM FILL_DATE_F-43_PAG_ANTECIPADO

    itab_contas-c_gsber =

    itab_contas-d_gsber = p_itab_bseg-gsber.

* << Fim da inclusão

    IF p_itab_bseg-koart EQ 'K'.

      MOVE: '21' TO itab_contas-bschl,

      p_itab_bseg-lifnr  TO itab_contas-d_newko.

    ELSE.

      MOVE: '50' TO itab_contas-bschl,

            p_itab_bseg-hkont  TO itab_contas-d_newko.

    ENDIF.

    APPEND itab_contas.

  ENDLOOP.

  SELECT SINGLE * FROM bkpf

...