Index: openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/category-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/category-create.sql,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/category-create.sql 4 Jun 2001 16:53:27 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/category-create.sql 9 Jul 2001 16:18:59 -0000 1.2 @@ -9,68 +9,59 @@ -- -- @cvs-id $Id$ -- +-- +-- Ported to OpenACS - Vinod Kurup (vkurup@massmed.org) +-- ---------------------------------- -- KNOWLEDGE LEVEL OBJECTS ---------------------------------- -create function inline_0 () -returns integer as ' -declare - attr_id acs_attributes.attribute_id%TYPE; -begin - perform acs_object_type__create_type ( - ''ttracker_category'', -- object_type - ''Ticket Tracker Category'', -- pretty_name - ''Ticket Tracker Categories'', -- pretty_plural - ''acs_object'', -- supertype - ''ttracker_categories'', -- table_name - ''category_id'', -- id_column - ''ttracker_category'', -- package_name - ''f'', -- abstract_p - null, -- type_extension_table - ''ttracker_category__name'' -- name_method - ); +select acs_object_type__create_type ( + 'ttracker_category', -- object_type + 'Ticket Tracker Category', -- pretty_name + 'Ticket Tracker Categories', -- pretty_plural + 'acs_object', -- supertype + 'ttracker_categories', -- table_name + 'category_id', -- id_column + 'ttracker_category', -- package_name + 'f', -- abstract_p + null, -- type_extension_table + 'ttracker_category__name' -- name_method +); - perform acs_attribute__create_attribute ( - ''ttracker_category'', -- object_type - ''name'', -- attribute_name - ''string'', -- datatype - ''Name'', -- pretty_name - ''Names'', -- pretty_plural - null, -- table_name - null, -- column_name - null, -- default_value - 1, -- min_n_values - 1, -- max_n_values - null, -- sort_order - ''type_specific'', -- storage - ''f'' -- static_p - ); +select acs_attribute__create_attribute ( + 'ttracker_category', -- object_type + 'name', -- attribute_name + 'string', -- datatype + 'Name', -- pretty_name + 'Names', -- pretty_plural + null, -- table_name + null, -- column_name + null, -- default_value + 1, -- min_n_values + 1, -- max_n_values + null, -- sort_order + 'type_specific', -- storage + 'f' -- static_p +); - perform acs_attribute__create_attribute ( - ''ttracker_category'', -- object_type - ''description'', -- attribute_name - ''string'', -- datatype - ''Description'', -- pretty_name - ''Descriptions'', -- pretty_plural - null, -- table_name - null, -- column_name - null, -- default_value - 1, -- min_n_values - 1, -- max_n_values - null, -- sort_order - ''type_specific'', -- storage - ''f'' -- static_p - ); +select acs_attribute__create_attribute ( + 'ttracker_category', -- object_type + 'description', -- attribute_name + 'string', -- datatype + 'Description', -- pretty_name + 'Descriptions', -- pretty_plural + null, -- table_name + null, -- column_name + null, -- default_value + 1, -- min_n_values + 1, -- max_n_values + null, -- sort_order + 'type_specific', -- storage + 'f' -- static_p +); - return 0; -end;' language 'plpgsql'; - -select inline_0 (); - -drop function inline_0 (); - ---------------------------------- -- OPERATIONAL LEVEL ---------------------------------- Index: openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/options-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/options-create.sql,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/options-create.sql 4 Jun 2001 16:53:27 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/options-create.sql 9 Jul 2001 16:18:59 -0000 1.2 @@ -9,6 +9,8 @@ -- -- @cvs-id $Id$ -- +-- Ported to OpenACS - Vinod Kurup (vkurup@massmed.org) +-- create table ttracker_options ( option_id integer @@ -29,7 +31,7 @@ constraint ttkr_options_function_ck check (function in ('severity', 'priority')), constraint ttkr_opt_pkg_fun_val_un unique(package_id, function, value), - constraint ttkr_opt_pkg_fun_nam_un unique(package_id, function, name) + constraint ttkr_opt_pkg_fun_nam_un unique(package_id, function, name) ); -- generating a sequence for the primary key Index: openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-create.sql,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-create.sql 4 Jun 2001 16:53:27 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-create.sql 9 Jul 2001 16:18:59 -0000 1.2 @@ -9,93 +9,89 @@ -- -- @cvs-id $Id$ -- +-- Ported to OpenACS - Vinod Kurup (vkurup@massmed.org) +-- ---------------------------------- -- KNOWLEDGE LEVEL OBJECTS ---------------------------------- ---declare --- attr_id acs_attributes.attribute_id%TYPE; ---begin - select acs_object_type__create_type ( - 'ttracker_ticket', - 'Ticket Tracker Ticket', - 'Ticket Tracker Tickets', - 'acs_message', - 'ttracker_tickets', - 'ticket_id', - 'ttracker_ticket', - 'f', - null, - 'ttracker_ticket.name' - ); +select acs_object_type__create_type ( + 'ttracker_ticket', + 'Ticket Tracker Ticket', + 'Ticket Tracker Tickets', + 'acs_message', + 'ttracker_tickets', + 'ticket_id', + 'ttracker_ticket', + 'f', + null, + 'ttracker_ticket.name' +); - select acs_attribute__create_attribute ( - 'ttracker_ticket', - 'category_id', - 'integer', - 'Category ID', - 'Category IDs', - null, - null, - null, - 1, - 1, - null, - 'type_specific', - 'f' - ); +select acs_attribute__create_attribute ( + 'ttracker_ticket', + 'category_id', + 'integer', + 'Category ID', + 'Category IDs', + null, + null, + null, + 1, + 1, + null, + 'type_specific', + 'f' +); - select acs_attribute__create_attribute ( - 'ttracker_ticket', - 'subject', - 'string', - 'Subject', - 'Subjects', - null, - null, - null, - 1, - 1, - null, - 'type_specific', - 'f' - ); +select acs_attribute__create_attribute ( + 'ttracker_ticket', + 'subject', + 'string', + 'Subject', + 'Subjects', + null, + null, + null, + 1, + 1, + null, + 'type_specific', + 'f' +); - select acs_attribute__create_attribute ( - 'ttracker_ticket', - 'severity', - 'integer', - 'Severity', - 'Severities', - null, - null, - null, - 1, - 1, - null, - 'type_specific', - 'f' - ); +select acs_attribute__create_attribute ( + 'ttracker_ticket', + 'severity', + 'integer', + 'Severity', + 'Severities', + null, + null, + null, + 1, + 1, + null, + 'type_specific', + 'f' +); - select acs_attribute__create_attribute ( - 'ttracker_ticket', - 'priority', - 'integer', - 'Priority', - 'Priorities', - null, - null, - null, - 1, - 1, - null, - 'type_specific', - 'f' - ); ---end; ---/ ---show errors +select acs_attribute__create_attribute ( + 'ttracker_ticket', + 'priority', + 'integer', + 'Priority', + 'Priorities', + null, + null, + null, + 1, + 1, + null, + 'type_specific', + 'f' +); ---------------------------------- -- OPERATIONAL LEVEL @@ -129,10 +125,12 @@ not null ); --- to prevent ttracker_tickets from getting locked when ttracker_categories table is being updated +-- to prevent ttracker_tickets from getting locked +-- when ttracker_categories table is being updated create index tt_category_id_idx on ttracker_tickets (category_id); --- to prevent ttracker_tickets from getting locked when persons table is being updated +-- to prevent ttracker_tickets from getting locked +-- when persons table is being updated create index tt_creation_user_idx on ttracker_tickets (creation_user); comment on table ttracker_tickets is ' Index: openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-tracker-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-tracker-create.sql,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-tracker-create.sql 4 Jun 2001 16:53:27 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-tracker-create.sql 9 Jul 2001 16:18:59 -0000 1.2 @@ -9,6 +9,8 @@ -- -- @cvs-id $Id$ -- +-- Ported to OpenACS - Vinod Kurup (vkurup@massmed.org) +-- \i options-create.sql \i category-create.sql Index: openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-tracker-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-tracker-drop.sql,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-tracker-drop.sql 4 Jun 2001 16:53:27 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-tracker-drop.sql 9 Jul 2001 16:18:59 -0000 1.2 @@ -9,6 +9,8 @@ -- -- @cvs-id $Id$ -- +-- Ported to OpenACS - Vinod Kurup (vkurup@massmed.org) +-- -- drop the workflow process \i ttracker-workflow-drop.sql Index: openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-tracker-packages.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-tracker-packages.sql,v diff -u -r1.4 -r1.5 --- openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-tracker-packages.sql 9 Jul 2001 15:40:08 -0000 1.4 +++ openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ticket-tracker-packages.sql 9 Jul 2001 16:18:59 -0000 1.5 @@ -9,13 +9,14 @@ -- -- @cvs-id $Id$ -- +-- Ported to OpenACS - Vinod Kurup (vkurup@massmed.org) +-- ---------------------------------- -- PACKAGE BODIES ---------------------------------- --- create or replace package body ttracker_ticket --- as +-- Package: ttracker_ticket create function ttracker_ticket__new (integer,varchar,integer,varchar,varchar,varchar,integer,integer,integer,timestamp,integer,varchar) returns integer as ' @@ -173,14 +174,8 @@ return v_cr_revision_id; end;' language 'plpgsql'; --- end ttracker_ticket; --- / --- show errors +-- Package: ttracker_category - --- create or replace package body ttracker_category --- as --- create function ttracker_category__new (integer,integer,varchar,timestamp,integer,varchar,integer,varchar,integer,varchar) returns integer as ' declare @@ -246,13 +241,8 @@ return v_result; end;' language 'plpgsql'; --- end ttracker_category; --- / --- show errors +-- Package: ttracker_option --- create or replace package body ttracker_option --- as - create function ttracker_option__add_option (integer,integer,varchar,varchar,integer) returns integer as ' declare @@ -347,13 +337,8 @@ return v_value; end;' language 'plpgsql'; --- end ttracker_option; --- / --- show errors +-- Package: ttracker_util --- create or replace package body ttracker_util --- as - create function ttracker_util__notification_sender (integer) returns integer as ' declare @@ -516,13 +501,8 @@ return 1; end;' language 'plpgsql'; --- end ttracker_util; --- / --- show errors +-- Package: ttracker_callback --- create or replace package body ttracker_callback --- as - create function ttracker_callback__assign_to_submitter (integer,varchar) returns integer as ' declare @@ -732,7 +712,3 @@ return 0; end;' language 'plpgsql'; - --- end ttracker_callback; --- / --- show errors Index: openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ttracker-workflow-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ttracker-workflow-create.sql,v diff -u -r1.2 -r1.3 --- openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ttracker-workflow-create.sql 12 Jun 2001 06:25:49 -0000 1.2 +++ openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ttracker-workflow-create.sql 9 Jul 2001 16:18:59 -0000 1.3 @@ -9,6 +9,8 @@ -- -- @cvs-id $Id$ -- +-- Ported to OpenACS - Vinod Kurup (vkurup@massmed.org) +-- -- This table will hold one row for each case using this workflow. create table wf_ttracker_cases ( @@ -20,170 +22,161 @@ ); ---declare --- v_workflow_key wf_workflows.workflow_key%TYPE; ---begin - select workflow__create_workflow( - 'ttracker_wf', -- workflow_key - 'Ticket Tracker Process', -- pretty_name - 'Ticket Tracker Process', -- pretty_plural - 'Workflow for processing a ticket in the ticket-tracker', -- description - 'wf_ttracker_cases', -- table_name - 'case_id' -- id_column - ); +select workflow__create_workflow( + 'ttracker_wf', -- workflow_key + 'Ticket Tracker Process', -- pretty_name + 'Ticket Tracker Process', -- pretty_plural + 'Workflow for processing a ticket in the ticket-tracker', -- description + 'wf_ttracker_cases', -- table_name + 'case_id' -- id_column +); -- Creating places - select workflow__add_place ( - 'ttracker_wf', -- workflow_key - 'start', -- place_key - 'Needs to be resolved', -- place_name - 1 -- sort_order - ); +select workflow__add_place ( + 'ttracker_wf', -- workflow_key + 'start', -- place_key + 'Needs to be resolved', -- place_name + 1 -- sort_order +); - select workflow__add_place ( - 'ttracker_wf', -- workflow_key - 'to_be_clarified', -- place_key - 'Needs to be clarified', -- place_name - 2 -- sort_order - ); +select workflow__add_place ( + 'ttracker_wf', -- workflow_key + 'to_be_clarified', -- place_key + 'Needs to be clarified', -- place_name + 2 -- sort_order +); - select workflow__add_place ( - 'ttracker_wf', -- workflow_key - 'to_be_verified', -- place_key - 'Needs to be verified', -- place_name - 3 -- sort_order - ); +select workflow__add_place ( + 'ttracker_wf', -- workflow_key + 'to_be_verified', -- place_key + 'Needs to be verified', -- place_name + 3 -- sort_order +); - select workflow__add_place ( - 'ttracker_wf', -- workflow_key - 'end', -- place_key - 'Closed', -- place_name - 4 -- sort_order - ); +select workflow__add_place ( + 'ttracker_wf', -- workflow_key + 'end', -- place_key + 'Closed', -- place_name + 4 -- sort_order +); - -- Creating transitions - select workflow__add_transition ( - 'ttracker_wf', -- workflow_key - 'resolve', -- transition_key - 'Resolve ticket', -- transition_name - 1, -- sort_order - 'user' -- trigger_type - ); +-- Creating transitions +select workflow__add_transition ( + 'ttracker_wf', -- workflow_key + 'resolve', -- transition_key + 'Resolve ticket', -- transition_name + 1, -- sort_order + 'user' -- trigger_type +); - select workflow__add_transition ( - 'ttracker_wf', -- workflow_key - 'clarify', -- transition_key - 'Clarify ticket description', -- transition_name - 2, -- sort_order - 'user' -- trigger_type - ); +select workflow__add_transition ( + 'ttracker_wf', -- workflow_key + 'clarify', -- transition_key + 'Clarify ticket description', -- transition_name + 2, -- sort_order + 'user' -- trigger_type +); - select workflow__add_transition ( - 'ttracker_wf', -- workflow_key - 'verify', -- transition_key - 'Verify result', -- transition_name - 3, -- sort_order - 'user' -- trigger_type - ); +select workflow__add_transition ( + 'ttracker_wf', -- workflow_key + 'verify', -- transition_key + 'Verify result', -- transition_name + 3, -- sort_order + 'user' -- trigger_type +); ---end; ---/ ---show errors ---begin - -- creating arcs - -- resolve in - -- in - select workflow__add_arc ( - 'ttracker_wf', -- workflow_key - 'resolve', -- transition_key - 'start', -- place_key - 'in', -- direction - null, -- guard_callback - null, -- guard_custom_arg - null -- guard_description - ); +-- creating arcs - -- out - select workflow__add_arc ( - 'ttracker_wf', -- workflow_key - 'resolve', -- transition_key - 'to_be_clarified', -- place_key - 'out', -- direction - 'wf_callback__guard_attribute_true', -- guard_callback - 'need_clarification', -- guard_custom_arg - 'Description needs clarification' -- guard_description - ); +-- resolve +-- in +select workflow__add_arc ( + 'ttracker_wf', -- workflow_key + 'resolve', -- transition_key + 'start', -- place_key + 'in', -- direction + null, -- guard_callback + null, -- guard_custom_arg + null -- guard_description +); - select workflow__add_arc ( - 'ttracker_wf', -- workflow_key - 'resolve', -- transition_key - 'to_be_verified', -- place_key - 'out', -- direction - '#', -- guard_callback - null, -- guard_custom_arg - 'Description clear; issue resolved' -- guard_description - ); +-- out +select workflow__add_arc ( + 'ttracker_wf', -- workflow_key + 'resolve', -- transition_key + 'to_be_clarified', -- place_key + 'out', -- direction + 'wf_callback__guard_attribute_true', -- guard_callback + 'need_clarification', -- guard_custom_arg + 'Description needs clarification' -- guard_description +); + +select workflow__add_arc ( + 'ttracker_wf', -- workflow_key + 'resolve', -- transition_key + 'to_be_verified', -- place_key + 'out', -- direction + '#', -- guard_callback + null, -- guard_custom_arg + 'Description clear; issue resolved' -- guard_description +); - -- verify - -- in - select workflow__add_arc ( - 'ttracker_wf', -- workflow_key - 'verify', -- transition_key - 'to_be_verified', -- place_key - 'in', -- direction - null, -- guard_callback - null, -- guard_custom_arg - null -- guard_description - ); +-- verify +-- in +select workflow__add_arc ( + 'ttracker_wf', -- workflow_key + 'verify', -- transition_key + 'to_be_verified', -- place_key + 'in', -- direction + null, -- guard_callback + null, -- guard_custom_arg + null -- guard_description +); - -- out - select workflow__add_arc ( - 'ttracker_wf', -- workflow_key - 'verify', -- transition_key - 'end', -- place_key - 'out', -- direction - 'wf_callback__guard_attribute_true', -- guard_callback - 'verified', -- guard_custom_arg - 'Result okay' -- guard_description - ); +-- out +select workflow__add_arc ( + 'ttracker_wf', -- workflow_key + 'verify', -- transition_key + 'end', -- place_key + 'out', -- direction + 'wf_callback__guard_attribute_true', -- guard_callback + 'verified', -- guard_custom_arg + 'Result okay' -- guard_description +); - select workflow__add_arc ( - 'ttracker_wf', -- workflow_key - 'verify', -- transition_key - 'start', -- place_key - 'out', -- direction - '#', -- guard_callback - null, -- guard_custom_arg - 'Result not okay' -- guard_description - ); +select workflow__add_arc ( + 'ttracker_wf', -- workflow_key + 'verify', -- transition_key + 'start', -- place_key + 'out', -- direction + '#', -- guard_callback + null, -- guard_custom_arg + 'Result not okay' -- guard_description +); - -- clarify - -- in - select workflow__add_arc ( - 'ttracker_wf', -- workflow_key - 'clarify', -- transition_key - 'to_be_clarified', -- place_key - 'in', -- direction - null, -- guard_callback - null, -- guard_custom_arg - null -- guard_description - ); +-- clarify +-- in +select workflow__add_arc ( + 'ttracker_wf', -- workflow_key + 'clarify', -- transition_key + 'to_be_clarified', -- place_key + 'in', -- direction + null, -- guard_callback + null, -- guard_custom_arg + null -- guard_description +); - -- out - select workflow__add_arc ( - 'ttracker_wf', -- workflow_key - 'clarify', -- transition_key - 'start', -- place_key - 'out', -- direction - null, -- guard_callback - null, -- guard_custom_arg - null -- guard_description - ); +-- out +select workflow__add_arc ( + 'ttracker_wf', -- workflow_key + 'clarify', -- transition_key + 'start', -- place_key + 'out', -- direction + null, -- guard_callback + null, -- guard_custom_arg + null -- guard_description +); ---end; ---/ ---show errors create function inline_0 () returns integer as ' @@ -252,38 +245,6 @@ drop function inline_1 (); ---declare --- v_attribute_id acs_attributes.attribute_id%TYPE; ---begin --- v_attribute_id := workflow.create_attribute( --- workflow_key => 'ttracker_wf', --- attribute_name => 'need_clarification', --- datatype => 'boolean', --- pretty_name => 'Description needs clarification', --- default_value => 'f' --- ); --- --- insert into wf_transition_attribute_map --- (workflow_key, transition_key, attribute_id, sort_order) --- values --- ('ttracker_wf', 'resolve', v_attribute_id, 1); --- --- v_attribute_id := workflow.create_attribute( --- workflow_key => 'ttracker_wf', --- attribute_name => 'verified', --- datatype => 'boolean', --- pretty_name => 'Result is okay', --- default_value => 't' --- ); --- --- insert into wf_transition_attribute_map --- (workflow_key, transition_key, attribute_id, sort_order) --- values --- ('ttracker_wf', 'verify', v_attribute_id, 1); ---end; ---/ ---show errors - insert into wf_context_transition_info ( context_key, workflow_key, Index: openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ttracker-workflow-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ttracker-workflow-drop.sql,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ttracker-workflow-drop.sql 4 Jun 2001 16:53:27 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/ticket-tracker/sql/postgresql/ttracker-workflow-drop.sql 9 Jul 2001 16:18:59 -0000 1.2 @@ -9,17 +9,11 @@ -- -- @cvs-id $Id$ -- +-- Ported to OpenACS - Vinod Kurup (vkurup@massmed.org) +-- --- begin - select workflow__delete_cases('ttracker_wf'); --- end; --- / --- show errors +select workflow__delete_cases('ttracker_wf'); drop table wf_ttracker_cases; --- begin - select workflow__drop_workflow('ttracker_wf'); --- end; --- / --- show errors +select workflow__drop_workflow('ttracker_wf');