xo::db::Class instproc create_object_type (public)
<instance of xo::db::Class> create_object_type
Defined in /var/www/openacs.org/packages/xotcl-core/tcl/05-db-procs.tcl
Create an acs object_type for the current XOTcl class
- Testcases:
- xotcl_core_tutorial_2
Source code: :check_default_values :check_table_atts # The default supertype is acs_object. If the supertype # was not changed (still acs_object), we map the superclass # to the object_type to obtain the ACS supertype. if {${:supertype} eq "acs_object"} { set :supertype [::xo::db::Class class_to_object_type [:info superclass]] } ::acs::dc call acs_object_type create_type -object_type ${:object_type} -supertype ${:supertype} -pretty_name ${:pretty_name} -pretty_plural ${:pretty_plural} -table_name ${:table_name} -id_column ${:id_column} -abstract_p ${:abstract_p} -name_method ${:name_method} -package_name [:sql_package_name]XQL Not present: Generic, PostgreSQL, Oracle