Sintoma

Mesmo sem ter recontabilizado estava atualizando a Data de Vencimento da fatura de mercadoria.

Solução

Ajuste: só atualiza esta data quando foi recontabilizado.

Informações Complementares

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

Nota Número 03027 Data: 05/02/2007 Hora: 14:08:11

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

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

Nota Número              : 03027

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 6.0

Pacote                   : 00026

Agrupamento              : 00151

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

MESMO SEM TER RECONTABILIZADO ATUALIZANDO A DATA DE VENCIMENTO.

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

Palavras Chave:

DATA DE VENCIMENTO - FATURAS DE IMPORTAÇÃO - ATUALIZAÇÃO DE DATA

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

Objetos da nota:

REPS /PWS/MZYCI003F01

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

Modificações efetuadas em REPS /PWS/MZYCI003F01

...

      ENDIF.

      IF ( /pws/zycie006-frpagto EQ 'P' AND NOT v_di IS INITIAL )

          AND NOT /pws/zycie006-belnr_p IS INITIAL AND

          /pws/zycie006-eliminado NE 'X'.

        CLEAR /pws/zycbt119-status.

      ENDIF.

      MOVE /pws/zycie006-nrseq_pgfat TO /pws/zycbt119-nrseq.

      MODIFY /pws/zycbt119.

    ENDIF.

  ENDIF.

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

  DATA v_data_lanc.

  CLEAR v_data_lanc.

  IF /pws/zycie006-belnr_p NE /pws/zycbt108-belnr_co.

    v_data_lanc = 'X'.

  ENDIF.

* << Fim da inclusão

  MOVE-CORRESPONDING /pws/zycie006 TO /pws/zycbt108.

  MOVE: /pws/zycie006-nrseq       TO /pws/zycbt108-belnr,

        /pws/zycie006-nrfat       TO /pws/zycbt108-nrfat,

        /pws/zycie006-dtincl+0(4) TO /pws/zycbt108-gjahr,

        /pws/zycie006-lifnr       TO /pws/zycbt108-lifnr.

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

  IF v_data_lanc = 'X' OR /pws/zycbt108-bldat IS INITIAL.

* << Fim da inclusão

  /pws/zycbt108-bldat   = sy-datum .

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

  ENDIF.

* << Fim da inclusão

  IF v_parcela = 'X'.

    MOVE: itab_zycit132-belnr_p     TO /pws/zycbt108-belnr_co,

          itab_zycit132-dtvencto    TO /pws/zycbt108-dtvencto,

          itab_zycit132-nrseq_pgfat TO /pws/zycbt108-nrseq_pgfat,

          itab_zycit132-vlparc      TO /pws/zycbt108-rmwwr,

          itab_zycit132-vlparc      TO /pws/zycbt108-slfatcc,

          itab_zycit132-status      TO /pws/zycbt108-fcont.

    IF /pws/zycbt131 IS INITIAL.

      MOVE itab_zycit132-vlparc TO /pws/zycbt108-slfat.

    ENDIF.

...