G’day,

Just out of my dirty and provocative soul… - have fun :o)

How would be the ORDA-Replacement look like for the following scenario?:

The administrator of a 4D-database is able to set/change the number and the 
order of the fields of ALL tables a common user can search in at any time 
without re-compiling.

Meaning the Query is constructed with the “;*" parameter.

/QUERY Construction

$count:=1
                        
Repeat // start “collecting" Query parameters

        $searchptr:=Get pointer("vtxtSearch"+String($count))
        If ((Not(Is nil pointer($searchptr))) & ($searchptr->#""))
        SU_SearchTable 
(Field([xFieldInfo]TableIDRef;[xFieldInfo]FieldID);$searchptr). // Get info for 
the current table
        End if 
        $count:=$count+1
        NEXT RECORD([xFieldInfo])

Until (End selection([xFieldInfo]))

\QUERY Construction

QUERY(vptrCurrentTable->) // Execute Query 


Cheers
Jörg

**********************************************************************
4D Internet Users Group (4D iNUG)
New Forum: https://discuss.4D.com
Archive:  http://lists.4d.com/archives.html
Options: https://lists.4d.com/mailman/options/4d_tech
Unsub:  mailto:4d_tech-unsubscr...@lists.4d.com
**********************************************************************

Reply via email to