CE PLUS - Nota 001084
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Vinculação
Data/Hora da Publicação: 24/03/2006 00:00:00
Data/Hora Última Alteração: 18/02/2011 15:06:04
Descrição da Nota: BOTÃO VOLTAR DO RELATORIO DA VINCULAÇÃO
Sintoma
1) Criei uma captação (pode ser para qualquer tipo de contrato, pois o problema ocorre para todos os
contratos) e salvei.
2) Depois pelo botão de atalho na tela da captação, entrei para criar uma vinculação.
3) Ao invés de selecionar as faturas pelo matchcode, cliquei no botão "Selecionar faturas para
vinculação" e na tela de seleção de campos fleguei o critério "Nº Fatura". Na tela de critérios de
seleção informei as faturas e cliquei em executar e as faturas foram levadas corretamente para a
table control.
4) Preenchi o valor a ser vinculado de cada uma das faturas, mas ao invés de clicar no botão
"Salvar" eu cliquei no botão "Sair" e foi exibida a mensagem "Deseja salvar antes de sair" e cliquei
em SIM e foi efetuada a contabilização corretamente. Porém se eu clicar nos botões (Voltar ou Sair),
o programa volta para a tela de seleção de campos de faturas para vincular. E se eu clicar no botão
"Voltar", o programa volta para a tela da vinculação, mas com todas as informações em branco. OBS:
Mas as faturas foram vinculadas e gravadas corretamente na tabela. Se sair da tela e entrar
novamente em vinculação "Exibir/Modificar", as faturas são exibidas corretamente.
Solução
Ajuste efetuado para quando a fatura for selecionada pelo botão do menu e salvar voltar para a tela
da vinculação. Também foi efetuado ajuste para aparecer a msg se deseja salvar quando o botão voltar
for selecionado, se a fatura for selecionada pela TC.
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01084 Data: 24/03/2006 Hora: 15:52:00
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01084
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00023
Agrupamento : 00106
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
BOTÃO VOLTAR DO RELATORIO DA VINCULAÇÃO
----------------------------------------------------------------------------------------------------
Palavras Chave:
BOTÃO VOLTAR DO RELATORIO DA VINCULAÇÃO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB009F04
REPS /PWS/MZYCB009F05
REPS /PWS/MZYCB009F10
REPS /PWS/MZYCB009I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB009F04
...
itab_zycbt005-vlslf = /pws/zycbe005-vlslf.
MODIFY itab_zycbt005 INDEX tc_faturas-current_line
TRANSPORTING vlslf.
ENDIF.
ELSE.
* >> Início da inclusão: FORM CALCULA_SALDOS
v_ind_mudanca = 'X'.
* << Fim da inclusão
v_vldif = itab_zycbt005-vlvinc.
v_vldif_fat = itab_zycbt005-vlme_p.
v_slvinc = /pws/zycbe001-slvinc - v_vldif.
IF v_slvinc LT 0.
MESSAGE i011(pc) WITH text-020.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB009F05
...
ELSE.
MODIFY itab_zycbt005 INDEX v_index
TRANSPORTING vlslf.
ENDIF.
ELSE.
* >> Início da inclusão: FORM CALCULA_SALDOS_2
v_ind_mudanca = 'X'.
* << Fim da inclusão
v_vldif = itab_zycbt005-vlvinc.
v_vldif_fat = itab_zycbt005-vlme_p.
v_slvinc = /pws/zycbe001-slvinc - v_vldif.
IF v_slvinc LT 0.
MESSAGE i011(pc) WITH text-020.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB009F10
...
ELSE.
MODIFY itab_zycbt005 INDEX v_index_6
TRANSPORTING vlslf.
ENDIF.
ELSE.
* >> Início da inclusão: FORM CALCULA_SALDOS_3
v_ind_mudanca = 'X'.
* << Fim da inclusão
v_vldif = itab_zycbt005-vlvinc.
v_vldif_fat = itab_zycbt005-vlme_p.
v_slvinc = /pws/zycbe001-slvinc - v_vldif.
IF v_slvinc LT 0.
MESSAGE i011(pc) WITH text-020.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB009I01
...
ENDIF.
IF v_resposta EQ 'A'.
EXIT.
ENDIF.
ENDIF.
* >> Início da inclusão: MODULE USER_COMMAND_EXIT
IF SY-TCODE EQ '/PWS/ZYCB009_C'
AND SY-DYNNR EQ '0100'
AND OK_CODE EQ ''.
CALL SCREEN '0100'.
ELSE.
* << Fim da inclusão
SET SCREEN 0.
* >> Início da inclusão: MODULE USER_COMMAND_EXIT
ENDIF.
* << Fim da inclusão
PERFORM limpa_var_tab.
...