CE PLUS - Nota 000569
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Captação
Data/Hora da Publicação: 02/01/2006 00:00:00
Data/Hora Última Alteração: 18/02/2011 14:53:05
Descrição da Nota: CAPTAÇÃO - BUSCA DO CAMPO /PWS/ZYCBT002-BELNR2 NA VINCULAÇÃO
Sintoma
Captação - Foi constatado que ao entrar em captação modificar, ao salvar, o campo /PWS/ZYCBT002-
BELNR2 estava sendo apagado.
Solução
O programa de captação foi ajustado para não limpar o campo /PWS/ZYCBT002-BELNR ao entrar em
captação modificar.
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 00569 Data: 02/01/2006 Hora: 13:40:15
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 00569
Categoria : Erro de Programa
Prioridade : Baixa
Versão PW.CE : 6.0
Pacote : 00022
Agrupamento : 00095
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
CAPTAÇÃO - BUSCA DO CAMPO /PWS/ZYCBT002-BELNR2 NA VINCULAÇÃO
----------------------------------------------------------------------------------------------------
Palavras Chave:
CAPTAÇÃO BELNR2 VINCULAÇÃO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB001O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB001O01
...
ENDIF.
v_countlinej = '00001'.
CLEAR v_dtfinal.
WHEN '0104'.
IF NOT v_nrseqc IS INITIAL.
* >> Início da exclusão: MODULE LOAD_ITAB_ZYCBT002
IF itab_zycbt002p[] IS INITIAL.
* << Fim da exclusão
* >> Início da inclusão: MODULE LOAD_ITAB_ZYCBT002
IF itab_zycbt002p[] IS INITIAL
OR okcode EQ 'VINC'.
SELECT SINGLE * FROM /pws/zycbt001 INTO /pws/zycbe001
WHERE nrseqc = v_nrseqc.
* << Fim da inclusão
SELECT * FROM /pws/zycbt002 INTO TABLE itab_zycbt002p
WHERE nrseqc = v_nrseqc
AND tpparc = 'P'
AND tpcontr EQ /pws/zycbe001-tpcontr.
ENDIF.
...