[otrs-cvs] otrs/scripts/test/Ticket NumberGenerator.t,1.5,1.6

"CVS commits notifications of OTRS.org" <[email protected]>
Newsgroups gmane.comp.otrs.cvs
Message-ID <[email protected]>
Comments:
Update of /home/cvs/otrs/scripts/test/Ticket
In directory lancelot:/tmp/cvs-serv24188/scripts/test/Ticket

Modified Files:
	NumberGenerator.t 
Log Message:
 - 2013-02-01 Fixed bug#8829 - DateChecksum followup doesn't get correctly SystemID.

Author: mg

Index: NumberGenerator.t
===================================================================
RCS file: /home/cvs/otrs/scripts/test/Ticket/NumberGenerator.t,v
retrieving revision 1.5
retrieving revision 1.6
diff -2 -u -d -r1.5 -r1.6
--- NumberGenerator.t	20 Nov 2012 16:12:59 -0000	1.5
+++ NumberGenerator.t	1 Feb 2013 13:14:05 -0000	1.6
@@ -1,5 +1,5 @@
 # --
 # NumberGenerator.t - ticket module testscript
-# Copyright (C) 2001-2012 OTRS AG, http://otrs.org/
+# Copyright (C) 2001-2013 OTRS AG, http://otrs.org/
 # --
 # $Id$
@@ -42,4 +42,23 @@
 
         for my $Count ( 1 .. 100 ) {
+
+            # Produce a ticket number for a foreign system
+            $ConfigObject->Set(
+                Key   => 'SystemID',
+                Value => '01',
+            );
+
+            my $ForeignTicketNumber = $TicketObject->TicketCreateNumber();
+
+            $Self->True(
+                scalar $ForeignTicketNumber,
+                "$Backend - $TicketSubjectFormat - $Count - TicketCreateNumber() - result $ForeignTicketNumber",
+            );
+
+            # Now Produce a ticket number for our local system
+            $ConfigObject->Set(
+                Key   => 'SystemID',
+                Value => '10',
+            );
             my $TicketNumber = $TicketObject->TicketCreateNumber();
 
@@ -49,4 +68,5 @@
             );
 
+            # Simple test: find ticket number in subject
             my $Subject = $TicketObject->TicketSubjectBuild(
                 TicketNumber => $TicketNumber,
@@ -66,4 +86,19 @@
                 "$Backend - $TicketSubjectFormat - $Count - GetTNByString",
             );
+
+            # More complex test: find ticket number in string with both ticket numbers
+            my $CombinedSubject = $TicketObject->TicketSubjectBuild(
+                TicketNumber => $ForeignTicketNumber,
+                Subject      => 'Test',
+            );
+            $CombinedSubject .= ' ' . $Subject;
+
+            $TicketNumberFound = $TicketObject->GetTNByString($CombinedSubject);
+
+            $Self->Is(
+                $TicketNumberFound,
+                $TicketNumber,
+                "$Backend - $TicketSubjectFormat - $Count - GetTNByString - $CombinedSubject",
+            );
         }
     }
---------------------------------------------------------------------
OTRS mailing list: cvs-log - Webpage: http://otrs.org/
Archive: http://lists.otrs.org/pipermail/cvs-log
To unsubscribe: http://lists.otrs.org/cgi-bin/listinfo/cvs-log
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.