X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Fshare%2Fhtml%2FElements%2FCalendarSlotSchedule;h=b82997be82132e3a9d1a9c477d435e1040e4d4fd;hb=efb3f4ff4890d19c2877600cf3a27ad77a45ee70;hp=bf66dcae546e82e826bb0118ab1302461b846ad8;hpb=8ed14c4f01f47c35a4a21e2daa6e642d51a7270c;p=freeside.git
diff --git a/rt/share/html/Elements/CalendarSlotSchedule b/rt/share/html/Elements/CalendarSlotSchedule
index bf66dcae5..b82997be8 100644
--- a/rt/share/html/Elements/CalendarSlotSchedule
+++ b/rt/share/html/Elements/CalendarSlotSchedule
@@ -9,6 +9,7 @@
$LengthMin => $default_timestep
$custnum => undef
$pkgnum => undef
+ $RedirectToBasics => 0
%ARGS>
% foreach my $username ( @username ) {
%
@@ -19,6 +20,7 @@
%
% my $bgcolor = '666666;border-color:#555555';
% my $content = '';
+% my $link = '';
% my $selectable = 0;
% my $draggable_ticketid = 0;
% my $draggable_length = 0;
@@ -59,6 +61,13 @@
% FS::sched_avail::pretty_time($due).
% ': '. $cust_main[0]->_FreesideURILabel;
% #'install for custname XX miles away'; #XXX placeholder/more
+% $link = qq( view ).
+% include('/elements/popup_link.html',
+% action=>$RT::WebPath.'/Ticket/ModifyCustomFieldsPopup.html?id='.$id,
+% label =>'edit',
+% actionlabel => 'Edit appointment',
+% height => 436, # better: A + B * (num_custom_fields)
+% );
% $draggable_ticketid = $id;
% $draggable_length = $due - $starts;
%
@@ -100,8 +109,8 @@
%
% my $member = "freeside://freeside/cust_main/$custnum";
%
-%warn my $Starts = int($tod_row/60). ':'. sprintf('%02d',$tod_row%60). ':00';
-%warn my $Due = int(($tod_row+$LengthMin)/60). ':'.
+% my $Starts = int($tod_row/60). ':'. sprintf('%02d',$tod_row%60). ':00';
+% my $Due = int(($tod_row+$LengthMin)/60). ':'.
% sprintf('%02d',($tod_row+$LengthMin)%60). ':00';
%
% my $url = $RT::WebPath. '/Ticket/Display.html?id=new'.
@@ -110,7 +119,8 @@
% '&Starts='. $Date->strftime('%F').'%20'. $Starts.
% '&Due='. $Date->strftime('%F').'%20'. $Due.
% '&new-MemberOf='. $member. #XXX uri_escape?
-% '&Status=new';
+% '&Status=new'.
+% '&RedirectToBasics='.$RedirectToBasics;
% #'&Requestors='. #XXX Freeside customer requestor(s) (package?
onmouseover = "boxon(this);"
@@ -126,7 +136,7 @@
% }
%
% }
- ><% $content |h %>
+ ><% $content |h %><% $link |n %>