Cuando se modifica el recibo se rehace la descripción por si ha cambiado el importe

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@389 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
roberto 2009-01-29 09:03:17 +00:00
parent 74b104b228
commit 054d7c5424

View File

@ -812,6 +812,10 @@ begin
ANuevoReciboCliente.IMPORTE := ImporteRestante;
ANuevoReciboCliente.DESCRIPCION := 'RECIBO ' + ANuevoReciboCliente.REFERENCIA + ' - ' + CifraToLetras(ImporteRestante);
ANuevoReciboCliente.Post;
ARecibosCliente.Edit;
ARecibosCliente.DESCRIPCION := 'RECIBO ' + ARecibosCliente.REFERENCIA + ' - ' + CifraToLetras(ARecibosCliente.IMPORTE);
ARecibosCliente.Post;
end;
//Primero debemos hacer el ApplyUpdates del recibo inicial por si fallase