CE PLUS - Nota 014228
Módulo: CÂMBIO FINANCEIRO
Funcionalidade: SISCOSERV
Data/Hora da Publicação: 26/09/2014 10:14:55
Data/Hora Última Alteração: 26/09/2014 10:14:55
Descrição da Nota: SISCOSERV - ASSOCIAÇÃO
Sintoma
No momenta da Associação de RAS/RVS sem origem com Remessa, o programa está carregando indevidamente
o VME
Solução
O programa foi ajustado para carregar o VME no momento da Associação somente quando a Saída for
efetuado com C/C no Exterior
Versões Tratadas
9.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 14228 Data: 26/09/2014 Hora: 10:07:57
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 14228
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 9.0
Pacote : 00008
Agrupamento : 00175
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote Descrição Breve
13583 - 00001 - 9.0 - 00007 - NOTA BLOQUEADA
13735 - 00002 - 9.0 - 00007 - SISCOSERV, AUTOMATIZAR ASSOCIAÇÃO DE RAS/RVS COM ORIGEM
----------------------------------------------------------------------------------------------------
Texto Rápido:
SISCOSERV - ASSOCIAÇÃO
----------------------------------------------------------------------------------------------------
Palavras Chave:
SISCOSERV - ASSOCIAÇÃO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCA012F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCA012F01
...
and nrseq = v_nrboleto.
v_bcoccme = wa_zycbt134_aux-bco_ccme.
if sy-subrc ne 0.
if v_dom_tporigem ne 'B'.
message i061 with text-i13 p_wa_zycat039-fat_comis
text-i09.
endif.
clear p_pago.
else.
p_bukext = wa_zycbt031-lifnr.
* >> Início da exclusão: FORM VALIDA_COMISSAO_2
if sy-subrc eq 0.
* << Fim da exclusão
* >> Início da inclusão: FORM VALIDA_COMISSAO_2
if not v_bcoccme is initial.
* << Fim da inclusão
p_wa_zycat039-vme = p_wa_zycat039-valor.
endif.
perform busca_parametros_campos using 'CA'
changing p_wa_zycat039-dt_pg_rec.
endif.
endform.
form valida_remessa_2 changing p_wa_zycat039 structure /pws/zycat039
p_pago
p_bukext
p_bukrs.
...
...
v_vlme = wa_zycbt134_aux-vlme.
else.
v_vlme = wa_zycbt031_aux-vlme.
endif.
if v_vlme > /pws/zycat031-saldo.
v_vlme = /pws/zycat031-saldo.
endif.
endif.
if sy-subrc eq 0.
if /pws/zycat030-tp_origem is initial.
* >> Início da exclusão: FORM VALIDA_REMESSA_2
p_wa_zycat039-vme = v_vlme.
* << Fim da exclusão
p_wa_zycat039-valor = v_vlme.
* >> Início da exclusão: FORM VALIDA_REMESSA_2
else.
p_wa_zycat039-vme = p_wa_zycat039-valor.
* << Fim da exclusão
endif.
if v_tpoper = 'P'.
perform busca_parametros_campos using 'RP'
changing p_wa_zycat039-dt_pg_rec.
elseif v_tpoper = 'R'.
perform busca_parametros_campos using 'RR'
changing p_wa_zycat039-dt_pg_rec.
* >> Início da inclusão: FORM VALIDA_REMESSA_2
endif.
if not v_bcoccme is initial.
p_wa_zycat039-vme = p_wa_zycat039-valor.
* << Fim da inclusão
endif.
else.
if v_dom_tporigem ne 'B'.
message i061 with text-i12 text-i11.
endif.
clear p_pago.
endif.
endform.
form busca_parametros_campos
using p_process type /pws/zycat048-processo
...