Index: openacs-4/packages/bug-tracker/tcl/bug-tracker-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/tcl/bug-tracker-procs-oracle.xql,v
diff -u -N -r1.7 -r1.8
--- openacs-4/packages/bug-tracker/tcl/bug-tracker-procs-oracle.xql 17 Jun 2010 18:51:45 -0000 1.7
+++ openacs-4/packages/bug-tracker/tcl/bug-tracker-procs-oracle.xql 23 Nov 2017 15:10:37 -0000 1.8
@@ -3,189 +3,42 @@
oracle8.1.6
-
-
- select b.bug_id,
- b.bug_number,
- b.summary,
- b.project_id,
- o.creation_user as submitter_user_id,
- submitter.first_names as submitter_first_names,
- submitter.last_name as submitter_last_name,
- submitter.email as submitter_email,
- b.component_id,
- c.component_name,
- o.creation_date,
- to_char(o.creation_date, 'YYYY-MM-DD HH24:MI:SS') as creation_date_pretty,
- st.pretty_name as status,
- b.resolution,
- b.user_agent,
- b.found_in_version,
- b.fix_for_version,
- b.fixed_in_version,
- to_char(sysdate, 'YYYY-MM-DD HH24:MI:SS') as now_pretty
- from bt_bugs b,
- acs_objects o,
- bt_components c,
- cc_users submitter,
- workflow_cases cas,
- workflow_case_fsm cfsm,
- workflow_fsm_states st
- where b.bug_id = :bug_id
- and b.project_id = :package_id
- and o.object_id = b.bug_id
- and c.component_id = b.component_id
- and submitter.user_id = o.creation_user
- and cas.object_id = b.bug_id
- and cfsm.case_id = cas.case_id
- and cfsm.current_state = st.state_id
-
-
-
-
-
-
-
-
- select pck.instance_name as project_name,
- prj.description as project_description,
- prj.folder_id as project_folder_id,
- prj.root_keyword_id as project_root_keyword_id,
- ver.version_id as current_version_id,
- nvl(ver.version_name, 'None') as current_version_name
- from apm_packages pck,
- bt_projects prj,
- (select * from bt_versions where active_version_p = 't') ver
- where pck.package_id = :package_id
- and prj.project_id = pck.package_id
- and prj.project_id = ver.project_id (+)
-
-
-
-
-
-
- select 1
- from bt_bugs
- where project_id = :package_id
- and rownum = 1
-
-
-
-
-
-
- select u.first_names as user_first_names,
- u.last_name as user_last_name,
- u.email as user_email,
- ver.version_id as user_version_id,
- nvl(ver.version_name, 'None') as user_version_name
- from cc_users u,
- bt_user_prefs up,
- bt_versions ver
- where u.user_id = :user_id
- and up.user_id = u.user_id
- and up.project_id = :package_id
- and up.user_version = ver.version_id (+)
-
-
-
-
-
-
+
+
begin
bt_project.keywords_delete(:package_id, 'f');
end;
-
-
+
+
-
-
+
+
select acs_object.name(party_id) from parties where party_id = :filter_assignee
-
-
+
+
-
-
- b.creation_date + :filter_n_days > sysdate
-
-
-
-
-
+
+
content_keyword.is_assigned(b.bug_id, $keyword_id, 'none') = 't'
-
-
+
+
-
-
+
+
begin
bt_project.del(:project_id);
end;
-
-
+
+
-
-
+
+
begin
bt_project.new(:project_id);
end;
-
-
+
+
-
-
- select kw.heading,
- km.keyword_id,
- count(b.bug_id)
- from cr_keywords kw,
- cr_item_keyword_map km,
- bt_bugs b
- where kw.parent_id = :parent_id
- and km.keyword_id = kw.keyword_id
- and b.bug_id (+) = km.item_id
- and b.project_id = :package_id
- [bug_tracker::user_bugs_only_where_clause]
- group by kw.heading, km.keyword_id
- order by kw.heading
-
-
-
-
-
- select v.version_name,
- b.fix_for_version,
- count(b.bug_id) as num_bugs
- from bt_bugs b,
- bt_versions v
- where b.project_id = :package_id
- and v.version_id (+) = b.fix_for_version
- [bug_tracker::user_bugs_only_where_clause]
- group by b.fix_for_version, v.anticipated_freeze_date, v.version_name
- order by v.anticipated_freeze_date, v.version_name
-
-
-
-
-
- select p.first_names || ' ' || p.last_name as name,
- crum.user_id,
- count(b.bug_id) as num_bugs
- from bt_bugs b,
- workflow_case_assigned_actions aa,
- workflow_case_role_user_map crum,
- persons p
- where aa.workflow_id = :workflow_id
- and aa.action_id = :action_id
- and aa.object_id = b.bug_id
- and crum.case_id (+) = aa.case_id
- and crum.role_id (+) = aa.role_id
- and p.person_id (+) = crum.user_id
- $user_bugs_onlyx_where_clause
- group by p.first_names, p.last_name, crum.user_id
-
-
-
select acs_object.name(p.party_id) || ' (' || p.email || ')' as label,
@@ -195,17 +48,6 @@
where workflow_case_role_party_map.case_id = workflow_cases.case_id
and workflow_cases.workflow_id = :workflow_id)
-
-
-
-
-
- select p.instance_name, o.creation_user, o.creation_ip
- from apm_packages p, acs_objects o
- where p.package_id = o.object_id
- and p.package_id = :project_id
-
-
Index: openacs-4/packages/bug-tracker/tcl/bug-tracker-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/tcl/bug-tracker-procs-postgresql.xql,v
diff -u -N -r1.7 -r1.8
--- openacs-4/packages/bug-tracker/tcl/bug-tracker-procs-postgresql.xql 17 Jun 2010 18:51:45 -0000 1.7
+++ openacs-4/packages/bug-tracker/tcl/bug-tracker-procs-postgresql.xql 23 Nov 2017 15:10:37 -0000 1.8
@@ -1,129 +1,35 @@
- postgresql7.1
-
-
-
-
- select b.bug_id,
- b.bug_number,
- b.summary,
- b.project_id,
- o.creation_user as submitter_user_id,
- submitter.first_names as submitter_first_names,
- submitter.last_name as submitter_last_name,
- submitter.email as submitter_email,
- b.component_id,
- c.component_name,
- o.creation_date,
- to_char(o.creation_date, 'YYYY-MM-DD HH24:MI:SS') as creation_date_pretty,
- st.pretty_name as status,
- b.resolution,
- b.user_agent,
- b.found_in_version,
- b.fix_for_version,
- b.fixed_in_version,
- to_char(now(), 'YYYY-MM-DD HH24:MI:SS') as now_pretty
- from bt_bugs b,
- acs_objects o,
- bt_components c,
- cc_users submitter,
- workflow_cases cas,
- workflow_case_fsm cfsm,
- workflow_fsm_states st
- where b.bug_id = :bug_id
- and b.project_id = :package_id
- and o.object_id = b.bug_id
- and c.component_id = b.component_id
- and submitter.user_id = o.creation_user
- and cas.object_id = b.bug_id
- and cfsm.case_id = cas.case_id
- and cfsm.current_state = st.state_id
-
-
-
-
+ postgresql7.1
-
+
-
- select pck.instance_name as project_name,
- prj.description as project_description,
- prj.folder_id as project_folder_id,
- prj.root_keyword_id as project_root_keyword_id,
- ver.version_id as current_version_id,
- coalesce(ver.version_name, 'None') as current_version_name
- from apm_packages pck,
- bt_projects prj
- left outer join bt_versions ver
- on (ver.project_id = prj.project_id and active_version_p = 't')
- where pck.package_id = :package_id
- and prj.project_id = pck.package_id
-
-
-
-
-
-
- select 1
- from bt_bugs
- where project_id = :package_id
- limit 1
-
-
-
-
-
-
- select u.first_names as user_first_names,
- u.last_name as user_last_name,
- u.email as user_email,
- ver.version_id as user_version_id,
- coalesce(ver.version_name, 'None') as user_version_name
- from cc_users u,
- bt_user_prefs up
- left outer join bt_versions ver
- on (ver.version_id = up.user_version)
- where u.user_id = :user_id
- and up.user_id = u.user_id
- and up.project_id = :package_id
-
-
-
-
-
-
-
select bt_project__keywords_delete(:package_id, 'f')
-
+
select acs_object__name(party_id) from parties where party_id = :filter_assignee
-
-
- age(b.creation_date) < interval '$filter_n_days days'
-
-
-
content_keyword__is_assigned(b.bug_id, $keyword_id, 'none')
+
left outer join cr_item_keyword_map km_order on (km_order.item_id = b.bug_id)
join cr_keywords kw_order on (km_order.keyword_id = kw_order.keyword_id and kw_order.parent_id = :filter_orderby)
-
+
+
1=1
@@ -142,70 +48,15 @@
-
+
- select kw.heading,
- km.keyword_id,
- count(b.bug_id)
- from cr_keywords kw join
- cr_item_keyword_map km using (keyword_id) left outer join
- bt_bugs b on (b.bug_id = km.item_id)
- where kw.parent_id = :parent_id
- and b.project_id = :package_id
- [bug_tracker::user_bugs_only_where_clause]
- group by kw.heading, km.keyword_id
- order by kw.heading
-
-
-
-
-
- select v.version_name,
- b.fix_for_version,
- count(b.bug_id) as num_bugs
- from bt_bugs b left outer join
- bt_versions v on (v.version_id = b.fix_for_version)
- where b.project_id = :package_id
- [bug_tracker::user_bugs_only_where_clause]
- group by b.fix_for_version, v.anticipated_freeze_date, v.version_name
- order by v.anticipated_freeze_date, v.version_name
-
-
-
-
-
- select p.first_names || ' ' || p.last_name as name,
- crum.user_id,
- count(b.bug_id) as num_bugs
- from bt_bugs b,
- workflow_case_assigned_actions aa left outer join
- workflow_case_role_user_map crum on (crum.case_id = aa.case_id and crum.role_id = aa.role_id) left outer join
- persons p on (p.person_id = crum.user_id)
- where aa.workflow_id = :workflow_id
- and aa.action_id = :action_id
- and aa.object_id = b.bug_id
- [bug_tracker::user_bugs_only_where_clause]
- group by p.first_names, p.last_name, crum.user_id
-
-
-
-
-
select acs_object__name(p.party_id) || ' (' || p.email || ')' as label,
party_id from parties p
where party_id in (select distinct(party_id) from workflow_case_role_party_map,
workflow_cases
where workflow_case_role_party_map.case_id = workflow_cases.case_id
and workflow_cases.workflow_id = :workflow_id)
-
-
+
+
-
-
- select p.instance_name, o.creation_user, o.creation_ip
- from apm_packages p join acs_objects o on (p.package_id = o.object_id)
- where p.package_id = :project_id
-
-
-
Index: openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.xql,v
diff -u -N -r1.9 -r1.10
--- openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.xql 6 Jul 2016 09:01:02 -0000 1.9
+++ openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.xql 23 Nov 2017 15:10:37 -0000 1.10
@@ -284,6 +284,153 @@
+
+
+ b.creation_date + interval :filter_n_days day > current_timestamp
+
+
+
+
+
+
+ select b.bug_id,
+ b.bug_number,
+ b.summary,
+ b.project_id,
+ o.creation_user as submitter_user_id,
+ submitter.first_names as submitter_first_names,
+ submitter.last_name as submitter_last_name,
+ submitter.email as submitter_email,
+ b.component_id,
+ c.component_name,
+ o.creation_date,
+ to_char(o.creation_date, 'YYYY-MM-DD HH24:MI:SS') as creation_date_pretty,
+ st.pretty_name as status,
+ b.resolution,
+ b.user_agent,
+ b.found_in_version,
+ b.fix_for_version,
+ b.fixed_in_version,
+ to_char(current_timestamp, 'YYYY-MM-DD HH24:MI:SS') as now_pretty
+ from bt_bugs b,
+ acs_objects o,
+ bt_components c,
+ cc_users submitter,
+ workflow_cases cas,
+ workflow_case_fsm cfsm,
+ workflow_fsm_states st
+ where b.bug_id = :bug_id
+ and b.project_id = :package_id
+ and o.object_id = b.bug_id
+ and c.component_id = b.component_id
+ and submitter.user_id = o.creation_user
+ and cas.object_id = b.bug_id
+ and cfsm.case_id = cas.case_id
+ and cfsm.current_state = st.state_id
+
+
+
-
+
+
+
+ select pck.instance_name as project_name,
+ prj.description as project_description,
+ prj.folder_id as project_folder_id,
+ prj.root_keyword_id as project_root_keyword_id,
+ ver.version_id as current_version_id,
+ coalesce(ver.version_name, 'None') as current_version_name
+ from apm_packages pck,
+ bt_projects prj
+ left outer join bt_versions ver
+ on (ver.project_id = prj.project_id and active_version_p = 't')
+ where pck.package_id = :package_id
+ and prj.project_id = pck.package_id
+
+
+
+
+
+
+ select 1
+ from bt_bugs
+ where project_id = :package_id
+ limit 1
+
+
+
+
+
+
+ select u.first_names as user_first_names,
+ u.last_name as user_last_name,
+ u.email as user_email,
+ ver.version_id as user_version_id,
+ coalesce(ver.version_name, 'None') as user_version_name
+ from cc_users u,
+ bt_user_prefs up
+ left outer join bt_versions ver
+ on (ver.version_id = up.user_version)
+ where u.user_id = :user_id
+ and up.user_id = u.user_id
+ and up.project_id = :package_id
+
+
+
+
+
+
+ select kw.heading,
+ km.keyword_id,
+ count(b.bug_id)
+ from cr_keywords kw join
+ cr_item_keyword_map km using (keyword_id) left outer join
+ bt_bugs b on (b.bug_id = km.item_id)
+ where kw.parent_id = :parent_id
+ and b.project_id = :package_id
+ [bug_tracker::user_bugs_only_where_clause]
+ group by kw.heading, km.keyword_id
+ order by kw.heading
+
+
+
+
+
+ select v.version_name,
+ b.fix_for_version,
+ count(b.bug_id) as num_bugs
+ from bt_bugs b left outer join
+ bt_versions v on (v.version_id = b.fix_for_version)
+ where b.project_id = :package_id
+ [bug_tracker::user_bugs_only_where_clause]
+ group by b.fix_for_version, v.anticipated_freeze_date, v.version_name
+ order by v.anticipated_freeze_date, v.version_name
+
+
+
+
+
+ select p.first_names || ' ' || p.last_name as name,
+ crum.user_id,
+ count(b.bug_id) as num_bugs
+ from bt_bugs b,
+ workflow_case_assigned_actions aa left outer join
+ workflow_case_role_user_map crum on (crum.case_id = aa.case_id and crum.role_id = aa.role_id) left outer join
+ persons p on (p.person_id = crum.user_id)
+ where aa.workflow_id = :workflow_id
+ and aa.action_id = :action_id
+ and aa.object_id = b.bug_id
+ [bug_tracker::user_bugs_only_where_clause]
+ group by p.first_names, p.last_name, crum.user_id
+
+
+
+
+
+ select p.instance_name, o.creation_user, o.creation_ip
+ from apm_packages p join acs_objects o on (p.package_id = o.object_id)
+ where p.package_id = :project_id
+
+
+