In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Problem with FilterEval
Problem with FilterEval
Hi,
since I use Xailer 2 FilterEval does not work anymore.
::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
The value that is typed into the filter get is deleted automatically.
Filtering without using FilterEval works.
Best regards, Timm.
since I use Xailer 2 FilterEval does not work anymore.
::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
The value that is typed into the filter get is deleted automatically.
Filtering without using FilterEval works.
Best regards, Timm.
- ignacio
- Site Admin
- Mensajes: 9469
- Registrado: Lun Abr 06, 2015 8:00 pm
- Ubicación: Madrid, Spain
- Contactar:
Problem with FilterEval
Hello,
First column on sample datacontrolsDbfData1 uses the FilterEval property
and is working correctly here. Please send a sample. TIA.
Regards,
--
Ignacio Ortiz de Zúñiga
Xailer support / Soporte de Xailer
http://www.xailer.com
http://www.xailer.info
"Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hi,
>
> since I use Xailer 2 FilterEval does not work anymore.
>
> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>
> The value that is typed into the filter get is deleted automatically.
> Filtering without using FilterEval works.
>
> Best regards, Timm.
>
>
First column on sample datacontrolsDbfData1 uses the FilterEval property
and is working correctly here. Please send a sample. TIA.
Regards,
--
Ignacio Ortiz de Zúñiga
Xailer support / Soporte de Xailer
http://www.xailer.com
http://www.xailer.info
"Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hi,
>
> since I use Xailer 2 FilterEval does not work anymore.
>
> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>
> The value that is typed into the filter get is deleted automatically.
> Filtering without using FilterEval works.
>
> Best regards, Timm.
>
>
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
- ignacio
- Site Admin
- Mensajes: 9469
- Registrado: Lun Abr 06, 2015 8:00 pm
- Ubicación: Madrid, Spain
- Contactar:
Problem with FilterEval
Hello,
First column on sample datacontrolsDbfData1 uses the FilterEval property
and is working correctly here. Please send a sample. TIA.
Regards,
--
Ignacio Ortiz de Zúñiga
Xailer support / Soporte de Xailer
http://www.xailer.com
http://www.xailer.info
"Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hi,
>
> since I use Xailer 2 FilterEval does not work anymore.
>
> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>
> The value that is typed into the filter get is deleted automatically.
> Filtering without using FilterEval works.
>
> Best regards, Timm.
>
>
First column on sample datacontrolsDbfData1 uses the FilterEval property
and is working correctly here. Please send a sample. TIA.
Regards,
--
Ignacio Ortiz de Zúñiga
Xailer support / Soporte de Xailer
http://www.xailer.com
http://www.xailer.info
"Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hi,
>
> since I use Xailer 2 FilterEval does not work anymore.
>
> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>
> The value that is typed into the filter get is deleted automatically.
> Filtering without using FilterEval works.
>
> Best regards, Timm.
>
>
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
- ignacio
- Site Admin
- Mensajes: 9469
- Registrado: Lun Abr 06, 2015 8:00 pm
- Ubicación: Madrid, Spain
- Contactar:
Problem with FilterEval
Timm,
Be aware that the search string is processed by the datasource engine, so a
expression that will be OK for a DBF table may not work with ADO and the
opossite.
Regards,
--
Ignacio Ortiz de Zúñiga
Xailer support / Soporte de Xailer
http://www.xailer.com
http://www.xailer.info
"Ignacio Ortiz de Zúñiga" <NoNameToAvoidSpam@xailer.com> escribió en el
mensaje news:4a70101a$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hello,
>
> First column on sample datacontrolsDbfData1 uses the FilterEval property
> and is working correctly here. Please send a sample. TIA.
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
> Xailer support / Soporte de Xailer
> http://www.xailer.com
> http://www.xailer.info
> "Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
> news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Hi,
>>
>> since I use Xailer 2 FilterEval does not work anymore.
>>
>> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>>
>> The value that is typed into the filter get is deleted automatically.
>> Filtering without using FilterEval works.
>>
>> Best regards, Timm.
>>
>>
>
>
>
Be aware that the search string is processed by the datasource engine, so a
expression that will be OK for a DBF table may not work with ADO and the
opossite.
Regards,
--
Ignacio Ortiz de Zúñiga
Xailer support / Soporte de Xailer
http://www.xailer.com
http://www.xailer.info
"Ignacio Ortiz de Zúñiga" <NoNameToAvoidSpam@xailer.com> escribió en el
mensaje news:4a70101a$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hello,
>
> First column on sample datacontrolsDbfData1 uses the FilterEval property
> and is working correctly here. Please send a sample. TIA.
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
> Xailer support / Soporte de Xailer
> http://www.xailer.com
> http://www.xailer.info
> "Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
> news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Hi,
>>
>> since I use Xailer 2 FilterEval does not work anymore.
>>
>> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>>
>> The value that is typed into the filter get is deleted automatically.
>> Filtering without using FilterEval works.
>>
>> Best regards, Timm.
>>
>>
>
>
>
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
- ignacio
- Site Admin
- Mensajes: 9469
- Registrado: Lun Abr 06, 2015 8:00 pm
- Ubicación: Madrid, Spain
- Contactar:
Problem with FilterEval
Timm,
Be aware that the search string is processed by the datasource engine, so a
expression that will be OK for a DBF table may not work with ADO and the
opossite.
Regards,
--
Ignacio Ortiz de Zúñiga
Xailer support / Soporte de Xailer
http://www.xailer.com
http://www.xailer.info
"Ignacio Ortiz de Zúñiga" <NoNameToAvoidSpam@xailer.com> escribió en el
mensaje news:4a70101a$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hello,
>
> First column on sample datacontrolsDbfData1 uses the FilterEval property
> and is working correctly here. Please send a sample. TIA.
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
> Xailer support / Soporte de Xailer
> http://www.xailer.com
> http://www.xailer.info
> "Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
> news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Hi,
>>
>> since I use Xailer 2 FilterEval does not work anymore.
>>
>> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>>
>> The value that is typed into the filter get is deleted automatically.
>> Filtering without using FilterEval works.
>>
>> Best regards, Timm.
>>
>>
>
>
>
Be aware that the search string is processed by the datasource engine, so a
expression that will be OK for a DBF table may not work with ADO and the
opossite.
Regards,
--
Ignacio Ortiz de Zúñiga
Xailer support / Soporte de Xailer
http://www.xailer.com
http://www.xailer.info
"Ignacio Ortiz de Zúñiga" <NoNameToAvoidSpam@xailer.com> escribió en el
mensaje news:4a70101a$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hello,
>
> First column on sample datacontrolsDbfData1 uses the FilterEval property
> and is working correctly here. Please send a sample. TIA.
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
> Xailer support / Soporte de Xailer
> http://www.xailer.com
> http://www.xailer.info
> "Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
> news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Hi,
>>
>> since I use Xailer 2 FilterEval does not work anymore.
>>
>> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>>
>> The value that is typed into the filter get is deleted automatically.
>> Filtering without using FilterEval works.
>>
>> Best regards, Timm.
>>
>>
>
>
>
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Problem with FilterEval
Ignacio,
there is a little bug in METHOD GetFilterExp( oDBBrowse ) CLASS XDbfDataSet, I think.
IF ! Empty( cVal )
cExp := oCol:FilterEval
IF Empty( cExp ) .and. Valtype( oCol:oDataField ) == "O"
WITH OBJECT oCol:oDataField
DO CASE
CASE :cType == "C" .OR. :cType == "M"
cVal := Upper( cVal )
lComBef := ( Left( cVal, 1 ) == "%" )
lComAft := ( Right( cVal, 1 ) == "%" )
IF lComBef .AND. !lComAft
cVal := Substr( cVal, 2 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Right( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSEIF !lComBef .AND. lComAft
cVal := Substr( cVal, 1, Len( cVal ) - 1 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Left( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSE
IF lComBef .AND. lComAft
cVal := Substr( cVal, 2, Len( cVal ) - 2 )
ENDIF
cExp += "'%' $ Upper( " + :cDbfName + " )"
ENDIF
Example of what happens if the red marked code is not added:
cExp := oCol:FilterEval + "'%' $ Upper( " + :cDbfName + " )"
Best regards, Timm.
"Ignacio Ortiz de Zúñiga" <NoNameToAvoidSpam@xailer.com> schrieb im Newsbeitrag news:4a70101a$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hello,
>
> First column on sample datacontrolsDbfData1 uses the FilterEval property
> and is working correctly here. Please send a sample. TIA.
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
> Xailer support / Soporte de Xailer
> http://www.xailer.com
> http://www.xailer.info
> "Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
> news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Hi,
>>
>> since I use Xailer 2 FilterEval does not work anymore.
>>
>> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>>
>> The value that is typed into the filter get is deleted automatically.
>> Filtering without using FilterEval works.
>>
>> Best regards, Timm.
>>
>>
>
>
--
there is a little bug in METHOD GetFilterExp( oDBBrowse ) CLASS XDbfDataSet, I think.
IF ! Empty( cVal )
cExp := oCol:FilterEval
IF Empty( cExp ) .and. Valtype( oCol:oDataField ) == "O"
WITH OBJECT oCol:oDataField
DO CASE
CASE :cType == "C" .OR. :cType == "M"
cVal := Upper( cVal )
lComBef := ( Left( cVal, 1 ) == "%" )
lComAft := ( Right( cVal, 1 ) == "%" )
IF lComBef .AND. !lComAft
cVal := Substr( cVal, 2 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Right( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSEIF !lComBef .AND. lComAft
cVal := Substr( cVal, 1, Len( cVal ) - 1 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Left( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSE
IF lComBef .AND. lComAft
cVal := Substr( cVal, 2, Len( cVal ) - 2 )
ENDIF
cExp += "'%' $ Upper( " + :cDbfName + " )"
ENDIF
Example of what happens if the red marked code is not added:
cExp := oCol:FilterEval + "'%' $ Upper( " + :cDbfName + " )"
Best regards, Timm.
"Ignacio Ortiz de Zúñiga" <NoNameToAvoidSpam@xailer.com> schrieb im Newsbeitrag news:4a70101a$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hello,
>
> First column on sample datacontrolsDbfData1 uses the FilterEval property
> and is working correctly here. Please send a sample. TIA.
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
> Xailer support / Soporte de Xailer
> http://www.xailer.com
> http://www.xailer.info
> "Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
> news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Hi,
>>
>> since I use Xailer 2 FilterEval does not work anymore.
>>
>> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>>
>> The value that is typed into the filter get is deleted automatically.
>> Filtering without using FilterEval works.
>>
>> Best regards, Timm.
>>
>>
>
>
--
Problem with FilterEval
Ignacio,
there is a little bug in METHOD GetFilterExp( oDBBrowse ) CLASS XDbfDataSet, I think.
IF ! Empty( cVal )
cExp := oCol:FilterEval
IF Empty( cExp ) .and. Valtype( oCol:oDataField ) == "O"
WITH OBJECT oCol:oDataField
DO CASE
CASE :cType == "C" .OR. :cType == "M"
cVal := Upper( cVal )
lComBef := ( Left( cVal, 1 ) == "%" )
lComAft := ( Right( cVal, 1 ) == "%" )
IF lComBef .AND. !lComAft
cVal := Substr( cVal, 2 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Right( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSEIF !lComBef .AND. lComAft
cVal := Substr( cVal, 1, Len( cVal ) - 1 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Left( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSE
IF lComBef .AND. lComAft
cVal := Substr( cVal, 2, Len( cVal ) - 2 )
ENDIF
cExp += "'%' $ Upper( " + :cDbfName + " )"
ENDIF
Example of what happens if the red marked code is not added:
cExp := oCol:FilterEval + "'%' $ Upper( " + :cDbfName + " )"
Best regards, Timm.
"Ignacio Ortiz de Zúñiga" <NoNameToAvoidSpam@xailer.com> schrieb im Newsbeitrag news:4a70101a$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hello,
>
> First column on sample datacontrolsDbfData1 uses the FilterEval property
> and is working correctly here. Please send a sample. TIA.
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
> Xailer support / Soporte de Xailer
> http://www.xailer.com
> http://www.xailer.info
> "Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
> news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Hi,
>>
>> since I use Xailer 2 FilterEval does not work anymore.
>>
>> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>>
>> The value that is typed into the filter get is deleted automatically.
>> Filtering without using FilterEval works.
>>
>> Best regards, Timm.
>>
>>
>
>
--
there is a little bug in METHOD GetFilterExp( oDBBrowse ) CLASS XDbfDataSet, I think.
IF ! Empty( cVal )
cExp := oCol:FilterEval
IF Empty( cExp ) .and. Valtype( oCol:oDataField ) == "O"
WITH OBJECT oCol:oDataField
DO CASE
CASE :cType == "C" .OR. :cType == "M"
cVal := Upper( cVal )
lComBef := ( Left( cVal, 1 ) == "%" )
lComAft := ( Right( cVal, 1 ) == "%" )
IF lComBef .AND. !lComAft
cVal := Substr( cVal, 2 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Right( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSEIF !lComBef .AND. lComAft
cVal := Substr( cVal, 1, Len( cVal ) - 1 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Left( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSE
IF lComBef .AND. lComAft
cVal := Substr( cVal, 2, Len( cVal ) - 2 )
ENDIF
cExp += "'%' $ Upper( " + :cDbfName + " )"
ENDIF
Example of what happens if the red marked code is not added:
cExp := oCol:FilterEval + "'%' $ Upper( " + :cDbfName + " )"
Best regards, Timm.
"Ignacio Ortiz de Zúñiga" <NoNameToAvoidSpam@xailer.com> schrieb im Newsbeitrag news:4a70101a$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hello,
>
> First column on sample datacontrolsDbfData1 uses the FilterEval property
> and is working correctly here. Please send a sample. TIA.
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
> Xailer support / Soporte de Xailer
> http://www.xailer.com
> http://www.xailer.info
> "Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
> news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Hi,
>>
>> since I use Xailer 2 FilterEval does not work anymore.
>>
>> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>>
>> The value that is typed into the filter get is deleted automatically.
>> Filtering without using FilterEval works.
>>
>> Best regards, Timm.
>>
>>
>
>
--
- ignacio
- Site Admin
- Mensajes: 9469
- Registrado: Lun Abr 06, 2015 8:00 pm
- Ubicación: Madrid, Spain
- Contactar:
Problem with FilterEval
Timm,
You are right. Fixed. Thank you for your feedback.
Regards,
--
Ignacio Ortiz de Zúñiga
Xailer support / Soporte de Xailer
http://www.xailer.com
http://www.xailer.info
"Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje news:[email=4a703aa9@svctag-j7w3v3j....]4a703aa9@svctag-j7w3v3j....[/email]
Ignacio,
there is a little bug in METHOD GetFilterExp( oDBBrowse ) CLASS XDbfDataSet, I think.
IF ! Empty( cVal )
cExp := oCol:FilterEval
IF Empty( cExp ) .and. Valtype( oCol:oDataField ) == "O"
WITH OBJECT oCol:oDataField
DO CASE
CASE :cType == "C" .OR. :cType == "M"
cVal := Upper( cVal )
lComBef := ( Left( cVal, 1 ) == "%" )
lComAft := ( Right( cVal, 1 ) == "%" )
IF lComBef .AND. !lComAft
cVal := Substr( cVal, 2 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Right( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSEIF !lComBef .AND. lComAft
cVal := Substr( cVal, 1, Len( cVal ) - 1 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Left( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSE
IF lComBef .AND. lComAft
cVal := Substr( cVal, 2, Len( cVal ) - 2 )
ENDIF
cExp += "'%' $ Upper( " + :cDbfName + " )"
ENDIF
Example of what happens if the red marked code is not added:
cExp := oCol:FilterEval + "'%' $ Upper( " + :cDbfName + " )"
Best regards, Timm.
"Ignacio Ortiz de Zúñiga" <NoNameToAvoidSpam@xailer.com> schrieb im Newsbeitrag news:4a70101a$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hello,
>
> First column on sample datacontrolsDbfData1 uses the FilterEval property
> and is working correctly here. Please send a sample. TIA.
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
> Xailer support / Soporte de Xailer
> http://www.xailer.com
> http://www.xailer.info
> "Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
> news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Hi,
>>
>> since I use Xailer 2 FilterEval does not work anymore.
>>
>> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>>
>> The value that is typed into the filter get is deleted automatically.
>> Filtering without using FilterEval works.
>>
>> Best regards, Timm.
>>
>>
>
>
--
You are right. Fixed. Thank you for your feedback.
Regards,
--
Ignacio Ortiz de Zúñiga
Xailer support / Soporte de Xailer
http://www.xailer.com
http://www.xailer.info
"Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje news:[email=4a703aa9@svctag-j7w3v3j....]4a703aa9@svctag-j7w3v3j....[/email]
Ignacio,
there is a little bug in METHOD GetFilterExp( oDBBrowse ) CLASS XDbfDataSet, I think.
IF ! Empty( cVal )
cExp := oCol:FilterEval
IF Empty( cExp ) .and. Valtype( oCol:oDataField ) == "O"
WITH OBJECT oCol:oDataField
DO CASE
CASE :cType == "C" .OR. :cType == "M"
cVal := Upper( cVal )
lComBef := ( Left( cVal, 1 ) == "%" )
lComAft := ( Right( cVal, 1 ) == "%" )
IF lComBef .AND. !lComAft
cVal := Substr( cVal, 2 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Right( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSEIF !lComBef .AND. lComAft
cVal := Substr( cVal, 1, Len( cVal ) - 1 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Left( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSE
IF lComBef .AND. lComAft
cVal := Substr( cVal, 2, Len( cVal ) - 2 )
ENDIF
cExp += "'%' $ Upper( " + :cDbfName + " )"
ENDIF
Example of what happens if the red marked code is not added:
cExp := oCol:FilterEval + "'%' $ Upper( " + :cDbfName + " )"
Best regards, Timm.
"Ignacio Ortiz de Zúñiga" <NoNameToAvoidSpam@xailer.com> schrieb im Newsbeitrag news:4a70101a$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hello,
>
> First column on sample datacontrolsDbfData1 uses the FilterEval property
> and is working correctly here. Please send a sample. TIA.
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
> Xailer support / Soporte de Xailer
> http://www.xailer.com
> http://www.xailer.info
> "Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
> news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Hi,
>>
>> since I use Xailer 2 FilterEval does not work anymore.
>>
>> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>>
>> The value that is typed into the filter get is deleted automatically.
>> Filtering without using FilterEval works.
>>
>> Best regards, Timm.
>>
>>
>
>
--
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
- ignacio
- Site Admin
- Mensajes: 9469
- Registrado: Lun Abr 06, 2015 8:00 pm
- Ubicación: Madrid, Spain
- Contactar:
Problem with FilterEval
Timm,
You are right. Fixed. Thank you for your feedback.
Regards,
--
Ignacio Ortiz de Zúñiga
Xailer support / Soporte de Xailer
http://www.xailer.com
http://www.xailer.info
"Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje news:[email=4a703aa9@svctag-j7w3v3j....]4a703aa9@svctag-j7w3v3j....[/email]
Ignacio,
there is a little bug in METHOD GetFilterExp( oDBBrowse ) CLASS XDbfDataSet, I think.
IF ! Empty( cVal )
cExp := oCol:FilterEval
IF Empty( cExp ) .and. Valtype( oCol:oDataField ) == "O"
WITH OBJECT oCol:oDataField
DO CASE
CASE :cType == "C" .OR. :cType == "M"
cVal := Upper( cVal )
lComBef := ( Left( cVal, 1 ) == "%" )
lComAft := ( Right( cVal, 1 ) == "%" )
IF lComBef .AND. !lComAft
cVal := Substr( cVal, 2 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Right( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSEIF !lComBef .AND. lComAft
cVal := Substr( cVal, 1, Len( cVal ) - 1 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Left( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSE
IF lComBef .AND. lComAft
cVal := Substr( cVal, 2, Len( cVal ) - 2 )
ENDIF
cExp += "'%' $ Upper( " + :cDbfName + " )"
ENDIF
Example of what happens if the red marked code is not added:
cExp := oCol:FilterEval + "'%' $ Upper( " + :cDbfName + " )"
Best regards, Timm.
"Ignacio Ortiz de Zúñiga" <NoNameToAvoidSpam@xailer.com> schrieb im Newsbeitrag news:4a70101a$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hello,
>
> First column on sample datacontrolsDbfData1 uses the FilterEval property
> and is working correctly here. Please send a sample. TIA.
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
> Xailer support / Soporte de Xailer
> http://www.xailer.com
> http://www.xailer.info
> "Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
> news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Hi,
>>
>> since I use Xailer 2 FilterEval does not work anymore.
>>
>> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>>
>> The value that is typed into the filter get is deleted automatically.
>> Filtering without using FilterEval works.
>>
>> Best regards, Timm.
>>
>>
>
>
--
You are right. Fixed. Thank you for your feedback.
Regards,
--
Ignacio Ortiz de Zúñiga
Xailer support / Soporte de Xailer
http://www.xailer.com
http://www.xailer.info
"Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje news:[email=4a703aa9@svctag-j7w3v3j....]4a703aa9@svctag-j7w3v3j....[/email]
Ignacio,
there is a little bug in METHOD GetFilterExp( oDBBrowse ) CLASS XDbfDataSet, I think.
IF ! Empty( cVal )
cExp := oCol:FilterEval
IF Empty( cExp ) .and. Valtype( oCol:oDataField ) == "O"
WITH OBJECT oCol:oDataField
DO CASE
CASE :cType == "C" .OR. :cType == "M"
cVal := Upper( cVal )
lComBef := ( Left( cVal, 1 ) == "%" )
lComAft := ( Right( cVal, 1 ) == "%" )
IF lComBef .AND. !lComAft
cVal := Substr( cVal, 2 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Right( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSEIF !lComBef .AND. lComAft
cVal := Substr( cVal, 1, Len( cVal ) - 1 )
cLen := lTrim( Str( Len( cVal ) ) )
cExp += "Left( Upper( " + :cDbfName + " ), " + cLen + " ) == '%'"
ELSE
IF lComBef .AND. lComAft
cVal := Substr( cVal, 2, Len( cVal ) - 2 )
ENDIF
cExp += "'%' $ Upper( " + :cDbfName + " )"
ENDIF
Example of what happens if the red marked code is not added:
cExp := oCol:FilterEval + "'%' $ Upper( " + :cDbfName + " )"
Best regards, Timm.
"Ignacio Ortiz de Zúñiga" <NoNameToAvoidSpam@xailer.com> schrieb im Newsbeitrag news:4a70101a$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hello,
>
> First column on sample datacontrolsDbfData1 uses the FilterEval property
> and is working correctly here. Please send a sample. TIA.
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
> Xailer support / Soporte de Xailer
> http://www.xailer.com
> http://www.xailer.info
> "Timm Sodtalbers" <info@sodtalbers-it.de> escribió en el mensaje
> news:4a6ffd34$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Hi,
>>
>> since I use Xailer 2 FilterEval does not work anymore.
>>
>> ::oBrwHistorie:aCols[8]:FilterEval := "'%' $ MITARBEIT"
>>
>> The value that is typed into the filter get is deleted automatically.
>> Filtering without using FilterEval works.
>>
>> Best regards, Timm.
>>
>>
>
>
--
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com