%args>
$Date => undef
$today => undef
$Tickets => undef
$DateTypes => undef
@username => ()
$CurrentUser => undef
%args>
%if ( DateTime->compare( $Date, $today ) == -1 ) {#flag to show the past anyway?
% #the past already happened...
%} else {
% foreach my $username ( @username ) {
% my $mapname = "$username-$date";
% my $img = "$RT::WebPath/Schedule/UserBar?Username=$username;Date=$date";
<% $username %>
width = <%$width%>
>
% }
%}
<%once>
my $stime = RT->Config->Get('CalendarWeeklyStartMin');
$stime = 480 unless $stime =~ /^\d+$/; #8am
my $etime = RT->Config->Get('CalendarWeeklyEndMin');
$etime = 1080 unless $etime =~ /^\d+$/; #6pm
my $width = int( ( $etime - $stime ) / 10 );
my $height = 12; #Schedule/UserBar
%once>
<%init>
use RTx::Schedule qw( UserDaySchedule );
use FS::sched_avail; #just for pretty_time
#my( $date, $time ) = split('T', $Date);
my $date = $Date->strftime('%F');
%init>