Subject Re: Filter in rowset
From Akshat Kapoor <akshat.kapoor@kapoorsons.in>
Date Fri, 19 May 2017 22:53:42 +0530
Newsgroups dbase.getting-started
Attachment(s) test_filter.prg

Hello Juan,
Could not make the filter condition work
But have used canGetRow event to mimic the same.
Your code with the alteration is attached
Regards
Akshat

On 19/05/2017 14:48, Juan Antonio wrote:
> /*
 > // -----------------------
 >  I'm trying to make a filter in a rowset of a Query by comparing the value of one field with another.
 >
 > It works if I do it in an SQL statement
 >   "Select * from table1 where field1> field2"
 >
 > In the Filter help says it can be put as in the WHERE clause of a SQL SELECT.
 >
 >   But when I do the same with a filter it gives me error "operation not applicable"
 >
 > Can anybody help me ?
 >
 > Thanks in advance
 >
 >   See example
 >
 > *********  example code ********
 > */
 >
 > if file('tabla1.dbf')
 >          Drop table tabla1
 > endif
 >
 > if not file('tabla1.dbf')
 >    Create Table tabla1 (a Character(4), b Character(4), field1 numeric (13,2), field2 Numeric (13,2))
 >    Insert into tabla1 (a, b, field1, field2) VALUES ("any1","any1", 11.0, 0.0)
 >    Insert into tabla1 (a, b, field1, field2) VALUES ("any2","  ",22.0, 22.0)
 >    Insert into tabla1 (a, b, field1, field2) VALUES ("any3","any3",33.0, 0.0)
 >    Insert into tabla1 (a, b, field1, field2) VALUES ("any4","  ", 44.0, 44.0)
 >    Insert into tabla1 (a, b, field1, field2) VALUES ("any5","   ",55.0, 0.0)
 >    Insert into tabla1 (a, b, field1, field2) VALUES ("any6","   ",66.0, 66.0)
 >
 > endif
 >
 > ** END HEADER -- do not remove this line
 > //
 > // Generated on 2010/11/14
 > //
 > parameter bModal
 > local f
 > f = new prueba1Form()
 > if (bModal)
 >   f.mdi = false // ensure not MDI
 >   f.readModal()
 > else
 >   f.open()
 > endif
 >
 > class prueba1Form of FORM
 >  with (this)
 >  height = 21.4091
 >  left = 51.7143
 >  top = 12.7273
 >  width = 60.1429
 >  text = ""
 > endwith
 >
 >  this.prueba1 = new QUERY()
 >  this.prueba1.parent = this
 >    with (this.prueba1)
 >    left = 42.7143
 >    top = 0.5455
 >    sql = 'select * from "tabla1.DBF"'
 >    active = true
 >   endwith
 >
 >   with (this.prueba1.rowset)
 >       filter = "field1 > field2"
 >    endwith
 >
 >
 >   this.GRID1 = new GRID(this)
 >   with (this.GRID1)
 >     dataLink = form.prueba1.rowset
 >     height = 7.1818
 >     left = 5.2857
 >     top = 3.0455
 >     width = 48.0
 >    endwith
 >
 >    this.rowset = this.prueba1.rowset
 >
 > endclass
 > ********* End of example code ********
 >