freeside/FS/FS/TicketSystem RT_Internal.pm,1.1,1.2 RT_Libs.pm,1.1,1.2

[ivan]

Update of /home/cvs/cvsroot/freeside/FS/FS/TicketSystem
In directory pouncequick:/tmp/cvs-serv24319/FS/FS/TicketSystem

Modified Files:
	RT_Internal.pm RT_Libs.pm 
Log Message:
second big RT integration checkin, customer linking/delinking interface


Index: RT_Internal.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/TicketSystem/RT_Internal.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- RT_Internal.pm	27 Nov 2004 19:09:46 -0000	1.1
+++ RT_Internal.pm	2 Dec 2004 09:59:48 -0000	1.2
@@ -1,8 +1,17 @@
 package FS::TicketSystem::RT_Internal;
 
 use strict;
+use vars qw( @ISA );
 
 @ISA = qw( FS::TicketSystem::RT_Libs );
+
+sub sql_customer_tickets {
+  "( select count(*) from tickets
+                     join links on ( tickets.id = links.localbase )
+     where ( status = 'new' or status = 'open' or status = 'stalled' )
+       and target = 'freeside://freeside/cust_main/' || custnum
+   )";
+}
 
 1;
 

Index: RT_Libs.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/TicketSystem/RT_Libs.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- RT_Libs.pm	27 Nov 2004 19:09:46 -0000	1.1
+++ RT_Libs.pm	2 Dec 2004 09:59:48 -0000	1.2
@@ -1,6 +1,7 @@
 package FS::TicketSystem::RT_Libs.pm
 
 use strict;
+use vars qw( @ISA );
 
 @ISA = qw( FS::TicketSystem::RT_External );