CE PLUS - Nota 010506
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Captação
Data/Hora da Publicação: 17/08/2010 00:00:00
Data/Hora Última Alteração: 18/02/2011 16:35:02
Descrição da Nota: CAPTAÇÃO - RELATÓRIO CONTABILIZAÇÃO.
Sintoma
Ao criar um contrato de Pré-Pagto com 10 parcelas de Principal, o sistema cria 11 documentos, o
lançamento do Banco X Contrato e depois as contabilizações das parcelas. O relatório só apresenta as
contabilizações das parcelas no relatório de contabilização.
Solução
Incluir o numero do documento contábil, referente ao lançamento do Banco, no relatório que o sistema
apresenta durante a contabilização do contrato.
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 10506 Data: 17/08/2010 Hora: 15:05:27
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 10506
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 8.0
Pacote : 00004
Agrupamento : 00035
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
01725 - 00001 - 6.0 - 00024 - CAPTAÇÃO - PRÉ-PAGAMENTO - GRAVAÇÃO DADOS E DOCTOS. CONTÁBEIS
02257 - 00002 - 6.0 - 00025 - CAPTAÇÃO - RELATÓRIO DE CONTABILIZAÇÃO
02308 - 00003 - 6.0 - 00025 - CAPTAÇÃO MODIFICAÇÃO PRÉ PARCELA
----------------------------------------------------------------------------------------------------
CAPTAÇÃO - RELATÓRIO CONTABILIZAÇÃO.
----------------------------------------------------------------------------------------------------
Palavras Chave:
CAPTAÇÃO - RELATÓRIO CONTABILIZAÇÃO.
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB001F04
REPS /PWS/MZYCB001I01
REPT /PWS/SAPMZYCB001
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB001F04
...
periodo_fechado = 2
others = 3.
if sy-subrc = 0.
read table itab_zycbt032 with key tcode = 'F-30'
tabela = '/PWS/ZYCBT002'
cpochv = itab_zycbe033-cpochv
tpmsg = 'S'.
if sy-subrc eq 0.
clear: itab_acerto, itab_contabil, v_primeiro.
refresh: itab_acerto, itab_contabil.
* >> Início da inclusão: FORM ALTERA_CAB_PT
if /pws/zycbe001-tpcontr+0(1) ca 'PS'.
if okcode eq 'DELE'.
perform mensagens using itab_zycbt032-belnr.
endif.
else.
* << Fim da inclusão
perform mensagens using itab_zycbt032-belnr.
* >> Início da inclusão: FORM ALTERA_CAB_PT
endif.
* << Fim da inclusão
if /pws/zycbe001-capital eq 'X'.
message i015 with text-447 itab_zycbt032-belnr.
else.
message i015 with text-385 itab_zycbt032-belnr.
endif.
v_belnr = itab_zycbt032-belnr.
...
...
endif.
if okcode eq 'DELE'.
v_primeiro = 'X'.
endif.
loop at itab_contabil.
clear: itab_acerto, v_texto.
write itab_contabil-nrparc to v_texto+0(17).
write itab_contabil-vlme to v_texto+20(13)
currency /pws/zycbe001-waers.
write itab_contabil-belnr to v_texto+36(10).
* >> Início da inclusão: FORM MENSAGENS
if itab_contabil-nrparc eq '000'.
write text-514 to v_texto+49(15).
endif.
* << Fim da inclusão
itab_acerto-msg = v_texto.
append itab_acerto.
endloop.
endform.
form trata_moeda.
endform.
form trata_decimais2 using p_moeda
changing p_valor.
select single * from tcurx where currkey = p_moeda.
if sy-subrc <> 0.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB001I01
...
perform salva_texto using v_idioma.
perform save_performance.
perform elimina_parcelas_comissao.
perform salva_parcelas_comissao.
clear: v_belnr.
if /pws/zycbe001-tpcontr ne 'A' and
/pws/zycbe001-tpcontr ne 'C' and
/pws/zycbe001-tpcontr ne 'DP' and
/pws/zycbe001-tpcontr ne 'E'.
if v_erro_bi is initial.
* >> Início da inclusão: MODULE USER_COMMAND_CB001
if /pws/zycbe001-tpcontr+0(1) ca 'PS'.
perform mensagens using /pws/zycbe001-belnr.
else.
* << Fim da inclusão
perform mensagens using v_belnr.
endif.
endif.
* >> Início da inclusão: MODULE USER_COMMAND_CB001
endif.
* << Fim da inclusão
if not itab_acerto[] is initial.
describe table itab_acerto[] lines v_cont.
if v_cont > 4
and ( /pws/zycbe001-tpcontr(1) eq 'P' or
/pws/zycbe001-tpcontr(1) eq 'S' ).
export itab_acerto to memory id '040'.
* >> Início da inclusão: MODULE USER_COMMAND_CB001
if not itab_contabil[] is initial.
* << Fim da inclusão
submit /pws/zycbr040 and return.
* >> Início da inclusão: MODULE USER_COMMAND_CB001
endif.
* << Fim da inclusão
refresh: itab_contabil, itab_acerto.
* >> Início da inclusão: MODULE USER_COMMAND_CB001
v_primeiro = ''.
* << Fim da inclusão
endif.
endif.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPT /PWS/SAPMZYCB001
Incluído símbolo de texto:
Idioma: PT
Símbolo: 514
Texto: (15 caracteres)
"- Docto Estorno"
Comprimento máximo: 15