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
+
+
+