Sintoma

Na captação de Pré-Pagamento, na aba prorrogação está sendo possível criar uma porrogação de

liquidação e não deveria.

Solução

Alteração na include /PWS/MZYCB001F01, FORM update_itab_zycbt003. Verificando se o Tipo do Contrato

começa com 'P' e a prorrogação é igual a 'L'.

Informações Complementares

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

Nota Número 04833 Data: 26/09/2007 Hora: 14:49:06

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

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

Nota Número              : 04833

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 7.0

Pacote                   : 00003

Agrupamento              : 00014

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

CAPTAÇÕES DE CONTRATOS DE EXPORTAÇÃO

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

Palavras Chave:

CAPTAÇÕES DE CONTRATOS DE EXPORTAÇÃO

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

Objetos da nota:

REPS /PWS/MZYCB001F01

REPT /PWS/SAPMZYCB001

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

Modificações efetuadas em REPS /PWS/MZYCB001F01

...

  itab_zycbt002-dtfinal  = /pws/zycbe002-dtfinal.

  itab_zycbt002-nrdias   = /pws/zycbe002-nrdias.

  itab_zycbt002-nrdiasj   = /pws/zycbe002-nrdiasj.

  IF itab_zycbt002-dtfinal GT v_dtliquid.

    itab_zycbt002-dtfinal  = v_dtliquid.

  ENDIF.

  MODIFY itab_zycbt002 INDEX /pws/zycbe002-nrparc.

ENDFORM.

FORM update_itab_zycbt003.

  DATA: v_mark(1) TYPE c.

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

  IF /pws/zycbe001-tpcontr(1) = 'P' AND /pws/zycbe003-tppror = 'L'.

    CLEAR /pws/zycbe003.

    MESSAGE i015 WITH text-460 text-461.

  ENDIF.

* << Fim da inclusão

  IF NOT /pws/zycbe003 IS INITIAL.

    IF /pws/zycbe003-tppror IS INITIAL.

      MESSAGE i073.

    ELSEIF /pws/zycbe003-tppror EQ 'P'.

      IF /pws/zycbe003-dtpror IS INITIAL AND

         NOT /pws/zycbe003-nrparc IS INITIAL.

        MESSAGE i074.

      ENDIF.

    ELSEIF /pws/zycbe003-dtpror IS INITIAL.

      MESSAGE i074.

...

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

Modificações efetuadas em REPT /PWS/SAPMZYCB001

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 460

Texto: (37 caracteres)

"Tipo Prorrogação L não permitida para"

Comprimento máximo: 37

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 461

Texto: (27 caracteres)

"captações de Pré-Pagamento."

Comprimento máximo: 27