X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Fshare%2Fhtml%2FElements%2FCalendarSlotSchedule;h=c8d3bfaa6f9ef2c59e51ef8de0bf4a9b776c6347;hb=653545aa57687de24286d0955a047cb20f6e0c54;hp=5b400406295fe0a4200a6e7696fa708d77cb4115;hpb=ddcefead29544e7813f942e0eca062bf6433763e;p=freeside.git diff --git a/rt/share/html/Elements/CalendarSlotSchedule b/rt/share/html/Elements/CalendarSlotSchedule index 5b4004062..c8d3bfaa6 100644 --- a/rt/share/html/Elements/CalendarSlotSchedule +++ b/rt/share/html/Elements/CalendarSlotSchedule @@ -7,7 +7,11 @@ $timestep => $default_timestep @username => () $LengthMin => $default_timestep + $custnum => undef + $pkgnum => undef + $RedirectToBasics => 0 %ARGS> +% my $scheduling = ($custnum && $LengthMin) ? 1 : 0; % foreach my $username ( @username ) { % % my %schedule = UserDaySchedule( username => $username, @@ -15,16 +19,23 @@ % Tickets => \@Tickets, % ); % -% my $bgcolor = '666666;border-color:#555555'; +% my $bgcolor = '#666666'; +% my $border = '1px solid #555555'; % my $content = ''; -% my $onmouse = 0; +% my $selectable = 0; # can we schedule a new appointment +% my $ticketid = 0; +% my $draggable_length = 0; +% my $droppable = 0; # can we reschedule an appointment here +% my $cells = 0; # total cell count for appointment +% my $offset = 0; # position of cell in appointment % % #white out available times % foreach my $avail ( @{ $schedule{'avail'} } ) { % my( $start, $end ) = @$avail; % next if $start >= ($tod_row+$timestep) || $end <= $tod_row; -% $bgcolor = 'FFFFFF'; -% $onmouse = 1 +% $bgcolor = '#FFFFFF'; +% $border = '1px solid #D7D7D7'; +% $selectable = 1 % if $LengthMin <= $end - $tod_row #the slot is long enough % && ! grep { $_ > $tod_row && $LengthMin > $_ - $tod_row } % map $_->[0], values %{ $schedule{'scheduled'} }; @@ -35,27 +46,129 @@ % % my( $starts, $due, $col, $t ) = @{ $schedule{'scheduled'}->{$id} }; % -% next if $starts >= ($tod_row+$timestep) || $due < $tod_row; +% # misleading loop--at most one id will pass this test +% next if $starts >= ($tod_row+$timestep) || $due <= $tod_row; % -% $bgcolor = $col; -% $onmouse = 0; +% $ticketid = $id; +% $bgcolor = '#'.$col; +% $border = '1px solid #D7D7D7'; +% # can't schedule a new appointment +% $selectable = 0; +% # but can reschedule a ticket overlapping its old slot (filtered by can_drop) +% $droppable = 1 unless $scheduling; +% $draggable_length = $due - $starts; +% $cells = int( ($due-$starts) / $timestep ); +% $cells++ if ($due-$starts) % $timestep; % % if ( $starts >= $tod_row ) { #first row -% $content .= ($content?', ':''). $id; #XXX more +% +% #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}} ); +% +% #false laziness w/xmlhttp-ticket-update.html +% $content .= 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 +% +% } else { +% $offset = int( ($tod_row - $starts) / $timestep ); +% $offset++ if ($tod_row - $starts) % $timestep; % } % } +% +% my $td_id = 'td_'. $Date->epoch. '_'. $tod_row. '_'. $username; + +