%3 ::xotcl::Object ::xotcl::Object ::xo::db::sql::content_keyword ::xo::db::sql::content_keyword → del → delete → get_description → get_heading → get_path → is_assigned → is_leaf → item_assign → item_unassign → new → set_description → set_heading ::xo::db::sql::content_keyword->::xotcl::Object

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

::xo::db::sql::content_keyword[i] create ...

Class Relations

  • class: ::xo::db::Class[i]
  • superclass: ::xotcl::Object[i]
::xo::db::Class create ::xo::db::sql::content_keyword \
     -superclass ::xotcl::Object

Methods (to be applied on the object)

  • del (scripted, public)

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

    Automatically generated method

    Switches:
    -dbn (optional)
    -keyword_id (required)

    Testcases:
    No testcase defined.
    #function_args: {KEYWORD_ID {}}
foreach var [list KEYWORD_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select content_keyword__del($_KEYWORD_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • delete (scripted, public)

     xo::db::sql::content_keyword[i] delete [ -dbn dbn ] \
    -keyword_id keyword_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -keyword_id (required)

    Testcases:
    No testcase defined.
    #function_args: {KEYWORD_ID {}}
foreach var [list KEYWORD_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select content_keyword__delete($_KEYWORD_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • get_description (scripted, public)

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

    Automatically generated method

    Switches:
    -dbn (optional)
    -keyword_id (required)

    Testcases:
    No testcase defined.
    #function_args: {KEYWORD_ID {}}
foreach var [list KEYWORD_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select content_keyword__get_description($_KEYWORD_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • get_heading (scripted, public)

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

    Automatically generated method

    Switches:
    -dbn (optional)
    -keyword_id (required)

    Testcases:
    No testcase defined.
    #function_args: {KEYWORD_ID {}}
foreach var [list KEYWORD_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select content_keyword__get_heading($_KEYWORD_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • get_path (scripted, public)

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

    Automatically generated method

    Switches:
    -dbn (optional)
    -keyword_id (required)

    Testcases:
    No testcase defined.
    #function_args: {KEYWORD_ID {}}
foreach var [list KEYWORD_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select content_keyword__get_path($_KEYWORD_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • is_assigned (scripted, public)

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

    Automatically generated method

    Switches:
    -dbn (optional)
    -item_id (required)
    -keyword_id (required)
    -recurse (optional, defaults to "none")

    Testcases:
    No testcase defined.
    #function_args: {ITEM_ID {}} {KEYWORD_ID {}} {RECURSE none}
foreach var [list ITEM_ID KEYWORD_ID RECURSE]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select content_keyword__is_assigned($_ITEM_ID, $_KEYWORD_ID, $_RECURSE) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • is_leaf (scripted, public)

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

    Automatically generated method

    Switches:
    -dbn (optional)
    -keyword_id (required)

    Testcases:
    No testcase defined.
    #function_args: {KEYWORD_ID {}}
foreach var [list KEYWORD_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select content_keyword__is_leaf($_KEYWORD_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • item_assign (scripted, public)

     xo::db::sql::content_keyword[i] 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 (required)
    -keyword_id (required)
    -context_id (optional)
    -creation_user (optional)
    -creation_ip (optional)

    Testcases:
    No testcase defined.
    #function_args: {ITEM_ID {}} {KEYWORD_ID {}} {CONTEXT_ID null} {CREATION_USER null} {CREATION_IP null}
foreach var [list ITEM_ID KEYWORD_ID CONTEXT_ID CREATION_USER CREATION_IP]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select content_keyword__item_assign($_ITEM_ID, $_KEYWORD_ID, $_CONTEXT_ID, $_CREATION_USER, $_CREATION_IP) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • item_unassign (scripted, public)

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

    Automatically generated method

    Switches:
    -dbn (optional)
    -item_id (required)
    -keyword_id (required)

    Testcases:
    No testcase defined.
    #function_args: {ITEM_ID {}} {KEYWORD_ID {}}
foreach var [list ITEM_ID KEYWORD_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select content_keyword__item_unassign($_ITEM_ID, $_KEYWORD_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • new (scripted, public)

     xo::db::sql::content_keyword[i] 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 ] \
    [ -childof childof ]

    Automatically generated method

    Switches:
    -dbn (optional)
    -heading (required)
    -description (optional)
    -parent_id (optional)
    -keyword_id (optional)
    -creation_date (optional, defaults to "now")
    -creation_user (optional)
    -creation_ip (optional)
    -object_type (optional, defaults to "content_keyword")
    -package_id (optional)
    -childof (optional)

    Testcases:
    No testcase defined.
    #function_args: {HEADING {}} {DESCRIPTION null} {PARENT_ID null} {KEYWORD_ID null} {CREATION_DATE now} {CREATION_USER null} {CREATION_IP null} {OBJECT_TYPE content_keyword} {PACKAGE_ID null}
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]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select content_keyword__new($_HEADING, $_DESCRIPTION, $_PARENT_ID, $_KEYWORD_ID, $_CREATION_DATE, $_CREATION_USER, $_CREATION_IP, $_OBJECT_TYPE, $_PACKAGE_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • set_description (scripted, public)

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

    Automatically generated method

    Switches:
    -dbn (optional)
    -keyword_id (required)
    -description (required)

    Testcases:
    No testcase defined.
    #function_args: {KEYWORD_ID {}} {DESCRIPTION {}}
foreach var [list KEYWORD_ID DESCRIPTION]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select content_keyword__set_description($_KEYWORD_ID, $_DESCRIPTION) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • set_heading (scripted, public)

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

    Automatically generated method

    Switches:
    -dbn (optional)
    -keyword_id (required)
    -heading (required)

    Testcases:
    No testcase defined.
    #function_args: {KEYWORD_ID {}} {HEADING {}}
foreach var [list KEYWORD_ID HEADING]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select content_keyword__set_heading($_KEYWORD_ID, $_HEADING) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

Variables

::xo::db::sql::content_keyword set __default_metaclass ::xotcl::Class
::xo::db::sql::content_keyword set __default_superclass ::xotcl::Object
::xo::db::sql::content_keyword set abstract_p f
::xo::db::sql::content_keyword set auto_save false
::xo::db::sql::content_keyword set name_method {}
::xo::db::sql::content_keyword set object_type ::xo::db::sql::content_keyword
::xo::db::sql::content_keyword set security_inherit_p t
::xo::db::sql::content_keyword set sql_package_name content_keyword
::xo::db::sql::content_keyword set supertype acs_object
::xo::db::sql::content_keyword set with_table true