Sintoma

Criado contrato e preenchido campo "Texto Informativo",mas no campo "Texto para lançamento", foi

colocado para não transferir o texto informativo e assim foi gravado.

O campo texto não foi preenchido com a informação do campo "Texto Informativo" e está correto, porém

se entrar em captação - modificar e modificar o Texto informativo, ao gravar,o programa tem

estornado o documento anterior e gerando outro documento,sendo que não deveria, pois o texto

informativo não foi preenchido no documento.

O documento só deveria ser estornado, caso no campo "Texto p/ Lançamento" estivesse com a opção

"Transfere texto informativo", quando a opção estiver como "Não transfere texto informativo", o

programa deveria somente gravar a modificação e não estornar o documento.

Solução

Ajuste efetuado para que na transação de Modificar Captação, quando campo "Texto p/ Lançamento"

estiver como "Não transfere texto informativo", e o texto for modificado, apenas gravar alterações

sem realizar nenhuma contabilização.

Informações Complementares

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

Nota Número 03000 Data: 31/01/2007 Hora: 10:56:01

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

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

Nota Número              : 03000

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00026

Agrupamento              : 00151

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

CAPTAÇÃO - TEXTO INFORMATIVO TEXTO PARA LANÇAMENTO - CONTABILIZAÇÃO

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

Palavras Chave:

CAPTAÇÃO - TEXTO INFORMATIVO TEXTO PARA LANÇAMENTO - CONTABILIZAÇÃO

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

Objetos da nota:

REPS /PWS/MZYCB001F01

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

Modificações efetuadas em REPS /PWS/MZYCB001F01

...

  ELSEIF /pws/zycbe001-fdtlanc = 'C'.

    MOVE /pws/zycbe001-dtcred TO v_data2.

    MOVE wa_zycbt001-dtcred TO v_data3.

  ENDIF.

  IF /pws/zycbe001-tpcontr    EQ wa_zycbt001-tpcontr  AND

     /pws/zycbe001-bukrs      EQ wa_zycbt001-bukrs    AND

     /pws/zycbe001-werks      EQ wa_zycbt001-werks    AND

     /pws/zycbe001-j_1bbranch EQ wa_zycbt001-j_1bbranch AND

     /pws/zycbe001-gsber      EQ wa_zycbt001-gsber    AND

     /pws/zycbe001-bcocred    EQ wa_zycbt001-bcocred  AND

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

     /pws/zycbe001-ftxt       EQ wa_zycbt001-ftxt     AND

     /pws/zycbe001-txtinf     EQ wa_zycbt001-txtinf   AND

* << Fim da exclusão

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

      ( /pws/zycbe001-ftxt IS INITIAL OR

        NOT /pws/zycbe001-ftxt IS INITIAL AND

        /pws/zycbe001-txtinf = wa_zycbt001-txtinf ) AND

* << Fim da inclusão

     v_data2                  EQ v_data3              AND

     /pws/zycbe001-dtliquid   EQ wa_zycbt001-dtliquid AND

     /pws/zycbe001-waers      EQ wa_zycbt001-waers    AND

     /pws/zycbe001-vlme       EQ wa_zycbt001-vlme     AND

     /pws/zycbe001-vlmi       EQ wa_zycbt001-vlmi     AND

     /pws/zycbe001-txcneg     EQ wa_zycbt001-txcneg   AND

     /pws/zycbe001-fdtlanc    EQ wa_zycbt001-fdtlanc  AND

     /pws/zycbe001-fdtjuros   EQ wa_zycbt001-fdtjuros AND

     /pws/zycbe001-kostl      EQ wa_zycbt001-kostl    AND

     /pws/zycbe074-aufnr      EQ wa_zycbt074-aufnr    AND

...

...

     /pws/zycbe001-gsber      EQ wa_zycbt001-gsber    AND

     /pws/zycbe001-bcocred    EQ wa_zycbt001-bcocred  AND

     v_data2                  EQ v_data3              AND

     /pws/zycbe001-dtliquid   EQ wa_zycbt001-dtliquid AND

     /pws/zycbe001-waers      EQ wa_zycbt001-waers    AND

     /pws/zycbe001-vlme       EQ wa_zycbt001-vlme     AND

     /pws/zycbe001-vlmi       EQ wa_zycbt001-vlmi     AND

     /pws/zycbe001-txcneg     EQ wa_zycbt001-txcneg   AND

     /pws/zycbe001-fdtlanc    EQ wa_zycbt001-fdtlanc  AND

     /pws/zycbe001-fdtjuros   EQ wa_zycbt001-fdtjuros AND

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

     ( /pws/zycbe001-ftxt IS INITIAL     OR

       NOT /pws/zycbe001-ftxt IS INITIAL AND

       /pws/zycbe001-txtinf = wa_zycbt001-txtinf ) AND

* << Fim da inclusão

     /pws/zycbe001-kostl      EQ wa_zycbt001-kostl    AND

     /pws/zycbe074-aufnr      EQ wa_zycbt074-aufnr    AND

     /pws/zycbe074-kdauf      EQ wa_zycbt074-kdauf    AND

     /pws/zycbe001-fictr      EQ wa_zycbt001-fictr    AND

     /pws/zycbe001-fipos      EQ wa_zycbt001-fipos    AND

     /pws/zycbe001-prctr      EQ wa_zycbt001-prctr    AND

     /pws/zycbe001-ps_posid   EQ wa_zycbt001-ps_posid AND

     /pws/zycbe074-nplnr      EQ wa_zycbt074-nplnr    AND

     /pws/zycbe074-matnr      EQ wa_zycbt074-matnr    AND

     /pws/zycbe074-geber      EQ wa_zycbt074-geber    AND

...