Clipper/FiveWin - Valor Agregado

Hola!

Por favor, sería posible obtener su ayuda para construir una columna con los valores agregados de otra?

ANTES
id valor
1 34
1 12
1 8
1 1
2 19
2 17
2 11
3 12
3 5
4 18
4 5

DESPUÉS

id valor valor agregado
1 34 34
1 12 46
1 8 54
1 1 55
2 19 19
2 17 36
2 11 47
3 12 12
3 5 17
4 18 18
4 5 23

O sea los valores de la segunda columna serán agregados en la tercera, desde que el id no cambie.

Gracias por cualquiera ayuda,

saludos

Lebron Letchev
Buenos Aires

Lebron:

Lamento no poder ayudarte pero la realidad es que no entiendo el problema, recuerdo que en mis inicios claramente me dijeron "para resolver un problema, primero debes entender el problema", y resulta que no entiendo.

Saludos, Armando

mmm. a ver si entendi,

¿porque no usas un dbf con los campos id, col1,col2 ,... y vas llenando el col1 y col2 con lo que necesites ?, al final puedes convertirlo con SDF

saludos

Ok, lo ke kieres es una formula ke determine ke el siguiente id corresponda a la suma del mismo mas el anterior ?

Si es eso avisame.

Tronix

Tronix,

Esto mismo! Vale! Le agradezco si lo haceres.

Saludos

Lebron

Se me ocurre lo siguiente, aun y cuando desconozco si los punteros estan siendo leidos de una base de datos, pero improvisando:

Local nOrden / los punteros 1,2,3...talvez se toman de una base de datos
Local nValor / el contenido del puntero 34,12,8...
Local nAcum / acumula resultados
Local nLargo / largo de la secuencia, tal vez un LEN() o RECCOUNT()
Local nSec /inicio de lectura de datos
Local nAux /auxiliar para evaluar comparaciones

nAux := 1
For nSec = 1 to nLargo

DbGoto(nSec) / Si estas leyendo una base de datos, aki corres el registro,
/ en el fondo debes recorrer el listado, ya sea una DBF o
/ un array (1,34),(1,12)....., como sea debes tener una rutina
/ ke lo lea ( nValor:=Val(......) )

If nOrden = nAux // aki comienza la evaluación.
nAcum:=nAcum+nValor
Print nAcum
Else
nAcum:=0
nOrden:= nOrden+1
Endif
Next