If you use VFP as GUI-tier as "problem domain"-tier you can use array for transfert data between tier.
Small example:
Client:
oServer=CREATEOBJECT("MyLib.MyClass")
oServer.SomeMethod() && open remote table
=COMARRAY(oServer,11)
DECLARE aStruct[1,1]
=oServer.GetStructure(@aStruct)
CREATE CURSOR _DataSet FROM ARRAY aStruct && make empty cursor on GUI
DECLARE aData[1,1]
=oServer.Fetch(@aData)
INSERT INTO _DataSet FROM ARRAY aData && fill cursor on GUI
Server:
FUNCTION GetStructure
LPARAMETER aStr
RETURN AFIELDS(aStr,RemoteCursor)
ENDFUNC
FUNCTION Fetch
LPARAMETER aRecordSet
COPY TO ARRAY aRecordSet ALL
ENDFUNC
Précédent
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement