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 */ /* Tratar el resto de las filas */
for select id, id_presupuesto, posicion, tipo_detalle, F_RTFTOTEXT(concepto) as concepto, for select id, id_presupuesto, posicion, tipo_detalle,
importe_total, coalesce(visible, 1) F_RTFTOTEXT(concepto) as concepto, importe_total, coalesce(visible, 1)
from presupuestos_cliente_detalles from presupuestos_cliente_detalles
where tipo_detalle = 'Titulo' and id_presupuesto = :AID where id_presupuesto = :AID and
order by id_presupuesto, posicion tipo_detalle in ('Titulo', 'Subtotal')
order by posicion
into :ID, :ID_PRESUPUESTO, :POSICION, :TIPO_DETALLE, :CONCEPTO, into :ID, :ID_PRESUPUESTO, :POSICION, :TIPO_DETALLE, :CONCEPTO,
:IMPORTE_TOTAL, :VISIBLE :IMPORTE_TOTAL, :VISIBLE
do do
suspend; 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^ end^
SET TERM ; ^ SET TERM ; ^