CE PLUS - Nota 010271
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Liquidação de Contrato
Data/Hora da Publicação: 11/06/2010 00:00:00
Data/Hora Última Alteração: 18/02/2011 14:45:11
Descrição da Nota: CAPTAÇÃO - LIQUIDAÇÃO DE ACC COM PRÉ
Sintoma
Captação - Liquidação de ACC com Pré -problema campos conta contabil e atribuição no BI do
desmenbramento de Acc e no clearing do Pré.
Solução
Pegar os campos corretamente.
Versões Tratadas
8.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 10271 Data: 11/06/2010 Hora: 10:24:52
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 10271
Categoria : Erro de Programa
Prioridade : Baixa
Versão PW.CE : 8.0
Pacote : 00003
Agrupamento : 00026
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
05479 - 00001 - 7.0 - 00003 - CAPTAÇÂO - ORDEM DE PAGAMENTO
06082 - 00002 - 7.0 - 00004 - CB - 444269 - CODE INSPECTOR E VERIFICAÇÃO AMPLIADA
08930 - 00003 - 7.0 - 00010 - CAPTAÇÃO - LIQUIDAÇÃO DAS CAPTAÇÕES DE PRÉ-PAGAMENTO E SECURITIZA
10188 - 00004 - 8.0 - 00003 - MAPEAMENTO SOCIEDADE PARCEIRA NAS CONTABILIZAÇÕES
----------------------------------------------------------------------------------------------------
CAPTAÇÃO - LIQUIDAÇÃO DE ACC COM PRÉ
----------------------------------------------------------------------------------------------------
Palavras Chave:
CAPTAÇÃO - LIQUIDAÇÃO DE ACC COM PRÉ -PROBLEMA CONTA CONTAB E ATRIBUIÇÃO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB001F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB001F02
...
select single budat
from bkpf
into itab_zycbe033-dtdocto
where bukrs = wa_zycbt001_pre-bukrs
and belnr = itab_zycbt061-belnr_d
and gjahr = v_year.
perform verify_null_field using conta_acc
'AGKON'
text-015.
if /pws/zycbe001-tpcontr ne 'A'.
* >> Início da inclusão: FORM DESMEMBRA_ACC
if wa_zycbt001_pre-tpcontr = 'A'.
itab_zycbe033-d_newko = conta_acc.
else.
* << Fim da inclusão
itab_zycbe033-d_newko = conta_pre.
* >> Início da inclusão: FORM DESMEMBRA_ACC
endif.
* << Fim da inclusão
else.
itab_zycbe033-d_newko = conta_acc.
endif.
if wa_zycbt001_pre-tpcontr = 'A'.
itab_zycbe033-d_newko1 = conta_acc.
elseif wa_zycbt001_pre-tpcontr ne 'A'.
itab_zycbe033-d_newko1 = conta_pre.
endif.
if /pws/zycbt001-tpcontr(1) = 'D'.
itab_zycbe033-newbs = '19'.
itab_zycbe033-agkoa = 'D'.
itab_zycbe033-umskz = cod_rze.
else.
itab_zycbe033-newbs = '50'.
itab_zycbe033-agkoa = 'S'.
endif.
* >> Início da exclusão: FORM DESMEMBRA_ACC
concatenate text-467 /pws/zycbe001-nrseqc
* << Fim da exclusão
* >> Início da inclusão: FORM DESMEMBRA_ACC
concatenate text-467 itab_zycbt061-NRSEQ_C
* << Fim da inclusão
into itab_zycbe033-d_zuonr
separated by space.
itab_zycbt036-tcode = itab_zycbe033-tcode.
itab_zycbt036-tabela = itab_zycbe033-tabela.
itab_zycbt036-cpochv = itab_zycbe033-cpochv.
itab_zycbt036-residuo = itab_zycbe033-wrbtr.
itab_zycbt036-zuonr = itab_zycbe033-d_zuonr.
append itab_zycbt036.
itab_zycbe033-belnr = itab_zycbt061-belnr_d.
append itab_zycbe033.
...
...
move-corresponding itab_zycbt221 to wa_zycbt221_aux.
append wa_zycbt221_aux.
endif.
endloop.
endif.
endif.
endif.
if wa_zycbt001_pre-slvinc ne 0.
v_atrib = 'X'.
if /pws/zycbe001-tpcontr+0(1) = 'P'.
* >> Início da exclusão: FORM CLEARING_PRE
concatenate itab_zycbt061-nrseq_c /pws/zycbe001-tpcontr
into v_zuonr.
* << Fim da exclusão
* >> Início da inclusão: FORM CLEARING_PRE
concatenate text-488 itab_zycbt061-nrseq_c
into v_zuonr
separated by space.
* << Fim da inclusão
else.
v_zuonr = itab_zycbt061-nrseq_c.
endif.
endif.
sort itab_partidas by belnr.
delete adjacent duplicates from itab_partidas.
loop at itab_zycbt034.
message i016 with itab_zycbt034-descricao.
endloop.
if itab_zycbt034[] is initial.
...