Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Rotina de Pagamento
Data/Hora da Publicação: 14/03/2006 00:00:00
Data/Hora Última Alteração: 18/02/2011 13:59:33
Descrição da Nota: COMPLEMENTO DE BOLETO REMESSA CAMPO LIFNR ZYCAT024
Sintoma
Ao contabilizar o complemento de boleto, o programa não busca a conta de credito da tabela zycat024
- campo - LIFNR.
Solução
A gravação da tabela zycat024 foi recolocada para depois da chamada do programa especifico.
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01020 Data: 14/03/2006 Hora: 14:02:11
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01020
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00023
Agrupamento : 00105
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
COMPLEMENTO DE BOLETO REMESSA CAMPO LIFNR ZYCAT024
----------------------------------------------------------------------------------------------------
Palavras Chave:
COMPLEMENTO DE BOLETO REMESSA CAMPO LIFNR ZYCAT024
EXIT PBE002 - PROGRAMA ESPECIFICO ZBMCEI012
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCA110F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCA110F01
...
'NEWKO'
text-016.
ENDIF.
itab_zycbe033-d_gsber = itab_zycbt124_aux-gsber.
itab_zycbe033-c_gsber = itab_zycbt124_aux-gsber.
* >> Início da exclusão: FORM CONTABILIZA_DOCTO_CP
APPEND itab_zycbe033.
PERFORM lancamento_multiplo USING p_tpimp
p_recontabiliza
p_recuperar.
* << Fim da exclusão
MOVE sy-repid TO v_repid.
CALL FUNCTION '/PWS/ZYGL_BUSCA_EXIT_CLIENTE'
EXPORTING
i_codmod = v_cod_mod
i_func = v_repid
...
...
IF sy-subrc EQ 0.
PERFORM (itab_zyglt100-formulario)
IN PROGRAM (itab_zyglt100-programa).
ENDIF.
ENDIF.
* >> Início da inclusão: FORM CONTABILIZA_DOCTO_CP
APPEND itab_zycbe033.
PERFORM lancamento_multiplo USING p_tpimp
p_recontabiliza
p_recuperar.
* << Fim da inclusão
LOOP AT itab_zycbt034.
MESSAGE i016 WITH itab_zycbt034-descricao.
ENDLOOP.
IF itab_zycbt034 IS INITIAL.
IF itab_zycbt124_aux-tpoper = 'R'.
...