BTW guys. Sorry, but the code is not in the form's .Init(), but in a method that fires when the Operator is changed (i.e. getting all the bus routes that apply to a part. bus operator).

I must be going snow-blind


>>>

>>>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" )+ [}]