Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
THISFORM can only be used within a method
Message
De
12/01/2007 12:29:56
Dragan Nedeljkovich (En ligne)
Now officially retired
Zrenjanin, Serbia
 
 
À
12/01/2007 12:27:20
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 7 SP1
OS:
Windows XP SP2
Divers
Thread ID:
01185055
Message ID:
01185131
Vues:
18
>>
>>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.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform