%3 ::xotcl::Object ::xotcl::Object ::xo::db::sql::apm_package_version ::xo::db::sql::apm_package_version → add_dependency → add_interface → copy → delete → disable → edit → enable → new → remove_dependency → remove_interface → sortable_version_name → upgrade → upgrade_p → version_name_greater ::xo::db::sql::apm_package_version->::xotcl::Object

Class ::xo::db::sql::apm_package_version

::xo::db::sql::apm_package_version[i] create ...
Defined in

Class Relations

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

Methods (to be applied on the object)

  • add_dependency (scripted, public)

     xo::db::sql::apm_package_version[i] add_dependency [ -dbn dbn ] \
    -dependency_type dependency_type  [ -dependency_id dependency_id ] \
    -version_id version_id  -dependency_uri dependency_uri  \
    -dependency_version dependency_version

    Automatically generated method

    Switches:
    -dbn (optional)
    -dependency_type (required)
    -dependency_id (optional)
    -version_id (required)
    -dependency_uri (required)
    -dependency_version (required)

    Testcases:
    No testcase defined.
    #function_args: {DEPENDENCY_TYPE {}} {DEPENDENCY_ID null} {VERSION_ID {}} {DEPENDENCY_URI {}} {DEPENDENCY_VERSION {}}
foreach var [list DEPENDENCY_TYPE DEPENDENCY_ID VERSION_ID DEPENDENCY_URI DEPENDENCY_VERSION]  {
  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_version__add_dependency($_DEPENDENCY_TYPE, $_DEPENDENCY_ID, $_VERSION_ID, $_DEPENDENCY_URI, $_DEPENDENCY_VERSION) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • add_interface (scripted, public)

     xo::db::sql::apm_package_version[i] add_interface [ -dbn dbn ] \
    [ -interface_id interface_id ] -version_id version_id  \
    -interface_uri interface_uri  \
    -interface_version interface_version

    Automatically generated method

    Switches:
    -dbn (optional)
    -interface_id (optional)
    -version_id (required)
    -interface_uri (required)
    -interface_version (required)

    Testcases:
    No testcase defined.
    #function_args: {INTERFACE_ID null} {VERSION_ID {}} {INTERFACE_URI {}} {INTERFACE_VERSION {}}
foreach var [list INTERFACE_ID VERSION_ID INTERFACE_URI INTERFACE_VERSION]  {
  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_version__add_interface($_INTERFACE_ID, $_VERSION_ID, $_INTERFACE_URI, $_INTERFACE_VERSION) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • copy (scripted, public)

     xo::db::sql::apm_package_version[i] copy [ -dbn dbn ] \
    -version_id version_id  [ -new_version_id new_version_id ] \
    -new_version_name new_version_name  \
    -new_version_uri new_version_uri  -copy_owners_p copy_owners_p

    Automatically generated method

    Switches:
    -dbn (optional)
    -version_id (required)
    -new_version_id (optional)
    -new_version_name (required)
    -new_version_uri (required)
    -copy_owners_p (required)

    Testcases:
    No testcase defined.
    #function_args: {VERSION_ID {}} {NEW_VERSION_ID null} {NEW_VERSION_NAME {}} {NEW_VERSION_URI {}} {COPY_OWNERS_P {}}
foreach var [list VERSION_ID NEW_VERSION_ID NEW_VERSION_NAME NEW_VERSION_URI COPY_OWNERS_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_version__copy($_VERSION_ID, $_NEW_VERSION_ID, $_NEW_VERSION_NAME, $_NEW_VERSION_URI, $_COPY_OWNERS_P) 
    "
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::apm_package_version[i] delete [ -dbn dbn ] \
    -version_id version_id

    Automatically generated method

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

    Testcases:
    No testcase defined.
    #function_args: {VERSION_ID {}}
foreach var [list VERSION_ID]  {
  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_version__delete($_VERSION_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • disable (scripted, public)

     xo::db::sql::apm_package_version[i] disable [ -dbn dbn ] \
    -version_id version_id

    Automatically generated method

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

    Testcases:
    No testcase defined.
    #function_args: {VERSION_ID {}}
foreach var [list VERSION_ID]  {
  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_version__disable($_VERSION_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • edit (scripted, public)

     xo::db::sql::apm_package_version[i] edit [ -dbn dbn ] \
    [ -new_version_id new_version_id ] -version_id version_id  \
    [ -version_name version_name ] -version_uri version_uri  \
    -summary summary  -description_format description_format  \
    -description description  -release_date release_date  \
    -vendor vendor  -vendor_uri vendor_uri  -auto_mount auto_mount  \
    [ -installed_p installed_p ] \
    [ -data_model_loaded_p data_model_loaded_p ]

    Automatically generated method

    Switches:
    -dbn (optional)
    -new_version_id (optional)
    -version_id (required)
    -version_name (optional)
    -version_uri (required)
    -summary (required)
    -description_format (required)
    -description (required)
    -release_date (required)
    -vendor (required)
    -vendor_uri (required)
    -auto_mount (required)
    -installed_p (optional, defaults to "f")
    -data_model_loaded_p (optional, defaults to "f")

    Testcases:
    No testcase defined.
    #function_args: {NEW_VERSION_ID null} {VERSION_ID {}} {VERSION_NAME null} {VERSION_URI {}} {SUMMARY {}} {DESCRIPTION_FORMAT {}} {DESCRIPTION {}} {RELEASE_DATE {}} {VENDOR {}} {VENDOR_URI {}} {AUTO_MOUNT {}} {INSTALLED_P f} {DATA_MODEL_LOADED_P f}
foreach var [list NEW_VERSION_ID VERSION_ID VERSION_NAME VERSION_URI SUMMARY DESCRIPTION_FORMAT DESCRIPTION RELEASE_DATE VENDOR VENDOR_URI AUTO_MOUNT INSTALLED_P DATA_MODEL_LOADED_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_version__edit($_NEW_VERSION_ID, $_VERSION_ID, $_VERSION_NAME, $_VERSION_URI, $_SUMMARY, $_DESCRIPTION_FORMAT, $_DESCRIPTION, $_RELEASE_DATE, $_VENDOR, $_VENDOR_URI, $_AUTO_MOUNT, $_INSTALLED_P, $_DATA_MODEL_LOADED_P) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • enable (scripted, public)

     xo::db::sql::apm_package_version[i] enable [ -dbn dbn ] \
    -version_id version_id

    Automatically generated method

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

    Testcases:
    No testcase defined.
    #function_args: {VERSION_ID {}}
foreach var [list VERSION_ID]  {
  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_version__enable($_VERSION_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::apm_package_version[i] new [ -dbn dbn ] \
    [ -version_id version_id ] -package_key package_key  \
    [ -version_name version_name ] -version_uri version_uri  \
    -summary summary  -description_format description_format  \
    -description description  -release_date release_date  \
    -vendor vendor  -vendor_uri vendor_uri  -auto_mount auto_mount  \
    [ -installed_p installed_p ] \
    [ -data_model_loaded_p data_model_loaded_p ] [ -childof childof ]

    Automatically generated method

    Switches:
    -dbn (optional)
    -version_id (optional)
    -package_key (required)
    -version_name (optional)
    -version_uri (required)
    -summary (required)
    -description_format (required)
    -description (required)
    -release_date (required)
    -vendor (required)
    -vendor_uri (required)
    -auto_mount (required)
    -installed_p (optional, defaults to "f")
    -data_model_loaded_p (optional, defaults to "f")
    -childof (optional)

    Testcases:
    No testcase defined.
    #function_args: {VERSION_ID null} {PACKAGE_KEY {}} {VERSION_NAME null} {VERSION_URI {}} {SUMMARY {}} {DESCRIPTION_FORMAT {}} {DESCRIPTION {}} {RELEASE_DATE {}} {VENDOR {}} {VENDOR_URI {}} {AUTO_MOUNT {}} {INSTALLED_P f} {DATA_MODEL_LOADED_P f}
foreach var [list VERSION_ID PACKAGE_KEY VERSION_NAME VERSION_URI SUMMARY DESCRIPTION_FORMAT DESCRIPTION RELEASE_DATE VENDOR VENDOR_URI AUTO_MOUNT INSTALLED_P DATA_MODEL_LOADED_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_version__new($_VERSION_ID, $_PACKAGE_KEY, $_VERSION_NAME, $_VERSION_URI, $_SUMMARY, $_DESCRIPTION_FORMAT, $_DESCRIPTION, $_RELEASE_DATE, $_VENDOR, $_VENDOR_URI, $_AUTO_MOUNT, $_INSTALLED_P, $_DATA_MODEL_LOADED_P) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • remove_dependency (scripted, public)

     xo::db::sql::apm_package_version[i] remove_dependency [ -dbn dbn ] \
    -dependency_uri dependency_uri  \
    -dependency_version dependency_version  -version_id version_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -dependency_uri (required)
    -dependency_version (required)
    -version_id (required)

    Testcases:
    No testcase defined.
    #function_args: {DEPENDENCY_URI {}} {DEPENDENCY_VERSION {}} {VERSION_ID {}}
foreach var [list DEPENDENCY_URI DEPENDENCY_VERSION VERSION_ID]  {
  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_version__remove_dependency($_DEPENDENCY_URI, $_DEPENDENCY_VERSION, $_VERSION_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • remove_interface (scripted, public)

     xo::db::sql::apm_package_version[i] remove_interface [ -dbn dbn ] \
    -interface_uri interface_uri  \
    -interface_version interface_version  -version_id version_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -interface_uri (required)
    -interface_version (required)
    -version_id (required)

    Testcases:
    No testcase defined.
    #function_args: {INTERFACE_URI {}} {INTERFACE_VERSION {}} {VERSION_ID {}}
foreach var [list INTERFACE_URI INTERFACE_VERSION VERSION_ID]  {
  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_version__remove_interface($_INTERFACE_URI, $_INTERFACE_VERSION, $_VERSION_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • sortable_version_name (scripted, public)

     xo::db::sql::apm_package_version[i] sortable_version_name [ -dbn dbn ] \
    -version_name version_name

    Automatically generated method

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

    Testcases:
    No testcase defined.
    #function_args: {VERSION_NAME {}}
foreach var [list VERSION_NAME]  {
  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_version__sortable_version_name($_VERSION_NAME) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • upgrade (scripted, public)

     xo::db::sql::apm_package_version[i] upgrade [ -dbn dbn ] \
    -version_id version_id

    Automatically generated method

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

    Testcases:
    No testcase defined.
    #function_args: {VERSION_ID {}}
foreach var [list VERSION_ID]  {
  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_version__upgrade($_VERSION_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • upgrade_p (scripted, public)

     xo::db::sql::apm_package_version[i] upgrade_p [ -dbn dbn ] -path path  \
    -initial_version_name initial_version_name  \
    -final_version_name final_version_name

    Automatically generated method

    Switches:
    -dbn (optional)
    -path (required)
    -initial_version_name (required)
    -final_version_name (required)

    Testcases:
    No testcase defined.
    #function_args: {PATH {}} {INITIAL_VERSION_NAME {}} {FINAL_VERSION_NAME {}}
foreach var [list PATH INITIAL_VERSION_NAME FINAL_VERSION_NAME]  {
  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_version__upgrade_p($_PATH, $_INITIAL_VERSION_NAME, $_FINAL_VERSION_NAME) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • version_name_greater (scripted, public)

     xo::db::sql::apm_package_version[i] version_name_greater [ -dbn dbn ] \
    -version_name_one version_name_one  \
    -version_name_two version_name_two

    Automatically generated method

    Switches:
    -dbn (optional)
    -version_name_one (required)
    -version_name_two (required)

    Testcases:
    No testcase defined.
    #function_args: {VERSION_NAME_ONE {}} {VERSION_NAME_TWO {}}
foreach var [list VERSION_NAME_ONE VERSION_NAME_TWO]  {
  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_version__version_name_greater($_VERSION_NAME_ONE, $_VERSION_NAME_TWO) 
    "
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::apm_package_version set __default_metaclass ::xotcl::Class
::xo::db::sql::apm_package_version set __default_superclass ::xotcl::Object
::xo::db::sql::apm_package_version set abstract_p f
::xo::db::sql::apm_package_version set auto_save false
::xo::db::sql::apm_package_version set name_method {}
::xo::db::sql::apm_package_version set object_type ::xo::db::sql::apm_package_version
::xo::db::sql::apm_package_version set security_inherit_p t
::xo::db::sql::apm_package_version set sql_package_name apm_package_version
::xo::db::sql::apm_package_version set supertype acs_object
::xo::db::sql::apm_package_version set with_table true