CE PLUS - Nota 006010
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Liquidação de Fatura
Data/Hora da Publicação: 22/02/2008 00:00:00
Data/Hora Última Alteração: 22/02/2011 12:41:19
Descrição da Nota: LIQUIDAÇÃO - EXIT LIQ028
Sintoma
Liquidação - EXIT LIQ028
Solução
Liquidação - EXIT LIQ028
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 06010 Data: 22/02/2008 Hora: 18:13:20
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 06010
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00004
Agrupamento : 00035
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
03193 - 00001 - 6.0 - 00026 - LIQUIDAÇÃO - CAMPO BUDAT NAS TABELAS INTERNAS BSAS E BSAD.
03208 - 00002 - 6.0 - 00026 - LIQUIDAÇÃO (JUROS) - DATA DE CORTE ACC E ACE
03220 - 00003 - 6.0 - 00026 - CRIAÇÃO DAS EXIT¿S LIQ022 E LIQ023
03233 - 00004 - 6.0 - 00026 - LIQUIDAÇÃO - PRRENCHIMENTO DO CAMPO ATRIBUIÇÃO DESMEMBRAMENTO DE
03241 - 00005 - 6.0 - 00026 - LIQUIDAÇÃO - CAMPO BUDAT NAS TABELAS BSAD E BSAS
05897 - 00006 - 7.0 - 00004 - LIQUIDAÇÃO - BOTÃO MARCAR/DESMARCAR - BLOQUEIO DE CONTAS
----------------------------------------------------------------------------------------------------
LIQUIDAÇÃO - EXIT LIQ028
----------------------------------------------------------------------------------------------------
Palavras Chave:
LIQUIDAÇÃO - EXIT LIQ028
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB004F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB004F02
...
i_codmod_nao_encontrado = 1
i_func_nao_encontrado = 2
i_zexit_nao_encontrado = 3
OTHERS = 4.
IF sy-subrc EQ 0.
READ TABLE itab_zyglt100 WITH KEY zexit = 'LIQ022'.
IF sy-subrc EQ 0.
PERFORM (itab_zyglt100-formulario)
IN PROGRAM (itab_zyglt100-programa).
ENDIF.
* >> Início da exclusão: FORM BAIXA_ACE_PERFORMANCE
READ TABLE itab_zyglt100 WITH KEY zexit = 'LIQ022'.
IF sy-subrc EQ 0.
PERFORM (itab_zyglt100-formulario)
IN PROGRAM (itab_zyglt100-programa).
ENDIF.
* << Fim da exclusão
ENDIF.
APPEND itab_zycbe033.
LOOP AT itab_zycbt034.
MESSAGE i016 WITH itab_zycbt034-descricao.
ENDLOOP.
IF itab_zycbt034 IS INITIAL.
* >> Início da inclusão: FORM BAIXA_ACE_PERFORMANCE
READ TABLE itab_zyglt100 WITH KEY zexit = 'LIQ028'.
IF sy-subrc EQ 0.
PERFORM (itab_zyglt100-formulario)
IN PROGRAM (itab_zyglt100-programa).
ELSE.
* << Fim da inclusão
v_agkon = itab_zycbe033-agkon.
PERFORM unlock_razao USING v_agkon
itab_zycbe033-bukrs.
CALL FUNCTION '/PWS/ZYCB_TRANSACAO_F_30_Q'
EXPORTING
v_modo = v_modo_bi
TABLES
t_dados = itab_zycbe033
t_campo = itab_zycbt034
t_zycbt032 = itab_zycbt032
t_partidas = itab_partidas
EXCEPTIONS
campo_em_branco = 1
periodo_fechado = 2
OTHERS = 3.
* >> Início da inclusão: FORM BAIXA_ACE_PERFORMANCE
ENDIF.
* << Fim da inclusão
IF sy-subrc = 0.
READ TABLE itab_zycbt032 WITH KEY tcode = 'F-30'
tabela = 'ZYCBT006'
cpochv = itab_zycbe033-cpochv
tpmsg = 'S'.
IF sy-subrc EQ 0.
itab_zycbt006-belnr_perf = itab_zycbt032-belnr.
MODIFY itab_zycbt006.
itab_contabil-nrinvoic = itab_zycbt006-nrinvoic.
itab_contabil-nrparcf = itab_zycbt006-nrparcf.
...