%# <& /elements/form-create_ticket.html, object => $object &>
Appointments
% if ( $FS::CurrentUser::CurrentUser->access_right('Make appointment') ) {
%# just a link for now, should probably be FS::TicketSystem->href_schedule
%# maybe need to add a dropdown for type (install etc.) from a custom field
%# or maybe change to a popup and get that info there
% my @sched_item = qsearch('sched_item', { 'disabled' => '', });
% my @username = map $_->access_user->username, @sched_item;
% my $query = join('&', map "username=$_", @username).
% '&LengthMin=180'. #XXX appointment length
% '&custnum='. $cust_main->custnum; #.
% #XXX '&pkgnum=$pkgnum";need to be for specific package/location, not just for a customer... default to active(/ordered) package in a pkg_class w/ticketing_queueid, otherwise, a popup? we're getting complicated like form-creat_ticket.html
Make appointment
% }
%# |
%# View
%# <% mt($openlabel) |h %> |
%# <% mt('resolved') |h %>
%if ( @tickets ) {
<& /elements/table-grid.html &>
% my $bgcolor1 = '#eeeeee';
% my $bgcolor2 = '#ffffff';
% my $bgcolor = '';
% foreach my $ticket ( @tickets ) {
% my $href = FS::TicketSystem->href_ticket($ticket->{id});
% if ( $bgcolor eq $bgcolor1 ) {
% $bgcolor = $bgcolor2;
% } else {
% $bgcolor = $bgcolor1;
% }
%
% use Date::Parse qw( str2time );
% my $starts = str2time( $ticket->{starts} ); #default format here sucks
% my $starts_pretty = '';
% $starts_pretty = time2str('%a %h %o %Y %l:%M%P', $starts)
% if $starts > 86400;
<% mt('Type') |h %>
<% mt('Date') |h %>
<% mt('Status') |h %>
<% mt('Owner') |h %>