Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Setting a Filter
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00138535
Message ID:
00138574
Views:
11
>I have two ways that I could use to set a filter in a table in a form's dataenvironment.
>I'd greatly appreciate some comment or suggestions about which way is best or any alternatives
>
>1.. (The old way?)
>oldSel= SELECT()
>SELECT MyAlias
>SET FILTER TO myExpression
>SELECT (m.oldSel)
>
>2.. (Using the DE)
>oCursor= GetCursor(THISFORM, "myalias") && GetCursor defined below
>oCursor.filter= "myExpression"
>
>An interesting difference between 1 and 2 is that 2 moves the record pointer back to the first matching record. SET FILTER never moves the record pointer at all.
>
>
Function GetCursor
>* returns a cursor object from the dataenvironment of the given form and alias
>LPARAMETER oFrm, ;		&& the form
>	cAlias				&& the alias we are looking for
>LOCAL ARRAY a_Obj[1]
>LOCAL cObj, oObj
>* get array of object names in dataenvironment
>AMEMBERS(a_Obj, m.oFrm.Dataenvironment, 2)
>FOR EACH cObj IN a_Obj
>	oObj= EVALUATE("m.oFrm.Dataenvironment."+ m.cObj)
>	IF m.oObj.BaseClass = "Cursor" ;
>			AND UPPER(m.oObj.Alias) = UPPER(m.cAlias)
>		* found it
>		RETURN m.oObj
>		*<<<<<<<<<<<
>	ENDIF
>ENDFOR
>RETURN .NULL.
>
Why not use a parametized view and pass a parm to the form that is used by the view?

Robert
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform