ad_sql_append

ad_sql_append { -select {} -from {} -where {} -groupby {} -orderby {} } sqlarrayname

Adds to the SQL statement.

Source code:

arg_parser_for_ad_sql_append $args

    upvar $sqlarrayname sql
    if { ![empty_string_p $select] } {
	lappend sql(select) $select
    }
    if { ![empty_string_p $from] } {
	lappend sql(from) $from
    }
    if { ![empty_string_p $where] } {
	lappend sql(where) $where
    }
    if { ![empty_string_p $groupby] } {
	lappend sql(groupby) $groupby
    }
    if { ![empty_string_p $orderby] } {
	lappend sql(orderby) $orderby
    }