X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Fshare%2Fhtml%2FElements%2FCalendarSlotSchedule;h=538a41a941cef90765043881763488b83a20f196;hb=9c11fac3f8d3f31306de62185f623b7afb6e94ee;hp=8a0c617d9336a1a84513eb478b1a810be23b1d30;hpb=5c0e4713132f9ab262938a58154b078d408ebd06;p=freeside.git diff --git a/rt/share/html/Elements/CalendarSlotSchedule b/rt/share/html/Elements/CalendarSlotSchedule index 8a0c617d9..538a41a94 100644 --- a/rt/share/html/Elements/CalendarSlotSchedule +++ b/rt/share/html/Elements/CalendarSlotSchedule @@ -1,11 +1,14 @@ <%ARGS> - $Date => undef - @Tickets => () - $slots => $default_slots - $sday => undef - $tod_row => undef - $timestep => $default_timestep - @username => () + $Date => undef + @Tickets => () + $slots => $default_slots + $sday => undef + $tod_row => undef + $timestep => $default_timestep + @username => () + $LengthMin => $default_timestep + $custnum => undef + $pkgnum => undef %ARGS> % foreach my $username ( @username ) { % @@ -16,36 +19,145 @@ % % my $bgcolor = '666666;border-color:#555555'; % my $content = ''; +% my $link = ''; +% my $selectable = 0; +% my $draggable_ticketid = 0; +% my $draggable_length = 0; +% my $droppable = 0; +% my $cells = 0; % % #white out available times % foreach my $avail ( @{ $schedule{'avail'} } ) { % my( $start, $end ) = @$avail; % next if $start >= ($tod_row+$timestep) || $end <= $tod_row; % $bgcolor = 'FFFFFF'; +% $selectable = 1 +% if $LengthMin <= $end - $tod_row #the slot is long enough +% && ! grep { $_ > $tod_row && $LengthMin > $_ - $tod_row } +% map $_->[0], values %{ $schedule{'scheduled'} }; % } % % #block out / show / color code existing appointments +% #my %line = (); % foreach my $id ( keys %{ $schedule{'scheduled'} } ) { % % my( $starts, $due, $col, $t ) = @{ $schedule{'scheduled'}->{$id} }; % -% next if $starts >= ($tod_row+$timestep) || $due < $tod_row; +% next if $starts >= ($tod_row+$timestep) || $due <= $tod_row; % -% if ( $starts >= $tod_row ) { -% $bgcolor = $col; -% $content .= ($content?', ':''). $id; #XXX more -% } else { -% $bgcolor = $col; +% $bgcolor = $col; +% $selectable = 0; +% +% if ( $starts >= $tod_row ) { #first row +% +% #false laziness w/misc/xmlhttp-ticket-update.html & CalendarDaySchedule +% my %hash = $m->comp('/Ticket/Elements/Customers', Ticket => $t); +% my @cust_main = values( %{$hash{cust_main}} ); +% +% $content .= ($content?', ':''). #$id. ': '. +% #false laziness w/xmlhttp-ticket-update.html +% FS::sched_avail::pretty_time($starts). '-'. +% FS::sched_avail::pretty_time($due). +% ': '. $cust_main[0]->_FreesideURILabel; +% #'install for custname XX miles away'; #XXX placeholder/more +% $link = qq( view); +% $draggable_ticketid = $id; +% $draggable_length = $due - $starts; +% +% $cells = int( ($due-$starts) / $timestep ); +% $cells++ if ($due-$starts) % $timestep; +% +% #} else { +% # $content .= ($content?', ':''). $id; % } % } +% +% my $td_id = 'td_'. $Date->epoch. '_'. $tod_row. '_'. $username; -