FS/FS/TicketSystem/RT_Internal.pm

   1 package FS::TicketSystem::RT_Internal;
   2
   3 use strict;
   4 use vars qw( @ISA );
   5 use FS::UID qw(dbh);
   6 use FS::CGI qw(popurl);
   7 use FS::TicketSystem::RT_Libs;
   8
   9 @ISA = qw( FS::TicketSystem::RT_Libs );
  10
  11 sub sql_num_customer_tickets {
  12   "( select count(*) from tickets
  13                      join links on ( tickets.id = links.localbase )
  14      where ( status = 'new' or status = 'open' or status = 'stalled' )
  15        and target = 'freeside://freeside/cust_main/' || custnum
  16    )";
  17 }
  18
  19 sub baseurl {
  20   #my $self = shift;
  21   if ( $RT::URI::freeside::URL ) {
  22     $RT::URI::freeside::URL. 'rt/';
  23   } else {
  24     'http://you_need_to_set_RT_URI_freeside_URL_in_SiteConfig.pm/';
  25   }
  26 }
  27
  28 1;
  29