Sumar un el valor de un Label en report builder

[escorpionrojo43]

Hola Colegas.

Tengo una duda de la cual necesito de la ayuda de ustedes para su solucion.

Tengo un reporte en report builder en el cual tengo un valor calculado de acuerde a una condicion x.

hasta aqui todo bien, en el detalle me da los valores cuando cumplen una de las condiciones. el problema reside en quiero al final de la pagina"Footer" el total de la suma de ese label para mayor comprension aqui parte de mi codigo

Código Delphi [-]
procedure label41OnGetText (var Text : String);
begin
   if dbp_bien['campo11'] = 'Primera' then
   begin
    Text := (dbp_bien['VALOR']*60)
   end
   else if dbp_bien['campo11'] = 'Segunda' Then
   begin
    Text := (dbp_bien['VALOR']*12)
   end
   else if dbp_bien['campo11'] = 'Tercera' Then
   begin
    Text := (dbp_bien['VALOR']*4)
   end
   else if dbp_bien['campo11'] = 'P1' Then
   begin
    Text := (dbp_bien['VALOR']*1000)
   end
   else if dbp_bien['campo11'] = 'P2' Then
   begin
    Text := (dbp_bien['VALOR']*100)
   end
   else if dbp_bien['campo11'] = 'TRIPLETA' Then
   begin
    Text := (dbp_bien['VALOR']*10000)
   end;
end;

con esto puedo tener varios valores en el detalle, lo que quiero es que en otro label me sume el resultado del label41

suponiendo que en el detalle label41.caption tiene valores como
1000
100
10000

necesito tener la suma de todos estos en otro label llamado label45 el cual va a al final de la pagina.
Espero haberme explicado bien. ahh! esto esta en el lenguage RAP "(Report Application Pascal"

[[Caral]]

Hola
No conozco report builder pero me pregunto viendo el codigo:
No se podria colocar una o varias variables que obtengan el resultado y simplemente exponerla?.
En QReport existe un componente que hace lo que necesitas, es una lastima que report builder no lo tenga.
Saludos

[escorpionrojo43]

Empezado por Caral

Hola
No conozco report builder pero me pregunto viendo el codigo:
No se podria colocar una o varias variables que obtengan el resultado y simplemente exponerla?.
En QReport existe un componente que hace lo que necesitas, es una lastima que report builder no lo tenga.
Saludos

Que idea me puedes dar de como poner esa variable? como podria referirme a esa variable con los valores que obtengo para luego sumarlo?

[[Caral]]

Hola
Pues la verdad no lo se, me imagino algo asi:

Código Delphi [-]
procedure label41OnGetText (var Text : String);
Var suma: Real;
begin
   suma:= 0;
   if dbp_bien['campo11'] = 'Primera' then
   begin
    Text := (dbp_bien['VALOR']*60)
   end
   else if dbp_bien['campo11'] = 'Segunda' Then
   begin
    Text := (dbp_bien['VALOR']*12)
   end
   else if dbp_bien['campo11'] = 'Tercera' Then
   begin
    Text := (dbp_bien['VALOR']*4)
   end
   else if dbp_bien['campo11'] = 'P1' Then
   begin
    Text := (dbp_bien['VALOR']*1000)
   end
   else if dbp_bien['campo11'] = 'P2' Then
   begin
    Text := (dbp_bien['VALOR']*100)
   end
   else if dbp_bien['campo11'] = 'TRIPLETA' Then
   begin
    Text := (dbp_bien['VALOR']*10000)
   end;
  suma:= suma + StrToFloat(Text);
end;

No se, probar no cuesta nada.
Saludos

[Casimiro Notevi]

En lugar de usar una label, lo que tienes que hacer es usar una variable de tipo float, por ejemplo, y le le dices que sume. Es lo normal en cualquier generador de informes.

[Diana Carolina]

Hola,,,Yo estoy tratando de sumar dos campos que tengo en un qry en un componente variable de Report Builder.

valor := (QryPapeletaLocmontonetofracc.AsFloat + QryPapeletaLocvlrIva.AsFloat);
ppVNeto.Value := FormatFloat('#,0.00', Valor);

Pero en el reporte el dato es 0.00 deberia mostrarme el valor de la suma puesto que ambos campos contienen valores.