- Publicity: Public Only All
group-type-procs.tcl
Procs for creating group types
- Location:
- packages/acs-subsite/tcl/group-type-procs.tcl
- Created:
- Tue Nov 7 22:52:39 2000
- Author:
- mbryzek@arsdigita.com
- CVS Identification:
$Id: group-type-procs.tcl,v 1.12.2.5 2024/08/09 17:32:33 gustafn Exp $
Procedures in this file
- group_type::delete (public)
- group_type::drop_all_groups_p (public)
- group_type::new (public)
Detailed information
group_type::delete (public)
group_type::delete -group_type group_type
Deletes a group type
- Switches:
- -group_type (required)
- type to be deleted
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
- acs_subsite_group_type
group_type::drop_all_groups_p (public)
group_type::drop_all_groups_p [ -user_id user_id ] group_type
Returns 1 if the user has permission to delete all groups of the specified type. 0 otherwise.
user_id
defaults toad_conn user_id
if we have a connection. If there is no connection, and no user id, throws an error.
- Switches:
- -user_id (optional)
- Parameters:
- group_type (required)
- Author:
- Michael Bryzek <mbryzek@arsdigita.com>
- Created:
- 12/2000
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
- No testcase defined.
group_type::new (public)
group_type::new [ -group_type group_type ] [ -execute_p execute_p ] \ [ -supertype supertype ] pretty_name pretty_plural
Creates a new group type
Example:
# create a new group of type user_discount_class set group_type [group_type::new -group_type $group_type -supertype group "User Discount Class" "User Discount Classes"]
- Switches:
- -group_type (optional)
- The type of group_type to create. If empty, we generate a unique group_type based on "group_id" where id is the next value from acs_object_id_seq.
- -execute_p (optional, defaults to
"t"
)- If t, we execute the pl/sql. If f, we return a string that represents the pl/sql we are about to execute.
- -supertype (optional, defaults to
"group"
)- Parameters:
- pretty_name (required)
- pretty_plural (required)
- Returns:
- the
group_type
of the object created- Author:
- Michael Bryzek <mbryzek@arsdigita.com>
- Created:
- 12/2000
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
- acs_subsite_group_type