Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
THISFORM can only be used within a method
Message
From
12/01/2007 12:29:56
Dragan Nedeljkovich (Online)
Now officially retired
Zrenjanin, Serbia
 
 
To
12/01/2007 12:27:20
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 7 SP1
OS:
Windows XP SP2
Miscellaneous
Thread ID:
01185055
Message ID:
01185131
Views:
17
>>
>>With Thisform
>>  .nOperator	= NOTETM.OPERATOR
>>  .cRoute		= NOTETM.ROUTE
>>  .dStartDate	= NOTETM.START_DATE
>>  .dEndDate       = NOTETM.END_DATE
>>  .pgfMainPageFrame.Page2.Refresh()
>>  .lContracts	= .F.	&& Posit
>>* For Now>	  lcFilter = "OPERATOR = " + ALLTRIM( STR( .nOperator)) + " and " + ;
>>* For Now>	  	    "END_DATE >= CTOD('" + DTOC( .dStartDate) + "')" + ;
>>* For Now>	  	    " or EMPTY( END_DATE)"
>>  lnOperator	= .nOperator
>>  ldDate		= .dStartDate
>>  lcFilter	= "OPERATOR = " + ALLTRIM( STR( lnOperator)) + " and " + ;
>>  	           "END_DATE >= ('" + DTOC( ldDate) + "') or EMPTY( END_DATE)"
>>  Select RTEFAM
>>  Set Filter To &lcFilter
>>  ...
>>
>
>It should be:
>"END_DATE >={" + DTOC( ldDate) + "} or ...
[EndDate>= {^]+Transform(Dtos(ldDate), "@R 9999-99-99" )+ [}]

back to same old

the first online autobiography, unfinished by design
What, me reckless? I'm full of recks!
Balkans, eh? Count them.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform