Mensaje enviado por fhusa@sefes.es (FHUSA)
A ver, imaginemos que el listado es de tres columnas, Debe, Haber y Saldo
en la columna del debe declarar la formula @@Debe como sigue, con la opcion de
no imprimir si = 0
NumberVar Debe; Debe :=0;
if {Campo A} = "D" then
Debe :={Campo B};
Debe
Lo mismo en la columna del Haber, formula @@Haber con la opcion de no imprimir
si = 0
NumberVar Haber; Haber :=0;
if {Campo A} = "H" then
Haber :={Campo B};
Haber
y luego en la columna del Saldo, la formula @@Saldo
WhilePrintingRecords;
NumberVar Saldo;
Saldo :=Saldo + {@@Debe}-{@@Haber};
Saldo
y en algun lugar del listado, una formula que iniciliaze el valor del Saldo y
que al mismo tiempo te puede hacer saltar el listado si la cuenta, la fecha, o
lo que sea no es la misma
WhilePrintingRecords;
NumberVar Saldo;
if {Consulta} <> Next ({Consulta}) then
Saldo :=0
else
Saldo :=Saldo
Espero que te sirva
Saludos
Juan Cros