CE PLUS - Nota 013037
Módulo: CÂMBIO FINANCEIRO
Funcionalidade: SISCOSERV
Data/Hora da Publicação: 06/06/2013 09:55:58
Data/Hora Última Alteração: 06/06/2013 09:55:58
Descrição da Nota: SISCOSERV - ASSOCIAÇÃO - COMISSÃO AGENTE
Sintoma
O PROGRAMA NÃO ESTÁ PERMITINDO ASSOCIAR PAGAMENTOS DE COMISSÃO DE AGENTE COM UMA RAS/RVS
Solução
O PROGRAMA FOI AJUSTADO PARA CONSIDERAR TODOS OS STATUS PREVISTOS PARA BOLETOS DE PAGAMENTO DE
COMISSÃO DE AGENTE (STATUSP = 'P' OU 'C')
Versões Tratadas
9.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 13037 Data: 06/06/2013 Hora: 09:48:46
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 13037
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 9.0
Pacote : 00004
Agrupamento : 00156
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote Descrição Breve
12878 - 00001 - 9.0 - 00004 - SISCOSERV - ASSOCIAÇÃO
13028 - 00002 - 9.0 - 00004 - SISCOSERV - ORIGEM PROCESSOS PW.CE
----------------------------------------------------------------------------------------------------
Texto Rápido:
SISCOSERV - ASSOCIAÇÃO - COMISSÃO AGENTE
----------------------------------------------------------------------------------------------------
Palavras Chave:
SISCOSERV - ASSOCIAÇÃO - COMISSÃO AGENTE
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCA012F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCA012F01
...
INTO (p_bukrs, p_wa_zycat039-num_nf,
p_wa_zycat039-moeda)
WHERE nrseq = p_wa_zycat039-fat_comis.
SELECT SINGLE *
FROM /pws/zycbt031
INTO wa_zycbt031
WHERE bukrs = /pws/zycat030-bukrs
AND mdcorresp = 'EL'
AND nrcorresp = p_wa_zycat039-fat_comis
AND waers = /pws/zycat030-waers
* >> Início da exclusão: FORM VALIDA_COMISSAO
AND statusp = 'P'
* << Fim da exclusão
AND lifnr = p_wa_zycat039-lifnr.
* >> Início da exclusão: FORM VALIDA_COMISSAO
IF sy-subrc NE 0.
* << Fim da exclusão
* >> Início da inclusão: FORM VALIDA_COMISSAO
if sy-subrc ne 0 or
( sy-subrc eq 0 and
( wa_zycbt031-statusp ne 'P' and
wa_zycbt031-statusp ne 'C' ) ).
* << Fim da inclusão
MESSAGE i061 WITH text-i13 p_wa_zycat039-fat_comis
text-i09.
CLEAR p_pago.
ELSE.
p_wa_zycat039-valor = wa_zycbt031-vlme.
p_wa_zycat039-dt_pg_rec = wa_zycbt031-dtcredpr.
p_bukext = wa_zycbt031-lifnr.
SELECT SINGLE bco_ccme
FROM /pws/zycbt134
INTO v_bcoccme
...