---

Class ::xo::db::sql::apm_package_type

::xo::db::sql::apm_package_type create ...

Class Relations

• class: ::xo::db::Class
• superclass: ::xotcl::Object

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

Methods (to be applied on the object)

• create_type (scripted, public)

   xo::db::sql::apm_package_type create_type [ -dbn dbn ] \
      -package_key package_key  -pretty_name pretty_name  \
      -pretty_plural pretty_plural  -package_uri package_uri  \
      -package_type package_type  -initial_install_p initial_install_p  \
      -singleton_p singleton_p  \
      -implements_subsite_p implements_subsite_p  \
      -inherit_templates_p inherit_templates_p  \
      [ -spec_file_path spec_file_path ] \
      [ -spec_file_mtime spec_file_mtime ]

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -package_key

  (required)

  -pretty_name

  (required)

  -pretty_plural

  (required)

  -package_uri

  (required)

  -package_type

  (required)

  -initial_install_p

  (required)

  -singleton_p

  (required)

  -implements_subsite_p

  (required)

  -inherit_templates_p

  (required)

  -spec_file_path

  (optional)

  -spec_file_mtime

  (optional)

  Partial Call Graph (max 5 caller/called nodes):

  Testcases:

  No testcase defined.

  #function_args: {PACKAGE_KEY {}} {PRETTY_NAME {}} {PRETTY_PLURAL {}} {PACKAGE_URI {}} {PACKAGE_TYPE {}} {INITIAL_INSTALL_P {}} {SINGLETON_P {}} {IMPLEMENTS_SUBSITE_P {}} {INHERIT_TEMPLATES_P {}} {SPEC_FILE_PATH null} {SPEC_FILE_MTIME null}
  foreach var [list PACKAGE_KEY PRETTY_NAME PRETTY_PLURAL PACKAGE_URI PACKAGE_TYPE INITIAL_INSTALL_P SINGLETON_P IMPLEMENTS_SUBSITE_P INHERIT_TEMPLATES_P SPEC_FILE_PATH SPEC_FILE_MTIME]  {
    set varname [string tolower $var]
    if {[info exists $varname]} {
      set $var [set $varname]
      set _$var :$var
    } else {
      set _$var null
    }
  }
  set sql "
  select apm_package_type__create_type($_PACKAGE_KEY, $_PRETTY_NAME, $_PRETTY_PLURAL, $_PACKAGE_URI, $_PACKAGE_TYPE, $_INITIAL_INSTALL_P, $_SINGLETON_P, $_IMPLEMENTS_SUBSITE_P, $_INHERIT_TEMPLATES_P, $_SPEC_FILE_PATH, $_SPEC_FILE_MTIME) 
      "
  db_with_handle -dbn $dbn db {
    #ns_log notice "--sql=$sql"
    return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
  }

• drop_type (scripted, public)

   xo::db::sql::apm_package_type drop_type [ -dbn dbn ] \
      -package_key package_key  [ -cascade_p cascade_p ]

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -package_key

  (required)

  -cascade_p

  (defaults to "f") (optional)

  Partial Call Graph (max 5 caller/called nodes):

  Testcases:

  No testcase defined.

  #function_args: {PACKAGE_KEY {}} {CASCADE_P f}
  foreach var [list PACKAGE_KEY CASCADE_P]  {
    set varname [string tolower $var]
    if {[info exists $varname]} {
      set $var [set $varname]
      set _$var :$var
    } else {
      set _$var null
    }
  }
  set sql "
  select apm_package_type__drop_type($_PACKAGE_KEY, $_CASCADE_P) 
      "
  db_with_handle -dbn $dbn db {
    #ns_log notice "--sql=$sql"
    return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
  }

• num_parameters (scripted, public)

   xo::db::sql::apm_package_type num_parameters [ -dbn dbn ] \
      -package_key package_key 

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -package_key

  (required)

  Partial Call Graph (max 5 caller/called nodes):

  Testcases:

  No testcase defined.

  #function_args: {PACKAGE_KEY {}}
  foreach var [list PACKAGE_KEY]  {
    set varname [string tolower $var]
    if {[info exists $varname]} {
      set $var [set $varname]
      set _$var :$var
    } else {
      set _$var null
    }
  }
  set sql "
  select apm_package_type__num_parameters($_PACKAGE_KEY) 
      "
  db_with_handle -dbn $dbn db {
    #ns_log notice "--sql=$sql"
    return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
  }

• update_type (scripted, public)

   xo::db::sql::apm_package_type update_type [ -dbn dbn ] \
      -package_key package_key  [ -pretty_name pretty_name ] \
      [ -pretty_plural pretty_plural ] [ -package_uri package_uri ] \
      [ -package_type package_type ] \
      [ -initial_install_p initial_install_p ] \
      [ -singleton_p singleton_p ] \
      [ -implements_subsite_p implements_subsite_p ] \
      [ -inherit_templates_p inherit_templates_p ] \
      [ -spec_file_path spec_file_path ] \
      [ -spec_file_mtime spec_file_mtime ]

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -package_key

  (required)

  -pretty_name

  (optional)

  -pretty_plural

  (optional)

  -package_uri

  (optional)

  -package_type

  (optional)

  -initial_install_p

  (optional)

  -singleton_p

  (optional)

  -implements_subsite_p

  (optional)

  -inherit_templates_p

  (optional)

  -spec_file_path

  (optional)

  -spec_file_mtime

  (optional)

  Partial Call Graph (max 5 caller/called nodes):

  Testcases:

  No testcase defined.

  #function_args: {PACKAGE_KEY {}} {PRETTY_NAME null} {PRETTY_PLURAL null} {PACKAGE_URI null} {PACKAGE_TYPE null} {INITIAL_INSTALL_P null} {SINGLETON_P null} {IMPLEMENTS_SUBSITE_P null} {INHERIT_TEMPLATES_P null} {SPEC_FILE_PATH null} {SPEC_FILE_MTIME null}
  foreach var [list PACKAGE_KEY PRETTY_NAME PRETTY_PLURAL PACKAGE_URI PACKAGE_TYPE INITIAL_INSTALL_P SINGLETON_P IMPLEMENTS_SUBSITE_P INHERIT_TEMPLATES_P SPEC_FILE_PATH SPEC_FILE_MTIME]  {
    set varname [string tolower $var]
    if {[info exists $varname]} {
      set $var [set $varname]
      set _$var :$var
    } else {
      set _$var null
    }
  }
  set sql "
  select apm_package_type__update_type($_PACKAGE_KEY, $_PRETTY_NAME, $_PRETTY_PLURAL, $_PACKAGE_URI, $_PACKAGE_TYPE, $_INITIAL_INSTALL_P, $_SINGLETON_P, $_IMPLEMENTS_SUBSITE_P, $_INHERIT_TEMPLATES_P, $_SPEC_FILE_PATH, $_SPEC_FILE_MTIME) 
      "
  db_with_handle -dbn $dbn db {
    #ns_log notice "--sql=$sql"
    return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
  }

---