CE PLUS - Nota 006689

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: DI

Data/Hora da Publicação: 04/06/2008 00:00:00

Data/Hora Última Alteração: 09/03/2010 13:28:27

Descrição da Nota: AO DAR REFRESH NA DI ALTERA OS DADOS DA ABA PAGAMENTOS RELATIVO AO BANCO

Sintoma

 

No momento de modificar a DI, na pasta Pagamento no campo onde informamos o BANCO X FORNECEDOR toda

momento que clicamos na tecla atualizar o número é alterado para outro número

Isso ocorre pelo simples fato de clicar no atualizar.

 

Solução

 

Não sugerir as informações do Banco na alteração da DI quando estas informações já foram gravadas

Versões Tratadas

7.0

Informações Complementares

 

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

Nota Número 06689 Data: 04/06/2008 Hora: 15:44:18

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

 

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

Nota Número              : 06689

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

 

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

AO DAR REFRESH NA DI ALTERA OS DADOS DA ABA PAGAMENTOS RELATIVO AO BANCO

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

Palavras Chave:

 

 

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

Objetos da nota:

REPS /PWS/MZYCI023F03

 

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

Modificações efetuadas em REPS /PWS/MZYCI023F03

 

...

              CONCATENATE /pws/zycit256-bankn+0(s_pgag2)

                    /pws/zycit256-bankn+s_pgag2(1)

                    '-'  INTO s_pgcc.

            ENDIF.

            s_pgban = /pws/zycit256-bankl+0(3).

            s_pgage = /pws/zycit256-bankl+4(11).

          ENDIF.

          s_pgnom         = /pws/zycit256-descdesp.

        ENDIF.

      ENDIF.

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

    ELSEIF sy-tcode = '/PWS/ZYCI023_A' AND sy-ucomm = 'REFR'.

* << Fim da exclusão

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

    ELSEIF sy-tcode = '/PWS/ZYCI023_A' AND sy-ucomm = 'REFR'

           AND /pws/zycie095a-lifnr IS INITIAL.

* << Fim da inclusão

      READ TABLE itab_zycit001 INDEX 1.

      IF sy-subrc = 0.

        SELECT SINGLE * FROM /pws/zycit256 INTO /pws/zycit256

           WHERE nrdespadu EQ itab_zycit001-nrdespadu.

        IF sy-subrc = 0.

          LOOP AT itab_zycit095.

            itab_zycit095-lifnr    = /pws/zycit256-lifnr.

            itab_zycit095-bankl    = /pws/zycit256-bankl.

            itab_zycit095-bankn    = /pws/zycit256-bankn.

            MODIFY itab_zycit095 INDEX sy-tabix.

...