::xo::db::Class ::xo::db::sql::content_keyword

Class Hierarchy of ::xo::db::sql::content_keyword

• ::xotcl::Object

  Meta-class:

  ::xotcl::Class

  Methods for instances:

  __api_make_doc, __api_make_forward_doc, __next^C, __timediff, abstract, ad_doc, ad_forward, ad_proc, append^C, array^C, asHTML, autoname^C, check^C, class^C, cleanup^C, configure^C, contains, copy, db_1row^C, debug, defaultmethod, destroy^C, destroy_on_cleanup, dot_append_method, dotclass, dotcode, dotquote, dotquotel, eval^C, exists^C, extractConfigureArg, filter^C, filterguard^C, filtersearch^C, forward^C, hasclass, incr^C, info^C, init, instvar^C, invar^C, isclass^C, ismetaclass^C, ismixin^C, isobject^C, istype^C, lappend^C, log, method, mixin^C, mixinguard^C, move, msg, noinit^C, parametercmd^C, proc^C, procsearch^C, qn, requireNamespace^C, self, serialize, set^C, subst^C, trace^C, unset^C, uplevel^C, upvar^C, volatile^C, vwait^C

  Methods to be applied on the class (in addition to the methods provided by the meta-class):

  __exitHandler, getExitHandler, setExitHandler, unsetExitHandler

• ::xo::db::sql::content_keyword

  Meta-class:

  ::xo::db::Class

  Methods to be applied on the class (in addition to the methods provided by the meta-class):

  del, get_description, get_heading, get_path, is_assigned, is_leaf, item_assign, item_unassign, new, set_description, set_heading

Class Relations

• superclass: ::xotcl::Object

::xo::db::Class create ::xo::db::sql::content_keyword \
     -superclass ::xotcl::Object

Methods

• proc del (public)

  ::xo::db::sql::content_keyword del [ -dbn dbn ] \
      [ -keyword_id keyword_id ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -keyword_id (optional)

  ::xo::db::sql::content_keyword proc del {{-dbn {}} -keyword_id} {
          #function_args: {KEYWORD_ID NULL}
          set sql_args [list]
          foreach var [list KEYWORD_ID]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN content_keyword.del($sql_args); END;"
          db_with_handle -dbn $dbn db {
            #my log "sql=$sql, sql_command=ns_ora dml $db $sql"
            return [ ns_ora dml $db $sql ]
          }
        }

• proc get_description (public)

  ::xo::db::sql::content_keyword get_description [ -dbn dbn ] \
      [ -keyword_id keyword_id ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -keyword_id (optional)

  ::xo::db::sql::content_keyword proc get_description {{-dbn {}} -keyword_id} {
          #function_args: {KEYWORD_ID NULL}
          set sql_args [list]
          foreach var [list KEYWORD_ID]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := content_keyword.get_description($sql_args); END;"
          db_with_handle -dbn $dbn db {
            #my log "sql=$sql, sql_command=ns_ora exec_plsql_bind $db $sql 1 """
            return [ ns_ora exec_plsql_bind $db $sql 1 "" ]
          }
        }

• proc get_heading (public)

  ::xo::db::sql::content_keyword get_heading [ -dbn dbn ] \
      [ -keyword_id keyword_id ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -keyword_id (optional)

  ::xo::db::sql::content_keyword proc get_heading {{-dbn {}} -keyword_id} {
          #function_args: {KEYWORD_ID NULL}
          set sql_args [list]
          foreach var [list KEYWORD_ID]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := content_keyword.get_heading($sql_args); END;"
          db_with_handle -dbn $dbn db {
            #my log "sql=$sql, sql_command=ns_ora exec_plsql_bind $db $sql 1 """
            return [ ns_ora exec_plsql_bind $db $sql 1 "" ]
          }
        }

• proc get_path (public)

  ::xo::db::sql::content_keyword get_path [ -dbn dbn ] \
      [ -keyword_id keyword_id ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -keyword_id (optional)

  ::xo::db::sql::content_keyword proc get_path {{-dbn {}} -keyword_id} {
          #function_args: {KEYWORD_ID NULL}
          set sql_args [list]
          foreach var [list KEYWORD_ID]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := content_keyword.get_path($sql_args); END;"
          db_with_handle -dbn $dbn db {
            #my log "sql=$sql, sql_command=ns_ora exec_plsql_bind $db $sql 1 """
            return [ ns_ora exec_plsql_bind $db $sql 1 "" ]
          }
        }

• proc is_assigned (public)

  ::xo::db::sql::content_keyword is_assigned [ -dbn dbn ] \
      [ -item_id item_id ] [ -keyword_id keyword_id ] \
      [ -recurse recurse ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -item_id (optional)

  -keyword_id (optional)

  -recurse (optional)

  ::xo::db::sql::content_keyword proc is_assigned {{-dbn {}} -item_id -keyword_id -recurse} {
          #function_args: {ITEM_ID NULL} {KEYWORD_ID NULL} {RECURSE NULL}
          set sql_args [list]
          foreach var [list ITEM_ID KEYWORD_ID RECURSE]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := content_keyword.is_assigned($sql_args); END;"
          db_with_handle -dbn $dbn db {
            #my log "sql=$sql, sql_command=ns_ora exec_plsql_bind $db $sql 1 """
            return [ ns_ora exec_plsql_bind $db $sql 1 "" ]
          }
        }

• proc is_leaf (public)

  ::xo::db::sql::content_keyword is_leaf [ -dbn dbn ] \
      [ -keyword_id keyword_id ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -keyword_id (optional)

  ::xo::db::sql::content_keyword proc is_leaf {{-dbn {}} -keyword_id} {
          #function_args: {KEYWORD_ID NULL}
          set sql_args [list]
          foreach var [list KEYWORD_ID]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := content_keyword.is_leaf($sql_args); END;"
          db_with_handle -dbn $dbn db {
            #my log "sql=$sql, sql_command=ns_ora exec_plsql_bind $db $sql 1 """
            return [ ns_ora exec_plsql_bind $db $sql 1 "" ]
          }
        }

• proc item_assign (public)

  ::xo::db::sql::content_keyword item_assign [ -dbn dbn ] \
      [ -item_id item_id ] [ -keyword_id keyword_id ] \
      [ -context_id context_id ] [ -creation_user creation_user ] \
      [ -creation_ip creation_ip ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -item_id (optional)

  -keyword_id (optional)

  -context_id (optional)

  -creation_user (optional)

  -creation_ip (optional)

  ::xo::db::sql::content_keyword proc item_assign {{-dbn {}} -item_id -keyword_id -context_id -creation_user -creation_ip} {
          #function_args: {ITEM_ID NULL} {KEYWORD_ID NULL} {CONTEXT_ID NULL} {CREATION_USER NULL} {CREATION_IP NULL}
          set sql_args [list]
          foreach var [list ITEM_ID KEYWORD_ID CONTEXT_ID CREATION_USER CREATION_IP]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN content_keyword.item_assign($sql_args); END;"
          db_with_handle -dbn $dbn db {
            #my log "sql=$sql, sql_command=ns_ora dml $db $sql"
            return [ ns_ora dml $db $sql ]
          }
        }

• proc item_unassign (public)

  ::xo::db::sql::content_keyword item_unassign [ -dbn dbn ] \
      [ -item_id item_id ] [ -keyword_id keyword_id ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -item_id (optional)

  -keyword_id (optional)

  ::xo::db::sql::content_keyword proc item_unassign {{-dbn {}} -item_id -keyword_id} {
          #function_args: {ITEM_ID NULL} {KEYWORD_ID NULL}
          set sql_args [list]
          foreach var [list ITEM_ID KEYWORD_ID]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN content_keyword.item_unassign($sql_args); END;"
          db_with_handle -dbn $dbn db {
            #my log "sql=$sql, sql_command=ns_ora dml $db $sql"
            return [ ns_ora dml $db $sql ]
          }
        }

• proc new (public)

  ::xo::db::sql::content_keyword new [ -dbn dbn ] [ -heading heading ] \
      [ -description description ] [ -parent_id parent_id ] \
      [ -keyword_id keyword_id ] [ -creation_date creation_date ] \
      [ -creation_user creation_user ] [ -creation_ip creation_ip ] \
      [ -object_type object_type ] [ -package_id package_id ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -heading (optional)

  -description (optional)

  -parent_id (optional)

  -keyword_id (optional)

  -creation_date (optional)

  -creation_user (optional)

  -creation_ip (optional)

  -object_type (optional)

  -package_id (optional)

  ::xo::db::sql::content_keyword proc new {{-dbn {}} -heading -description -parent_id -keyword_id -creation_date -creation_user -creation_ip -object_type -package_id} {
          #function_args: {HEADING NULL} {DESCRIPTION NULL} {PARENT_ID NULL} {KEYWORD_ID NULL} {CREATION_DATE NULL} {CREATION_USER NULL} {CREATION_IP NULL} {OBJECT_TYPE NULL} {PACKAGE_ID NULL}
          set sql_args [list]
          foreach var [list HEADING DESCRIPTION PARENT_ID KEYWORD_ID CREATION_DATE CREATION_USER CREATION_IP OBJECT_TYPE PACKAGE_ID]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := content_keyword.new($sql_args); END;"
          db_with_handle -dbn $dbn db {
            #my log "sql=$sql, sql_command=ns_ora exec_plsql_bind $db $sql 1 """
            return [ ns_ora exec_plsql_bind $db $sql 1 "" ]
          }
        }

• proc set_description (public)

  ::xo::db::sql::content_keyword set_description [ -dbn dbn ] \
      [ -keyword_id keyword_id ] [ -description description ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -keyword_id (optional)

  -description (optional)

  ::xo::db::sql::content_keyword proc set_description {{-dbn {}} -keyword_id -description} {
          #function_args: {KEYWORD_ID NULL} {DESCRIPTION NULL}
          set sql_args [list]
          foreach var [list KEYWORD_ID DESCRIPTION]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN content_keyword.set_description($sql_args); END;"
          db_with_handle -dbn $dbn db {
            #my log "sql=$sql, sql_command=ns_ora dml $db $sql"
            return [ ns_ora dml $db $sql ]
          }
        }

• proc set_heading (public)

  ::xo::db::sql::content_keyword set_heading [ -dbn dbn ] \
      [ -keyword_id keyword_id ] [ -heading heading ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -keyword_id (optional)

  -heading (optional)

  ::xo::db::sql::content_keyword proc set_heading {{-dbn {}} -keyword_id -heading} {
          #function_args: {KEYWORD_ID NULL} {HEADING NULL}
          set sql_args [list]
          foreach var [list KEYWORD_ID HEADING]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN content_keyword.set_heading($sql_args); END;"
          db_with_handle -dbn $dbn db {
            #my log "sql=$sql, sql_command=ns_ora dml $db $sql"
            return [ ns_ora dml $db $sql ]
          }
        }