Se adaptan los presupuestos para que puedan meter bonificaciones como en el preograma antiguo.

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@763 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
roberto 2008-11-11 18:58:00 +00:00
parent 6eeada692f
commit 6a6749ba04

View File

@ -3839,6 +3839,18 @@ begin
suspend;
end
end
/* Tratar la bonificaciones */
for select id, DESCRIPCION_BONIFICACION as concepto, -1* IMPORTE_BONIFICACION as importe_total, 1
from presupuestos_cliente
where id = :AID
into :ID, :CONCEPTO, :IMPORTE_TOTAL, :VISIBLE
do
begin
contador = contador + 1;
concepto_capitulo = concepto;
suspend;
end
end
^