Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Why does this work?
Message
From
30/09/2003 19:29:25
Jill Derickson
Software Specialties
Saipan, CNMI
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Why does this work?
Miscellaneous
Thread ID:
00833658
Message ID:
00833658
Views:
49
This is code in a method of a form:
LOCAL lcCli_pk

REPLACE CLI_StatusFK WITH giClientStatusInitialScreen, ;
	cClientStatus WITH gcCLientStatusInitialScreen IN v_Client
THISFORM.SSiclientstatusb4edit = 0

lcCli_pk = v_Client.Cli_PK	&& gets set in AddAction
=REQUERY( "v_ClientProblemList")
=REQUERY( "v_clientappointmentlist")
=REQUERY( "v_clientencounterlist" )

** 10/01/2003 try to get required ScreenDate set up and refresh client problems
IF TYPE( "THISFORM.pgfPageRefresh1.Page3.CTRscreening" ) <> "O"
	.Page3.Builder_ctrClientScreeningControls_cg.UIENABLE(.T., .T.)	&& do not Activate
ENDIF
There is no "WITH" statement, yet the line:
.Page3.Builder_ctrClientScreeningControls_cg.UIENABLE(.T., .T.)
executes properly...i don't understand...j
Next
Reply
Map
View

Click here to load this message in the networking platform