Sintoma

Ocorre Dump ao alterar condição de pagamento de Faturas de Mercadoria com pagamento parcelado e

tentar gravar novamente. Cenário só ocorre quando a Fatura tem pagamento parcelado. Pw.CE não esta

estornando e gerando novos documentos.

Solução

Inserido tratamento para quando for em branco levar a data do dia.

Informações Complementares

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

Nota Número 01142 Data: 04/04/2006 Hora: 08:56:50

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

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

Nota Número              : 01142

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00023

Agrupamento              : 00108

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

OCORRE DUMP AO ALTERAR CONDIÇÃO DE PAGAMENTO DE FATURAS DE MERCADORIA

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

Palavras Chave:

DUMP - CONDIÇÃO DE PAGAMENTO - FATURAS DE MERCADORIA

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

Objetos da nota:

REPS /PWS/MZYCI003F01

REPS /PWS/MZYCI003O01

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

Modificações efetuadas em REPS /PWS/MZYCI003F01

...

  CLEAR v_erro.

  IF v_parcela = 'X'.

    itab_zycbe033-tabela = '/PWS/ZYCIT132'.

    itab_zycbe033-cpochv = itab_zycit132-nrseq.

    itab_zycbe033-belnr  = itab_zycit132-belnr_p.

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

      if not itab_zycit132-dt_belnrp is initial.

* << Fim da inclusão

    itab_zycbe033-budat  = itab_zycit132-dt_belnrp.

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

      else.

        itab_zycbe033-budat  = sy-datum.

      endif.

* << Fim da inclusão

    v_belnr_ant = itab_zycit132-belnr_p.

  ELSE.

    itab_zycbe033-tabela = '/PWS/ZYCIT006'.

    itab_zycbe033-cpochv = /pws/zycie006-nrseq.

    itab_zycbe033-belnr  = /pws/zycie006-belnr_p.

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

    itab_zycbe033-budat  = /pws/zycie006-dt_belnrp.

* << Fim da exclusão

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

      if not itab_zycit132-dt_belnrp is initial.

        itab_zycbe033-budat  = itab_zycit132-dt_belnrp.

      else.

        itab_zycbe033-budat  = sy-datum.

      endif.

* << Fim da inclusão

    v_belnr_ant = /pws/zycie006-belnr_p.

  ENDIF.

  itab_zycbe033-tcode  = 'FB08'.

  itab_zycbe033-bukrs  = /pws/zycie006-bukrs.

  itab_zycbe033-gjahs  = itab_zycbe033-budat+0(4).

...

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

Modificações efetuadas em REPS /PWS/MZYCI003O01

...

                screen-name EQ '/PWS/ZYCIE006-BELNR_P' OR

                screen-name EQ '/PWS/ZYCIE006-NRSEQ_PGFATX' OR

                screen-name EQ 'V_TEXTO' ).

          screen-invisible = 0.

        ENDIF.

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

        IF NOT /pws/zycie006-belnr_p IS INITIAL.

          IF screen-name = '/PWS/ZYCIE006-ZTERM'.

            screen-input = 0.

            MODIFY SCREEN.

          ENDIF.

        ENDIF.

* << Fim da inclusão

        IF screen-name = '/PWS/ZYCIE006-LOCAL'.

          IF ( /pws/zycie006-tpfatura = '01'

            OR /pws/zycie006-tpfatura = '11' ).

            screen-invisible = 0.

          ELSE.

...