Ticket #94 -> Arreglado los resúmenes en el informe. (2º intento)

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@566 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
David Arranz 2008-09-04 14:34:25 +00:00
parent 54878e0094
commit 8d20a38746

View File

@ -3455,15 +3455,27 @@ begin
/* Tratar el resto de las filas */
for select id, id_presupuesto, posicion, tipo_detalle, F_RTFTOTEXT(concepto) as concepto,
importe_total, coalesce(visible, 1)
for select id, id_presupuesto, posicion, tipo_detalle,
F_RTFTOTEXT(concepto) as concepto, importe_total, coalesce(visible, 1)
from presupuestos_cliente_detalles
where tipo_detalle = 'Titulo' and id_presupuesto = :AID
order by id_presupuesto, posicion
where id_presupuesto = :AID and
tipo_detalle in ('Titulo', 'Subtotal')
order by posicion
into :ID, :ID_PRESUPUESTO, :POSICION, :TIPO_DETALLE, :CONCEPTO,
:IMPORTE_TOTAL, :VISIBLE
do
begin
contador = contador + 1;
if (tipo_detalle = 'Titulo') then
begin
concepto_capitulo = concepto;
end
if (tipo_detalle = 'Subtotal') then
begin
concepto = concepto_capitulo;
suspend;
end
end
end^
SET TERM ; ^