SELECT BY FREQUENCY

Agregando una nota...



El numero en la columna3 (valor) es el indicativo de quantas lineas deben
ser seleccionadas. Siempre las del más alta cantidad.


Colt

-
PortalFox :: Nada corre como un zorr
http://www.portalfox.co

PortalFox - NNTP Forum Gatewa

Estás seguro? El código que mandé hace exactamente lo que tu escribiste

colt clint wrote:

Hola!

En relación al ascript de Esparta, el selecciona todos los registro,
cuando en verdad debería seleccionar solamente los de más alto valor - de
acuerdo con el número de líneas de columna3 y el id de la columna1.

Gracias


Colt


PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway

¸,ø¤º°`°º¤ø,¸¸,ø¤º°`°º¤ø,¸¸,ø¤º°`°º¤ø,¸¸,ø¤º°`°º

Espartaco Palma Martínez
SysOp http://www.PortalFox.com
México D.F.
MoBlogs!
http://weblogs.golemproject.com/esparta/
http://www.espartha.com/blog/

Estimado Esparta,

Funciona perfectamente!

Es exactamente esto que estoy a buscar.

Por favor, como substituo la lista por una tabla?


TEXT TO lcData NOSHOW
iid,valor,cantidad

ENDTEXT
STRTOFILE(lcData,"mydata.csv")
CREATE CURSOR test (iid int, valor int, cantidad int)
APPEND FROM mydata.csv TYPE csv


Saludos

Colt


PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway

Vuelvo a insistir, el código retorna los datos que tu pediste:

TEXT TO lcData NOSHOW
iid,valor,cantidad
1,34,2
1,12,2
1,8,2
1,1,2
2,19,3
2,17,3
2,11,3
2,9,3
3,22,3
3,15,3
3,13,3
3,8,3
4,18,1
4,5,1
ENDTEXT
STRTOFILE(lcData,"mydata.csv")
CREATE CURSOR test (iid int, valor int, cantidad int)
APPEND FROM mydata.csv TYPE csv


SELECT DISTINCT iid, cantidad ;
FROM Test INTO CURSOR cBase

*** Crear un cursor donde almacenaremos todos los máximos

CREATE CURSOR cResults (iid int, valor int)

*** Recorreremos el cursor de IDs y cantidad de máximos a obtener
SELECT "cBase"
SCAN
*** Creamos un cursor con la cantidad de máximos requeridos
*** en base de la tabla donde sacaremos los valores
SELECT TOP cBase.Cantidad iid, valor ;
FROM Test ;
ORDER BY iid, valor DESC ;
WHERE iid = cBase.iID ;
INTO CURSOR cMaximos ;
NOFILTER
*** Seleccionamos el cursor que almacenará los datos para ...
SELECT "cResults"
*** ... Agregarle los datos que sacaremos uno a uno.
APPEND FROM DBF("cMaximos")
ENDSCAN

*** Cerrar los cursores que ya no utilizarás.

USE IN (SELECT("cBase"))
USE IN (SELECT("cMaximos"))


SELECT cResults
BROW

Copia y pega el código arriba mostrado en tu Command Window,
seleccionalo en el command Window y presiona ENTER, verás el cursor con
los resultados que pediste, segun los datos de entrada que nos comentaste.

¸,ø¤º°`°º¤ø,¸¸,ø¤º°`°º¤ø,¸¸,ø¤º°`°º¤ø,¸¸,ø¤º°`°º

Espartaco Palma Martínez
SysOp http://www.PortalFox.com
México D.F.
MoBlogs!
http://weblogs.golemproject.com/esparta/
http://www.espartha.com/blog/

colt clint wrote:

Agregando una nota...



El numero en la columna3 (valor) es el indicativo de quantas lineas deben
ser seleccionadas. Siempre las del más alta cantidad.


Colt


PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway

¸,ø¤º°`°º¤ø,¸¸,ø¤º°`°º¤ø,¸¸,ø¤º°`°º¤ø,¸¸,ø¤º°`°º

Espartaco Palma Martínez
SysOp http://www.PortalFox.com
México D.F.
MoBlogs!
http://weblogs.golemproject.com/esparta/
http://www.espartha.com/blog/

Esparta,

Mil disculpas!

Pero, es interesante que el script principal trabaja mejor despues de
tuviera escrito el otro script.

O sea los 2 script junto trabajan mejor - aunque sea un ejemplo - que el
script principal + salida directamente de la base de datos.

Colt

-
PortalFox :: Nada corre como un zorr
http://www.portalfox.co

PortalFox - NNTP Forum Gatewa