Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Liquidação de Fatura
Data/Hora da Publicação: 05/09/2011 15:57:47
Data/Hora Última Alteração: 05/09/2011 15:58:47
Descrição da Nota: LIQUIDAÇÃO CONTRATOS
Sintoma
O mapeamento do BI tenta acessar a Síntese do documento mesmo quando o SAP não gera esta síntese
para o documento
Solução
O mapeamento foi ajustado para verificar se a Síntese do documento será exibida ou não.
8.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 11429 Data: 05/09/2011 Hora: 15:46:17
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 11429
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 8.0
Pacote : 00008
Agrupamento : 00084
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote Descrição Breve
00259 - 00001 - 6.0 - 00021 - LEVAR PARA O CAMPO VALUT A DATA DE LANÇAMENTO
09398 - 00002 - 8.0 - 00001 - EXPORTAÇÃO - LIQUIDAÇÃO DE FATURAS - PROBLEMA NO CAMPO ATRIBUIÇÃO
10889 - 00003 - 8.0 - 00006 - VINCULAÇÃO/LIQUIDAÇÃO ARBITRAGEM-MOEDA SEM CASAS DECIMAIS, CENTAVO
----------------------------------------------------------------------------------------------------
Texto Rápido:
LIQUIDAÇÃO CONTRATOS
----------------------------------------------------------------------------------------------------
Palavras Chave:
LIQUIDAÇÃO CONTRATOS
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB004F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB004F02
...
v_prazo,
v_banco_d like /pws/zycbt001-bconegoc,
v_belnr_cap like /pws/zycbt006-belnr,
v_codaux like /pws/zyglt316-codaux1,
v_codaux1 type /pws/zygle316-codaux1,
v_codaux2 type /pws/zygle316-codaux2,
v_tpcontr like /pws/zycbt001-tpcontr,
v_contas_iguais(1) type c,
v_contador type n.
constants: c_002(3) value '002'.
* >> Início da inclusão: FORM BAIXA_CLIENTE_ACE
DATA: v_agkon TYPE /pws/zycbe033-agkon,
v_cta_compar TYPE c,
v_kursf TYPE /pws/zycbe033-kursf,
v_kursf_comp TYPE /pws/zycbe033-kursf.
* << Fim da inclusão
perform clear_date_batch.
concatenate '003' /pws/zycbe005-tpcontr into v_codeven.
clear v_subrc.
clear: v_data,
v_codeven.
concatenate '003' itab_zycbt006-tpcontr into v_codeven.
clear itab_zyglt321.
refresh itab_zyglt321.
select * from /pws/zyglt321
into table itab_zyglt321
...
...
itab_partidas-v_sinal = '-'.
append itab_partidas.
endloop.
itab_zycbe033-werks = /pws/zycbe005-werks.
itab_zycbe033-vbund = /pws/zycbe001-vbund.
perform busca_exit.
read table itab_zyglt100 with key zexit = 'LIQ014'.
if sy-subrc eq 0.
perform (itab_zyglt100-formulario)
in program (itab_zyglt100-programa).
* >> Início da inclusão: FORM BAIXA_CLIENTE_ACE
ENDIF.
CLEAR v_cta_compar.
LOOP AT itab_partidas.
IF sy-tabix EQ '1'.
v_agkon = itab_partidas-agkon.
ELSE.
IF itab_partidas-agkon NE v_agkon.
CLEAR v_cta_compar.
EXIT.
ELSE.
v_cta_compar = 'X'.
ENDIF.
ENDIF.
ENDLOOP.
IF NOT v_cta_compar IS INITIAL.
CLEAR v_kursf_comp.
LOOP AT itab_partidas.
CLEAR: v_year, v_kursf.
CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
EXPORTING
v_bukrs = itab_zycbe033-bukrs
v_date = itab_partidas-dtdocto
IMPORTING
v_year = v_year
EXCEPTIONS
variante_de_exercicio = 1
data_nao_encontrada = 2
empresa_nao_encontrada = 3
period_in_not_valid = 4
period_not_assigned = 5
version_undefined = 6
OTHERS = 7.
SELECT SINGLE kursf INTO v_kursf
FROM bkpf
WHERE bukrs = itab_zycbe033-bukrs
AND belnr = itab_partidas-belnr
AND gjahr = v_year.
IF v_kursf_comp IS INITIAL.
v_kursf_comp = v_kursf.
ELSE.
IF v_kursf NE v_kursf_comp.
CLEAR v_cta_compar.
EXIT.
ENDIF.
ENDIF.
ENDLOOP.
ENDIF.
IF NOT v_cta_compar IS INITIAL.
itab_zycbe033-flag_nc = 'X'.
* << Fim da inclusão
endif.
append itab_zycbe033.
if sy-subrc eq 0.
sort itab_partidas by agkoa agkon agums belnr.
endif.
v_tpcontabil = 'LIQ'.
perform busca_dados_bi using itab_zycbe033-bukrs
v_tpcontabil.
loop at itab_zycbt034.
message i016 with itab_zycbt034-descricao.
...