Resumen Suma y sigue en Crytal Report

A continuación os reenvio un mensaje de la lista de la UBA sobre este mismo tema.

Indica como fabricarse uno mismo el Suma y Sigue en CR. Está realizado en la versión 4.5, asi que, servirá para cualquier version.


En la cabecera del listado"Page Header"

Nombre:@InicioSigue
Formula:WhileprintingRecords ;
 NumberVar Sigue;
Sigue: ;

En la cabecera de grupo:

Nombre:@Inicio
Formula: WhileprintingRecords ;
 NumberVar Sigue;
StringVar Inicio;
Sigue:;
 Inicio:";

Nombre:@Acumular
Formula: WhileprintingRecords ;
 NumberVar Importe;
Importe:;


En la 1ª linea de detalle:

Nombre:@Anterior
Formula:WhileprintingRecords ;
 numberVar Sigue;
Stringvar Inicio;
if Sigue and Inicio " then
 "Suma Anterior "
else ""

Nombre:@ImporteAnterior
Formula:WhileprintingRecords ;
 numberVar Acum;
NumberVar Importe;
numberVar Sigue;
if Sigue then Importe:cum
else 0


En la 2ª linea de detalle:

Nombre:@LineaSigue
Formula:WhileprintingRecords ;
 numberVar Sigue;
Sigue:gue+1 ;

Nombre:@SumaImporte
Formula:WhileprintingRecords ;
 NumberVar Importe;
Importe:mporte + {nomtabla.campoimplinea}


En el pie del grupo:

Nombre:@Final
Formula: WhileprintingRecords ;
 StringVar Inicio;
 Inicio:";


En el pie de página:

Nombre:@SumaySigue
Formula:WhilePrintingRecords;
 Stringvar Inicio;
if Inicio " then
 "Suma y Sigue"
else ""


Nombre:@SumaySigueImporte
Formula:WhilePrintingRecords;
 Stringvar Inicio;
numberVar Acum;
if Inicio " then acum:@SumaImporte} - {nomtabla.campoimplinea}
else acum:
Todo este rollo es para que tanto en los saltos de grupo como en los totales salgan los datos. Hay que tener en cuenta que puedes estar sacando el listado de Facturas, por ejemplo, y tienes posibilidad de sacarlas en bloque, no solo de una en una. Por tanto lo tienes que controlar en todas. A partir de aqui yo creo que lo puedes hacer.

La segunda parte no se yo si se puede hacer. No creo que puedas.

Un Saludo,

---
Luis Baigorrotegui
Consultoria & Comunicaciones
E-Mail: luisb@cyc.es
ICQ# : 7416777



Resumen Resumen

Visual Basic Página de Visual Basic

Página principal Página principal

www.jrubi.com