ad_table_orderby_sql (public, deprecated)

 ad_table_orderby_sql datadef orderby order

Defined in packages/acs-tcl/tcl/deprecated-procs.tcl

Deprecated. Invoking this procedure generates a warning.

create the order by clause consistent with the orderby and order variables and the datadef which built the table

Parameters:
datadef (required)
orderby (required)
order (required)
See Also:

Testcases:
No testcase defined.
Source code:
ad_log_deprecated proc ad_table_orderby_sql
    set orderclause "order by $orderby $order"
    foreach col $datadef {
        if {$orderby eq [lindex $col 0] } {
            if {[lindex $col 2] ne ""} {
                set orderclause [subst [lindex $col 2]]
            }
        }
    }
    return $orderclause
XQL Not present:
PostgreSQL, Oracle
Generic XQL file:
packages/acs-tcl/tcl/deprecated-procs.xql

[ hide source ] | [ make this the default ]
Show another procedure: