FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Quisiera saber
Posts: 505
Joined: Sat Apr 22, 2006 09:09 AM
Quisiera saber
Posted: Thu Jun 25, 2009 04:15 PM
Hola a todos:
Quisiera saber si hay alguna manera de saber el Numero de SELECT que hay en un momento determinado, por ejemplo yo utilizo una FUNCTION para buscar en un fichero textos y la llamo desde muchos sitios del programa y lo que quiero es que antes del RETURN poner el SELECT con el que entro.

Code (fw): Select all Collapse
Function datotext(zOpc)

aqui saber con el numero que entra

SELECT 999
USE TEXTOS
locate for numero = zOpc
ztex = trexto01

poner el mismo con el que entro

Return (Ztex)


El numero que quiero saber si se puede conseguir es el 999 del SELECT en el ejemplo.

Un saludo

Calos
Colt Hop ED, S.L.
Carlos Blas Fernández Domínguez
Tlfo: 645847093
E-Mail: carlos@colthop.es

Nunca se termina de aprender, por eso necesito siempre ayuda.
Posts: 383
Joined: Tue Oct 11, 2005 01:01 PM
Re: Quisiera saber
Posted: Thu Jun 25, 2009 04:23 PM

antSelect := SELECT()

tu codigo....

SELECT( antSelect )

Saludos

Pedro Gonzalez
Posts: 505
Joined: Sat Apr 22, 2006 09:09 AM
Re: Quisiera saber
Posted: Thu Jun 25, 2009 04:51 PM

Gracias Pedro por tu informacion me vas has quitado muchos problemas, de nuevo gracias.

Carlos

Colt Hop ED, S.L.
Carlos Blas Fernández Domínguez
Tlfo: 645847093
E-Mail: carlos@colthop.es

Nunca se termina de aprender, por eso necesito siempre ayuda.
Posts: 299
Joined: Mon Oct 22, 2007 03:03 PM
Re: Quisiera saber
Posted: Thu Jun 25, 2009 05:21 PM

Recomiendo hacer esto:

FUNCTION ALGO()


Local nOld_arch:=SELECT()
.
.
.
.
.
.
.
IF nOld_arch>0
SELECT(nOld_arch)
ENDIF
RETURN

Para evitar cualquier posibilidad de error

Saludos



Angel, Valencia, Venezuela



xH .997 - FW 7.9 - BCC55 - WorkShop - MySql
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Quisiera saber
Posted: Thu Jun 25, 2009 05:58 PM

colthop

Me parece que es más recomendable usar ALIAS, no te parece ?

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: Quisiera saber
Posted: Thu Jun 25, 2009 06:36 PM

Lo mejor es con ALIAS como indica Armando

Use USUARIOS Alias USERS NEW SHARED

Use CENTROS Alias CC NEW SHARED

Luego vas a tu funcion multiple
BUSCA("USERS")
...
BUSCA("CC")

....

Function BUSCA(cAlias)
DbSelectArea(cAlias)
//

Return

Saludos,



Adhemar C.
Posts: 505
Joined: Sat Apr 22, 2006 09:09 AM
Re: Quisiera saber
Posted: Fri Jun 26, 2009 08:25 AM

Gracias a todos por vuestros comentarios, pero lo tengo estipulado todo con SELECT en vez de con ALIAS y cambiar todo seria mucho trabajo mas añadido al que tengo y con la solucion que me dieron el otro dia me funciona como yo queria y ya se sabe si funciona bien no te metas en mas lios por si acaso.

Un saludo a todos

Gracias

Carlos

Colt Hop ED, S.L.
Carlos Blas Fernández Domínguez
Tlfo: 645847093
E-Mail: carlos@colthop.es

Nunca se termina de aprender, por eso necesito siempre ayuda.
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Re: Quisiera saber
Posted: Tue Jun 30, 2009 03:10 PM
Carlos
mas allá de que tengas todo implementado con Select; sería bueno que vayas pensando en cambiarlo por Alias, como otros colegas te sugieren.
Te dejo un artĂ­clo interesante, al respecto
http://objetopersistente.blogspot.com/2008/02/quien-es-alias.html

Saludos
Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina

Continue the discussion