FoxPro/Visual FoxPro - Sumar columna en grid

Buenas tardes,

Se trata de un grid que contiene los datos de clientes, y un segundo grid contiene datos de pedidos. Hay una relación uno a varios establecida entre ambos grid, de forma que cuando se selecciona un elemento del primero aparecen los pedidos en el segundo.

En el segundo grid hay varias columnas calculadas que no dependen de la tabla que controla las otras columnas del grid y que tienen una fórmula en su ControlSource, algo parecido a como se haría en una hoja de cálculo.

Necesitaba realizar sumas de estas columnas y su resultado que aparezca en un Textbox, pero preferiría no tener que sumar la tabla con más de 3000 registros para sumar en realidad 4 o 6 datos. Quisiera sumar solamente los datos que aparecen en pantalla de forma dinámica. ¿Habrá alguna forma sencilla de hacerlo?.

Muchas gracias y un saludo, Mario

Hola Mario,
Puedes hacer lo siguiente:
Por ejemplo:
En el procedimiento de InteractiveChange de la columna o text del grid:

Select tuTabla
SUM NombredeTuCampo TO nTotal
thisform.txtTotal.Value= nTotal
Thisform.Refresh

o asi tambien
*****************
Select tuTabla
SUM Total TO nTotal
thisform.txtTotal.Value= nTotal
Thisform.Refresh

espero te sirva, yo lo hice de esa forma y me funciono.

Saludes Helder Martinez
Honduras C.A

Gracias Helder, su idea es buena y de funcionamiento seguro, pero quisiera evitar tener que sumar o calcular campos de toda la tabla cada vez que se modifica un dato en una de las casillas del grid, buscaba alguna solución más directa para las pocas casillas a sumar en el segundo grid.

Saludos, Mario

Lo que te sugiere Helder esta bien, VFP hace suma de miles de registros en tiempo increible.

Muy bien, lo pondré así. Y para hacer varios cálculos simultáneamente en la tabla indexada ¿Qué opción os parece más interesante?:

1.- SUM FOR ...

2.- SEEK (primer registro del intervalo)
SUM WHILE ...

3.- SELECT SUM ... (TO ARRAY...)

Gracias y un saludo, Mario

Puedes hacer varios calculos a la vez, yo siempre uso CALCULATE. Ver la ayuda.

Hola Mario,

Tambien lo puede hacer por medio de un filtro.

De acuerdo a un dato de la grilla de arriba muestras en la grilla de abajo solos los datos del cliente seleccionado arriba.

Por ejemplo:

Selec tabla
Set filter to alltrim(cCliente)=alltrim(Cliente)
go top
thisform.grdGrilladeAbajo.recordsource="Tabla"
thisform.grdGrilladeAbajo.column1.controlSource="Tabla.Cliente"

Asi no te mostrara todos los campos de la tabla, solo te mostrara los del cliente selecciondao.

Un saludo, Helder

Yo tengo un problema con la suma de un columna en la grid, lo que me sucede es que yo empleo una Tabla temporal, y no puede realizar la suma

Alguien que sepa como sumar una columna empleando un cursor y en k metodo se debe colocar

Me ayudo mucho tu respuesta Gracias..

en el load de tu formulario creas el siguiente cursor
SELECT detallepedido, cantidad, precio, codigopedido, codigocliente FROM pedido;
WHERE codigocliente=0;
INTO CURSOR temp1 READWRITE
SELECT detallepedido, cantidad, precio, codigopedido, codigocliente FROM pedido;
WHERE codigocliente=0;
INTO CURSOR temp2 READWRITE
son iguales uno se llama temp1 y el otro temp2

en el grid 1 (de clientes) en el procedimiento CLICK o AFTERROWCOLCHANGE deberas escribir

thisform.grid2.recordsource="temp2"
SELECT detallepedido, cantidad, precio, codigopedido, codigocliente FROM pedido;
WHERE cocidogcliente=clientes.codigocliente; &&&esto funciona como filtro
( si vas a poner mas condiciones se hace con AND cantidad>100;)
AND cantidad>=100;&&& (ejemplo te mustra todo los pedidos de ese cliente cuya cantidad >=100)
INTO CURSOR temp1 READWRITE
thisform.grid2.recordsource="temp1"

sum precio to thisform.text1.value
sum cantidad thisform.text2.value
clear

para el grid2 en el cuadro de propiedades en recordsource=temp1 y recordsourcetype=alias en columncount = a la cantidad de columnas que quieras mostrar en el grid

cada vez que cliclees en el grid de clientes se refrescara el grid de pedidos y los resultados de todos los pedidos de ese cliente

buenas tardes

tengo un problemita estoy haciendo una boleta de venta desde otra lista q lo hice de datos del los productos q tengo -
bueno en un grid se tiene q estar agregando el producto q se va seleccionando (nombre producto, precio, catidad, total) mientras voy selecionando y al final mediante un text quiero q sume el total general de todos los productos pedidos

(todo esto dentro de un mismo formulario)en visual foxpro
porfavor ¡¡¡¡¡¡¡¡¡¡¡¡
me podrian ayudar soy muy novato...