X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FTicketSystem%2FRT_External.pm;h=187b05c5e1d8d3ad94c0f977b6d136dc8c4023f4;hb=144aa1ef3dc3e0dbc2d32edf1dde1ad88da5afe0;hp=66f8747022f8b3bf1917d0b9fc7d2515c4a67975;hpb=57323a695e58b58cc8892784d356995f6e41bfcd;p=freeside.git diff --git a/FS/FS/TicketSystem/RT_External.pm b/FS/FS/TicketSystem/RT_External.pm index 66f874702..187b05c5e 100644 --- a/FS/FS/TicketSystem/RT_External.pm +++ b/FS/FS/TicketSystem/RT_External.pm @@ -2,7 +2,8 @@ package FS::TicketSystem::RT_External; use strict; use vars qw( $conf $default_queueid - $priority_field $priority_field_queue $field ); + $priority_field $priority_field_queue $field + $external_dbh $external_url ); use URI::Escape; use FS::UID; @@ -21,12 +22,22 @@ install_callback FS::UID sub { $priority_field_queue = ''; $field = ''; } + + $external_url = ''; + if ($conf->config('ticket_system') eq 'RT_External') { + my ($datasrc, $user, $pass) = $conf->config('ticket_system-rt_external_datasrc'); + $external_dbh = DBI->connect($datasrc, $user, $pass, { 'ChopBlanks' => 1 }) + or die "RT_External DBI->connect error: $DBI::errstr\n"; + + $external_url = $conf->config('ticket_system-rt_external_url'); + } + }; sub num_customer_tickets { my( $self, $custnum, $priority, $dbh ) = @_; - #$dbh ||= create one from some config options + $dbh ||= $external_dbh; my( $from_sql, @param) = $self->_from_customer( $custnum, $priority ); @@ -42,7 +53,7 @@ sub customer_tickets { my( $self, $custnum, $limit, $priority, $dbh ) = @_; $limit ||= 0; - #$dbh ||= create one from some config options + $dbh ||= $external_dbh; my( $from_sql, @param) = $self->_from_customer( $custnum, $priority ); my $sql = "select tickets.*, queues.name". @@ -120,7 +131,7 @@ sub _from_customer { } -sub href_customer_tickets { +sub _href_customer_tickets { my( $self, $custnum, $priority ) = @_; #i snarfed this from an RT bookmarked search, it could be unescaped in the @@ -131,35 +142,53 @@ sub href_customer_tickets { '%27%20%20AND%20%28%20Status%20%3D%20%27open%27%20%20OR%20Status%20%3D%20%27new%27%20%20OR%20Status%20%3D%20%27stalled%27%20%29%20' ; - if ( $priority && $field && $priority_field_queue ) { + if ( defined($priority) && $field && $priority_field_queue ) { $href .= 'AND%20Queue%20%3D%20%27'. $priority_field_queue. '%27%20'; } - if ( $priority && $field ) { - $href .= '%20AND%20%27CF.'. $field. '%27%20%3D%20%27'. $priority. '%27%20'; + if ( defined($priority) && $field ) { + $href .= '%20AND%20%27CF.'. $field. '%27%20'; + if ( $priority ) { + $href .= '%3D%20%27'. $priority. '%27%20'; + } else { + $href .= 'IS%20%27NULL%27%20'; + } } $href .= '&Rows=100'. '&OrderBy=id&Page=1'. - '&Format=%27%20%20%20%3Cb%3E%3Ca%20href%3D%22%2Ffreeside%2Frt%2FTicket%2FDisplay.html%3Fid%3D__id__%22%3E__id__%3C%2Fa%3E%3C%2Fb%3E%2FTITLE%3A%23%27%2C%20%0A%27%3Cb%3E%3Ca%20href%3D%22%2Ffreeside%2Frt%2FTicket%2FDisplay.html%3Fid%3D__id__%22%3E__Subject__%3C%2Fa%3E%3C%2Fb%3E%2FTITLE%3ASubject%27%2C%20%0A%27__Status__%27%2C%20'; + '&Format=%27%20%20%20%3Cb%3E%3Ca%20href%3D%22'. + $self->baseurl. + 'Ticket%2FDisplay.html%3Fid%3D__id__%22%3E__id__%3C%2Fa%3E%3C%2Fb%3E%2FTITLE%3A%23%27%2C%20%0A%27%3Cb%3E%3Ca%20href%3D%22'. + $self->baseurl. + 'Ticket%2FDisplay.html%3Fid%3D__id__%22%3E__Subject__%3C%2Fa%3E%3C%2Fb%3E%2FTITLE%3ASubject%27%2C%20%0A%27__Status__%27%2C%20'; - if ( $priority && $field ) { + if ( defined($priority) && $field ) { $href .= '%0A%27__CustomField.'. $field. '__%2FTITLE%3ASeverity%27%2C%20'; } $href .= '%0A%27__QueueName__%27%2C%20%0A%27__OwnerName__%27%2C%20%0A%27__Priority__%27%2C%20%0A%27__NEWLINE__%27%2C%20%0A%27%27%2C%20%0A%27%3Csmall%3E__Requestors__%3C%2Fsmall%3E%27%2C%20%0A%27%3Csmall%3E__CreatedRelative__%3C%2Fsmall%3E%27%2C'; - if ( $priority && $field ) { + if ( defined($priority) && $field ) { $href .= '%20%0A%27__-__%27%2C'; } $href .= '%20%0A%27%3Csmall%3E__ToldRelative__%3C%2Fsmall%3E%27%2C%20%0A%27%3Csmall%3E__LastUpdatedRelative__%3C%2Fsmall%3E%27%2C%20%0A%27%3Csmall%3E__TimeLeft__%3C%2Fsmall%3E%27'; $href; + } +sub href_customer_tickets { -sub href_new_ticket { + my $self = shift; + return $external_url . $self->_href_customer_tickets(@_); + +} + + +sub _href_new_ticket { my( $self, $custnum, $requestors ) = @_; + 'Ticket/Create.html?'. "Queue=$default_queueid". "&new-MemberOf=freeside://freeside/cust_main/$custnum". @@ -167,10 +196,30 @@ sub href_new_ticket { ; } -sub href_ticket { +sub href_new_ticket { + + my $self = shift; + return return $external_url . $self->_href_new_ticket(@_); + +} + +sub _href_ticket { my($self, $ticketnum) = @_; 'Ticket/Display.html?id='.$ticketnum; } +sub href_ticket { + + my $self = shift; + return $external_url . $self->_href_ticket(@_); + +} + +sub baseurl { + + return $external_url; + +} + 1;