CE PLUS - Nota 006815
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Vinculação
Data/Hora da Publicação: 19/06/2008 00:00:00
Data/Hora Última Alteração: 18/02/2011 17:59:10
Descrição da Nota: VINCULAÇÃO - DATA DE PAGAMENTO NO EXTERIOR
Sintoma
O programa de captação não mostra o historico contábil de forma correta.
Solução
adicionado código para que a liquidação automatica de cambio pronto grave a data de pagamento no
exterior.
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 06815 Data: 19/06/2008 Hora: 16:17:48
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 06815
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00006
Agrupamento : 00052
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
03970 - 00001 - 7.0 - 00001 - VINCULAÇÃO - LIQUIDAÇÃO AUTOMATICA CAMBIO PRONTO
04725 - 00002 - 7.0 - 00002 - VINCULAÇÃO - CONTABILIZAÇÃO E ESTORNO DE CAMBIO PRONTO
05512 - 00003 - 7.0 - 00004 - TRATAMENTO CAMPOS /PWS/ZYCBT030-BELNR_T /PWS/ZYCBT030-BUDAT_T
05825 - 00004 - 7.0 - 00004 - VALORES MANTIDOS NO EXTERIOR COM VINCULAÇÃO E LIQUIDAÇÃO AUTOMÁTI
----------------------------------------------------------------------------------------------------
VINCULAÇÃO - DATA DE PAGAMENTO NO EXTERIOR
----------------------------------------------------------------------------------------------------
Palavras Chave:
VINCULAÇÃO - DATA DE PAGAMENTO NO EXTERIOR
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB009F03
REPS /PWS/MZYCB009F07
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB009F07
...
/pws/zycbt084-nrseqc = wa_zycbt005-nrseqc.
/pws/zycbt084-tpdesp = wa_zycbt005-tpdesp.
/pws/zycbt084-nrparc = wa_zycbt005-nrparc.
/pws/zycbt084-dtincl = wa_zycbt005-dtincl.
/pws/zycbt084-nrinvoic = wa_zycbt005-nrinvoic.
/pws/zycbt084-nrparcf = wa_zycbt005-nrparcf.
/pws/zycbt084-gsberf = wa_zycbt005-gsberf.
/pws/zycbt084-dtvincul = wa_zycbt005-dtvincul.
/pws/zycbt084-dtvencto = wa_zycbt005-dtvencto.
/pws/zycbt084-dtpagto = /pws/zycbe006-dtpagto.
* >> Início da inclusão: FORM LANCA_CP
/pws/zycbt084-dtpagext = /pws/zycbe006-dtpagext.
* << Fim da inclusão
/pws/zycbt084-vbeln = itab_zycbt030-vbeln.
/pws/zycbt084-belnr = itab_zycbt032-belnr.
/pws/zycbt084-tdesmemb = 'K'.
/pws/zycbt084-liq_and = space.
/pws/zycbt084-result_saldo = wa_recurso_aux-vl_total_saldo.
MODIFY /pws/zycbt084 FROM /pws/zycbt084.
ELSE.
LOOP AT itab_zycbt032 WHERE tcode = 'F-30'
AND tabela = '/PWS/ZYCBT006'
AND cpochv = v_cpochv.
...
...
wa_zycbt005-status = 'C'.
wa_zycbt005-dtbelnr = itab_zycbe033-budat.
wa_zycbt005-belnr_d = itab_zycbt032-belnr.
itab_contabil-nrinvoic = wa_zycbt005-nrinvoic.
itab_contabil-nrparcf = wa_zycbt005-nrparcf.
CLEAR itab_contabil-vbeln.
itab_contabil-gsberf = wa_zycbt005-gsberf.
itab_contabil-docto = itab_zycbt032-belnr.
itab_contabil-msg = text-295.
CLEAR /pws/zycbt084.
* >> Início da inclusão: FORM CLEARING_030_CP
/pws/zycbt084-dtpagext = /pws/zycbe006-dtpagext.
* << Fim da inclusão
PERFORM grava_t084 USING itab_zycbt032-belnr.
READ TABLE itab_zycbt074 WITH KEY nrseqc = wa_zycbt005-nrseqc.
IF sy-subrc EQ 0.
IF itab_zycbt074-dtcont IS INITIAL OR
itab_zycbt074-dtcont EQ '00000000'.
itab_contabil-dtdocto = /pws/zycbe006-dtpagto.
ELSE.
itab_contabil-dtdocto = itab_zycbt074-dtcont.
ENDIF.
ENDIF.
...