CE PLUS - Nota 007290
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Liquidação de Contrato
Data/Hora da Publicação: 10/09/2008 00:00:00
Data/Hora Última Alteração: 18/02/2011 16:59:09
Descrição da Nota: DUMP NO PROGRAMA DE LIQUIDAÇÃO - PRÉ PAGTO (LINEAR SOBRE CAMBIAIS)
Sintoma
dump no programa de liquidação. Antes do dump, ele dava uma mensagem de warning dizendo que falta
prorrogação na liquidação, mas mesmo preenchendo a prorrogação dava o dump.
Solução
fazer a verificação da tabela de prorrogação ( /pws/zycbt003 ) com o tipo 'P' de principal e não
'L' de liquidaçao. e se for contrato pré-pagamento ou securitização dar a mensagem de erro 'falta
prorrogação na principal.'
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 07290 Data: 10/09/2008 Hora: 10:09:15
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 07290
Categoria : Melhoria
Prioridade : Alta
Versão PW.CE : 7.0
Pacote : 00006
Agrupamento : 00064
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
03678 - 00002 - 7.0 - 00001 - LIQUIDAÇÃO - DA - CHECK DOS DOCUMENTOS - ESTORNO DAS FATURAS
07078 - 00001 - 7.0 - 00006 - LIQUIDAÇÃO - DUMP DIVISÃO POR ZERO - /PWS/ZYCBT030-KWERT
----------------------------------------------------------------------------------------------------
DUMP NO PROGRAMA DE LIQUIDAÇÃO - PRÉ PAGTO (LINEAR SOBRE CAMBIAIS)
----------------------------------------------------------------------------------------------------
Palavras Chave:
DUMP NO PROGRAMA DE LIQUIDAÇÃO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB004F01
REPS /PWS/MZYCB004F02
REPT /PWS/SAPMZYCB004
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB004F01
...
v_dtaux = /pws/zycbt001-dtcred.
ENDCASE.
IF v_dtpagto LT v_dtaux.
MESSAGE i011(pc) WITH text-026.
v_dtpagto = sy-datum.
CALL SCREEN '0100'.
ENDIF.
IF v_dtpagto > /pws/zycbt001-dtliquid.
SELECT SINGLE * FROM /pws/zycbt003
WHERE nrseqc = /pws/zycbt001-nrseqc AND
* >> Início da exclusão: FORM VERIFICA_DTPAGTO
tppror = 'L' AND
* << Fim da exclusão
* >> Início da inclusão: FORM VERIFICA_DTPAGTO
tppror = 'P' AND
* << Fim da inclusão
dtpror >= v_dtpagto.
IF sy-subrc NE 0.
* >> Início da exclusão: FORM VERIFICA_DTPAGTO
MESSAGE i011(pc) WITH text-201.
* << Fim da exclusão
* >> Início da inclusão: FORM VERIFICA_DTPAGTO
IF ( /PWS/ZYCBE005-TPCONTR(1) = 'P' or
/PWS/ZYCBE005-TPCONTR(1) = 'S' ) AND
/pws/zycbE001-FFRCALC = 'C' .
MESSAGE E011(pc) WITH text-202.
ENDIF.
MESSAGE i011(pc) WITH text-202.
* << Fim da inclusão
ENDIF.
ENDIF.
ENDFORM.
FORM seleciona_paga_documento.
PERFORM verifica_status_linha.
PERFORM verif_contas.
IF v_cta_bloq EQ 'S'.
EXIT.
ENDIF.
PERFORM seleciona_dados.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB004F02
...
PERFORM verify_null_field USING wa_zycbt011_d-blart
'BLART'
text-006.
itab_zycbe033-blart = wa_zycbt011_d-blart.
ELSE.
PERFORM verify_null_field USING wa_zycbt011-blart
'BLART'
text-006.
itab_zycbe033-blart = wa_zycbt011-blart.
ENDIF.
* >> Início da exclusão: FORM BAIXA_CLIENTE_PERFORMANCE
itab_zycbe033-d_gsber = itab_zycbt006-gsberf.
* << Fim da exclusão
* >> Início da inclusão: FORM BAIXA_CLIENTE_PERFORMANCE
itab_zycbe033-d_gsber = itab_zycbt006-gsber.
itab_zycbe033-c_gsber = itab_zycbt006-gsber.
* << Fim da inclusão
IF wa_zycbt007-dtliqcp EQ 'DTCONTR' AND
/pws/zycbe001-tpcontr(1) EQ 'C'.
itab_zycbe033-kursf = /pws/zycbe001-txcneg.
ELSEIF wa_zycbt007-dtliqcp EQ 'TXCONTR' AND
/pws/zycbe001-tpcontr(1) EQ 'C'.
itab_zycbe033-kursf = /pws/zycbe001-txcneg.
ELSE.
PERFORM verifica_data2 USING wa_zycbt007-dtliquid
itab_zycbt006-dtpagto.
IF NOT v_databl IS INITIAL.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPT /PWS/SAPMZYCB004
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: PT
Símbolo: 202
Texto: (31 caracteres)
"Falta prorrogação de Principal."
Comprimento máximo: 132