---

Class ::xo::db::apm_parameter

::xo::db::apm_parameter create ...

Class Relations

• class: ::xo::db::Class
• superclass: ::xo::db::Object
• instmixin: ::xo::parameter

::xo::db::Class create ::xo::db::apm_parameter \
     -superclass ::xo::db::Object \
     -instmixin ::xo::parameter

Methods (to be applied on instances)

• datatype (setter)

• default_value (setter)

• description (setter)

• insert (scripted)

  set __table_name [[self class] table_name]
  set __id [[self class] id_column]
  set :$__id ${:object_id}
  :log "ID insert in $__table_name, id = $__id = [set :$__id]"
  next
  foreach {__slot_name __slot} [[self class] array get db_slot] {
    if {[info exists :$__slot_name]} {
      set $__slot_name [set :$__slot_name]
      lappend __vars $__slot_name
      lappend __atts [$__slot column_name]
    }
  }
  ::xo::dc dml insert_$__table_name "insert into $__table_name
    ([join $__atts ,]) values (:[join $__vars ,:])"

• max_n_values (setter)

• min_n_values (setter)

• package_key (setter)

• parameter_id (setter)

• parameter_name (setter)

• scope (setter)

• section_name (setter)

• update (scripted)

  ::xo::dc transaction {
    next
    :instvar object_id package_key datatype min_n_values description parameter_name default_value section_name max_n_values scope
    ::xo::dc dml update_apm_parameters {update apm_parameters
      set package_key = :package_key,datatype = :datatype,min_n_values = :min_n_values,description = :description,parameter_name = :parameter_name,default_value = :default_value,section_name = :section_name,max_n_values = :max_n_values,scope = :scope where parameter_id = :object_id
    }
  }

---