pasar objetos por parámetros

Pasa el array por referencia.

Ej: Mifuncion(@laArray)


Salu2 Rafael Cano
rcano(@)hotpop.com
Jaén - España


cesar ruiz escribió:

hola, estoy tratando de programar en 3 capas con visual fox 8 y no puedo
lograr devolver un objeto o un array desde un procedimiento hacia otro
procedimiento que lo llama.

yo intenté devolver el objeto o array con el return, pero en el caso del
array solo devuelve el primer elemento de la misma.

Si pueden ayudarme se los agradeceré eternamente pues lo nesesito para
trabajar.

saludos.

Cesar


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

PortalFox - NNTP Forum Gateway

Hola Cesar.
Lo hago de la siguiente manera.

loCData = CREATEOBJECT('Empty')
ADDPROPERTY(loCData, 'iIdTitulo', iIdTitulo)
ADDPROPERTY(loCData, 'cCliCaption', '')
ADDPROPERTY(loCData, 'cIdCiudad', cIdCiudad)
ADDPROPERTY(loCData, 'cCityCaption', '')
TRY
loLayerMasterAbc = CREATEOBJECT("Mastersabc.MastersAbcDb")
loLayerMasterAbc.ClienteDataComplement(loCData)
&&En ClienteDataComplement modifico las propiedades del objeto y listo
loLayerMasterAbc = Null
CATCH TO loException
MESSAGEBOX("No se puede cargar MastersAbcDb..!" + CHR(13) + 'Error:' +
TRANSFORM(loException.ErrorNo) + " " + loException.Message, 0+16,
ERRORTITLE_LOC)
ENDTRY

Saludos.
Mauricio Pulla.
Cuenca-Ecuador

"cesar ruiz" escribió en el mensaje
news:

hola, estoy tratando de programar en 3 capas con visual fox 8 y no puedo
lograr devolver un objeto o un array desde un procedimiento hacia otro
procedimiento que lo llama.

yo intenté devolver el objeto o array con el return, pero en el caso del
array solo devuelve el primer elemento de la misma.

Si pueden ayudarme se los agradeceré eternamente pues lo nesesito para
trabajar.

saludos.

Cesar


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

PortalFox - NNTP Forum Gateway