Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
IF command - order of items - results
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 8 SP1
OS:
Windows XP SP2
Network:
Windows 2008 Server
Database:
Visual FoxPro
Application:
Desktop
Miscellaneous
Thread ID:
01513802
Message ID:
01513807
Views:
57
>Yes FoxPro always evaluates conditions from the left to right. Why do you need a form method to perform SEEK?
>
>>

I guess to have a standard way to send in the other parameters....
LPARAMETERS txItem,tcTable,tcOrder,tlExact
LOCAL lcOldExact,llRetVal

lcOldExact = SET("EXACT")

IF TYPE("tlExact") = "N"
	DO CASE
		CASE tlExact = 0
			SET EXACT OFF
		CASE tlExact = 1
			SET EXACT ON
	ENDCASE
ENDIF

IF !EMPTY(tcOrder)
	IF SEEK(txItem,tcTable,tcOrder)
		llRetVal = .T.
	ELSE
		llRetVal = .F.
	ENDIF
ELSE
	IF SEEK(txItem,tcTable)
		llRetVal = .T.
	ELSE
		llRetVal = .F.
	ENDIF
ENDIF

SET EXACT &lcOldExact

RETURN llRetVal
Tommy Tillman A+ NetWork+ MCP
Previous
Reply
Map
View

Click here to load this message in the networking platform