Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Change table name - get a Compile error... say what?
Message
 
To
All
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Change table name - get a Compile error... say what?
Environment versions
Visual FoxPro:
VFP 8 SP1
OS:
Windows XP SP2
Network:
Windows 2008 Server
Database:
Visual FoxPro
Application:
Desktop
Miscellaneous
Thread ID:
01515696
Message ID:
01515696
Views:
111
Hey Gang!

Question.

I was trying to change the code in the snippet below... for a method called m_getgridbackground

The original code is commented out... and the changed code is below that.

The change I made was to change the reorder table name to tReorder.

When I do this, and try to go to another method, Foxpro throws up an error...

"COMPILE Command contains unrecognized phrase/keyword"...

What the????
LOCAL lcBackColor

*!*	lcBackColor = 'IIF(reorder.Quan_ship = 0, RGB(255,128,255), ;
*!*			IIF(reorder.Quan_ship < reorder.Quan_Onord, RGB(255,255,128), ;
*!*			IIF(reorder.Quan_ship = reorder.Quan_Onord, RGB(255,255,255), ;
*!*			IIF(reorder.Quan_ship > reorder.Quan_Onord, RGB(0,255,255), RGB(255,255,255)))))'

lcBackColor = 'IIF(tReorder.Quan_ship = 0, RGB(255,128,255), ;
			IIF(tReorder.Quan_ship < tReorder.Quan_Onord, RGB(255,255,128), ;
			IIF(tReorder.Quan_ship = tReorder.Quan_Onord, RGB(255,255,255), ;
			IIF(tReorder.Quan_ship > tReorder.Quan_Onord, RGB(0,255,255), RGB(255,255,255)))))'
			
RETURN lcBackColor 
And here is code in Another method... called m_getgridforecolor that DOES compile !!
LOCAL lcForeColor

*TMT 06/23/2011 Changed to use tReorder table instead
*!*	lcForeColor = 'IIF(reorder.Quan_ship = 0, RGB(255,255,255), ;
*!*			IIF(reorder.Quan_ship < reorder.Quan_Onord, RGB(0,0,0), ;
*!*			IIF(reorder.Quan_ship = reorder.Quan_Onord, RGB(0,0,0), ;
*!*			IIF(reorder.Quan_ship > reorder.Quan_Onord, RGB(0,0,0), RGB(0,0,0)))))'

lcForeColor = 'IIF(tReorder.Quan_ship = 0, RGB(255,255,255), ;
		IIF(tReorder.Quan_ship < tReorder.Quan_Onord, RGB(0,0,0), ;
		IIF(tReorder.Quan_ship = tReorder.Quan_Onord, RGB(0,0,0), ;
		IIF(tReorder.Quan_ship > tReorder.Quan_Onord, RGB(0,0,0), RGB(0,0,0)))))'

RETURN lcForeColor 
Any ideas???? Thanks a bunch!!!
Tommy Tillman A+ NetWork+ MCP
Next
Reply
Map
View

Click here to load this message in the networking platform