FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Tdolphin y el fillarray
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Tdolphin y el fillarray
Posted: Thu Dec 12, 2019 11:45 PM
Hola.
Code (fw): Select all Collapse
aPaises := oCn:Execute( "select pais from paises" )


esto me trae un ARRAY con varias columnas, yo necesito solamente la columna de del dato de "pais" no con todo el resto,
como deberia de hacerlo?

gracias.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Tdolphin y el fillarray
Posted: Fri Dec 13, 2019 02:26 AM
goosfancito wrote:Hola.
Code (fw): Select all Collapse
aPaises := oCn:Execute( "select pais from paises" )


esto me trae un ARRAY con varias columnas, yo necesito solamente la columna de del dato de "pais" no con todo el resto,
como deberia de hacerlo?

gracias.

Are you asking the question about TDolphin?

With TDolphin, oCn:Execute( query ) returns a logical value, success of failure of execution of the query. This does not return an array.

If you are using this with FWH MySql library, then
Code (fw): Select all Collapse
oCn:Execute( "select pais from paises" )

returns an array with single column.
Regards



G. N. Rao.

Hyderabad, India
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: Tdolphin y el fillarray
Posted: Fri Dec 13, 2019 03:03 AM

I asking with tDolphin

Thanks

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM
Re: Tdolphin y el fillarray
Posted: Fri Dec 13, 2019 11:57 AM
Hola Gustavo:
Prueba con el siguiente codigo en TDolphin
Code (fw): Select all Collapse
aPaises:= oCn:Query("SELECT pais FROM paises"):FillArray(,{"pais"})


Para ser mas claro, podrias tener una consulta con varios campos y llenar un arreglo con cualquier campo que tengas en la consulta
Code (fw): Select all Collapse
oQry:= oCn:Query("SELECT codigo,pais,continente FROM paises"
aPaises:= oQry:FillArray(,{"pais"})
aCodigos := oQry:FillArray(,{"codigo"})


Espero te sirva
Posts: 1286
Joined: Mon Feb 25, 2008 02:54 PM
Re: Tdolphin y el fillarray
Posted: Fri Dec 13, 2019 02:42 PM

/****************/
function QueryRetornaArray( cQuery, oServerAuxiliar )
/

/
local aDados, oQryArray

Default oServerAuxiliar := M->oServer

if HB_IsNil(oServerAuxiliar)
oServerAuxiliar := M->oServer
endif

oQryArray := oServerAuxiliar:Query( cQuery )
aDados := oQryArray:FillArray()

oQryArray:End()

return(aDados)

ubiratanmga@gmail.com

FWH24.04
BCC7.3
HARBOUR3.2
xMate
Pelles´C
TDolphin
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: Tdolphin y el fillarray
Posted: Fri Dec 13, 2019 10:50 PM
gracias a ambos.
pero... no me devuelve esto:
adato[1]
adato[2]
adato[3]

sino esto:

adatos[1][1]
adatos[1][2]
....

y lo que necesito es solo los "nombres" no con toda la informacion adicional. se Entiende?

gracias.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Tdolphin y el fillarray
Posted: Sat Dec 14, 2019 02:27 AM
Code (fw): Select all Collapse
aPaises:= oQry:FillArray(,{"pais"})
aPaises := ArrTransform( aPaises )[ 1 ]
Regards



G. N. Rao.

Hyderabad, India
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: Tdolphin y el fillarray
Posted: Sat Dec 14, 2019 03:13 PM

esa no sabia. gracias

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

Continue the discussion