acs::db::SQL method dbproc_arg (protected)
<instance of acs::db::SQL> dbproc_arg -name name -type type \ [ -required ] [ -allow_empty ]
Defined in packages/acs-tcl/tcl/acs-db-12-procs.tcl
- Switches:
- -name (required)
- -type (required)
- -required (optional)
- -allow_empty (optional)
- Testcases:
- No testcase defined.
Source code: set props {} if {[dict exists [:typemap] $type]} { lappend props [dict get [:typemap] $type] } if {$required} { lappend props required } elseif {$allow_empty} { # one is not allowed to use both, "allow_empty" and "required" lappend props 0..1 } if {[llength $props] == 0} { return "-$name" } else { return -$name:[join $props ,] }XQL Not present: Generic, PostgreSQL, Oracle