- Added Action "Move to different container"

sql/postgresql/intranet-helpdesk-create.sql

@@ -852,6 +852,10 @@ update im_categories set aux_string1 = '/intranet-helpdesk/action-duplicated' wh
 SELECT im_category_new(30530, 'Set status: Open', 'Intranet Ticket Action');
 SELECT im_category_new(30532, 'Set status: Open & notify', 'Intranet Ticket Action');
 SELECT im_category_new(30534, 'Reassign', 'Intranet Ticket Action');
+
+SELECT im_category_new(30536, 'Move to other container', 'Intranet Ticket Action');
+update im_categories set aux_string1 = '/intranet-helpdesk/action-move' where category_id = 30536;
+
 SELECT im_category_new(30540, 'Associate ticket with other objects', 'Intranet Ticket Action');
 SELECT im_category_new(30545, 'Change Priority', 'Intranet Ticket Action');
 SELECT im_category_new(30550, 'Problem Ticket: Create from incident', 'Intranet Ticket Action');

sql/postgresql/upgrade/upgrade-5.0.3.0.0-5.0.3.0.1.sql

+-- upgrade-5.0.3.0.0-5.0.3.0.1.sql
+
+SELECT acs_log__debug('/packages/intranet-helpdesk/sql/postgresql/upgrade/upgrade-5.0.3.0.0-5.0.3.0.1.sql','');
+
+
+SELECT im_category_new(30536, 'Move to other container', 'Intranet Ticket Action');
+update im_categories set aux_string1 = '/intranet-helpdesk/action-move' where category_id = 30536;
+
+

www/action-move-2.adp

+<master>
+<property name="doc(title)">@page_title;literal@</property>
+<property name="context">#intranet-core.context#</property>
+<property name="main_navbar_label">helpdesk</property>
+
+@usr_mess;noquote@
+
+<a href="@return_url@"><%=[lang::message::lookup "" acs-subsite.Go_back "Back"]%></a>
+

www/action-move-2.tcl

+# /packages/intranet-helpdesk/www/action-move-2.tcl
+#
+# Copyright (C) 2003-2008 ]project-open[
+#
+# All rights reserved. Please check
+# http://www.project-open.com/license/ for details.
+
+ad_page_contract {
+
+    @param tid The list of ticket_id's 
+    @author klaus.hofeditz@project-open.com
+} {
+    { tid:integer,multiple {}}
+    { ticket_container_id "" }
+    { return_url "/intranet-helpdesk/index" }
+}
+
+# ---------------------------------------------------------------
+# Defaults & Security
+# ---------------------------------------------------------------
+
+set current_user_id [auth::require_login]
+set page_title [lang::message::lookup "" intranet-helpdesk.Title_Move_Ticket "Move Ticket"]
+
+if {"" == $ticket_container_id} {
+    ad_return_complaint 1  [lang::message::lookup "" intranet-helpdesk.Please_Provide_Ticket_Container "Please Select Ticket Container"]
+}
+
+set err_msg ""
+foreach ticket_id $tid {
+
+    im_ticket::audit -ticket_id $ticket_id -action "before_update"
+    if {[catch {
+	db_dml update_ticket_container "update im_projects set parent_id = :ticket_container_id where project_id = :ticket_id"
+    } err_msg]} {
+	set msg [lang::message::lookup "" intranet-helpdesk.Change_Container_Problems "We found problems while updating the ticket container"]
+	ad_return_complaint 1 "$msg:<br>$err_msg"
+	break
+    }
+    im_ticket::audit -ticket_id $ticket_id -action "after_update"
+}
+
+set fb_msg [lang::message::lookup "" intranet-helpdesk.Moved_Msg "The ticket(s) have been moved."]
+ad_returnredirect -message $fb_msg $return_url

www/action-move.adp

+<master>
+<property name="doc(title)">@page_title;literal@</property>
+<property name="context">#intranet-core.context#</property>
+<property name="main_navbar_label">helpdesk</property>
+
+<h2><%=[lang::message::lookup "" intranet-helpdesk.Ticket_Move "Move the following tickets to another container"]%>:</h2>
+<p>@ticket_list_html;noquote@</p>
+<br><br>
+<form action="<%=$form_action%>" method="GET">
+@select_box;noquote@
+@hidden_tid_html;noquote@
+<input type='hidden' name='return_url' value='@return_url@'>
+<input class="form-button40" name="formbutton:send" value="Submit" type="submit">
+</form>
+

www/action-move.tcl

+# /packages/intranet-helpdesk/www/action-move.tcl
+#
+# Copyright (C) 2003-2014 ]project-open[
+#
+# All rights reserved. Please check
+# http://www.project-open.com/license/ for details.
+
+ad_page_contract {
+    @author frank.bergmann@project-open.com
+} {
+    { tid:integer,multiple ""}
+    { ticket_ids {} }
+    action_id:integer
+    { ticket_id_from_search:integer "" }
+    { return_url "/intranet-helpdesk/index" }
+}
+
+
+# ---------------------------------------------------------------
+# Defaults & Security
+# ---------------------------------------------------------------
+
+set current_user_id [auth::require_login]
+set ticket_ids [list]
+set page_title [lang::message::lookup "" intranet-helpdesk.Title_Move "Move Tickets"]
+if {1 == [llength $tid]} { set tid [lindex $tid 0] }
+
+set hidden_tid_html ""
+foreach ticket_id $tid {
+    lappend ticket_ids $ticket_id
+    append hidden_tid_html "<input type='hidden' name='tid' value='$ticket_id'>\n"
+}
+
+set no_assignee_l10n [lang::message::lookup "" intranet-helpdesk.No_Assignee_None "<none>"]
+set sql "
+	select	p.project_name,
+		coalesce(acs_object__name(t.ticket_assignee_id), :no_assignee_l10n) as ticket_assignee_name
+	from	im_projects p,
+		im_tickets t
+	where	project_id in ([join $ticket_ids ","]) and 
+		t.ticket_id = p.project_id
+"
+
+set ticket_list_html "<ul>"
+db_foreach ticket $sql {
+    append ticket_list_html "<li>${project_name} </li>"
+}
+append ticket_list_html "</ul>"
+
+set select_box [im_project_select -project_type_id [im_project_type_ticket_container] ticket_container_id]
+
+# set form_action [export_vars -base action-move-2 {tid return_url}]
+set form_action "action-move-2"