[otrs-cvs] otrs/scripts/test Ticket.t,1.36,1.37
CVS commits notifications of OTRS.org
cvs-log at otrs.org
Tue May 6 22:31:31 GMT 2008
- Previous message: [otrs-cvs] otrs/scripts/database otrs-schema-post.db2.sql, 1.14, 1.15 otrs-schema-post.maxdb.sql, 1.16, 1.17 otrs-schema-post.mssql.sql, 1.12, 1.13 otrs-schema-post.mysql.sql, 1.18, 1.19 otrs-schema-post.oracle.sql, 1.18, 1.19 otrs-schema-post.postgresql.sql, 1.17, 1.18
- Next message: [otrs-cvs] otrs/Kernel/Modules AgentTicketWatcher.pm,1.8,1.9
- Messages sorted by:
[ date ]
[ thread ]
[ subject ]
[ author ]
Comments:
Update of /home/cvs/otrs/scripts/test
In directory lancelot:/tmp/cvs-serv17155/scripts/test
Modified Files:
Ticket.t
Log Message:
Added watcher tests.
Author: martin
Index: Ticket.t
===================================================================
RCS file: /home/cvs/otrs/scripts/test/Ticket.t,v
retrieving revision 1.36
retrieving revision 1.37
diff -C2 -d -r1.36 -r1.37
*** Ticket.t 11 Apr 2008 16:10:48 -0000 1.36
--- Ticket.t 6 May 2008 22:31:26 -0000 1.37
***************
*** 106,118 ****
my $TicketID = $Self->{TicketObject}->TicketCreate(
! Title => 'Some Ticket Title',
! Queue => 'Raw',
! Lock => 'unlock',
! Priority => '3 normal',
! State => 'closed successful',
! CustomerNo => '123465',
CustomerUser => 'customer at example.com',
! OwnerID => 1,
! UserID => 1,
);
$Self->True(
--- 106,118 ----
my $TicketID = $Self->{TicketObject}->TicketCreate(
! Title => 'Some Ticket Title',
! Queue => 'Raw',
! Lock => 'unlock',
! Priority => '3 normal',
! State => 'closed successful',
! CustomerNo => '123465',
CustomerUser => 'customer at example.com',
! OwnerID => 1,
! UserID => 1,
);
$Self->True(
***************
*** 2762,2765 ****
--- 2762,2795 ----
);
+ # ticket watch tests
+ my $Subscribe = $Self->{TicketObject}->TicketWatchSubscribe(
+ TicketID => $TicketID,
+ WatchUserID => 1,
+ UserID => 1,
+ );
+ $Self->True(
+ $Subscribe || 0,
+ 'TicketWatchSubscribe()',
+ );
+ my $Unsubscribe = $Self->{TicketObject}->TicketWatchUnsubscribe(
+ TicketID => $TicketID,
+ WatchUserID => 1,
+ UserID => 1,
+ );
+ $Self->True(
+ $Unsubscribe || 0,
+ 'TicketWatchUnsubscribe()',
+ );
+ # add new subscription (will be deleted by TicketDelete(), also check foreign keys)
+ $Subscribe = $Self->{TicketObject}->TicketWatchSubscribe(
+ TicketID => $TicketID,
+ WatchUserID => 1,
+ UserID => 1,
+ );
+ $Self->True(
+ $Subscribe || 0,
+ 'TicketWatchSubscribe()',
+ );
+
# Check the TicketFreeField functions
my %TicketFreeText = ();
***************
*** 3010,3014 ****
Ticket-Article-Test1.png Ticket-Article-Test1.pdf Ticket-Article-Test-utf8-1.txt Ticket-Article-Test-utf8-1.bin)) {
my $Content = '';
! open(IN, "< ".$Self->{ConfigObject}->Get('Home')."/scripts/test/sample/$File") || die $!;
binmode(IN);
while (<IN>) {
--- 3040,3044 ----
Ticket-Article-Test1.png Ticket-Article-Test1.pdf Ticket-Article-Test-utf8-1.txt Ticket-Article-Test-utf8-1.bin)) {
my $Content = '';
! open(IN, '<', $Self->{ConfigObject}->Get('Home')."/scripts/test/sample/$File") || die $!;
binmode(IN);
while (<IN>) {
***************
*** 3068,3077 ****
my %TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
TicketNumber => $Ticket{TicketNumber},
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3098,3107 ----
my %TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
TicketNumber => $Ticket{TicketNumber},
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3082,3091 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
TicketNumber => [$Ticket{TicketNumber}, '1234'],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3112,3121 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
TicketNumber => [$Ticket{TicketNumber}, '1234'],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3096,3104 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
! Title => $Ticket{Title},
! UserID => 1,
Permission => 'rw',
);
--- 3126,3134 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
! Title => $Ticket{Title},
! UserID => 1,
Permission => 'rw',
);
***************
*** 3110,3118 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
! Title => [$Ticket{Title}, 'SomeTitleABC'],
! UserID => 1,
Permission => 'rw',
);
--- 3140,3148 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
! Title => [$Ticket{Title}, 'SomeTitleABC'],
! UserID => 1,
Permission => 'rw',
);
***************
*** 3124,3132 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CustomerID => $Ticket{CustomerID},
! UserID => 1,
Permission => 'rw',
);
--- 3154,3162 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CustomerID => $Ticket{CustomerID},
! UserID => 1,
Permission => 'rw',
);
***************
*** 3138,3146 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CustomerID => [$Ticket{CustomerID}, 'LULU'],
! UserID => 1,
Permission => 'rw',
);
--- 3168,3176 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CustomerID => [$Ticket{CustomerID}, 'LULU'],
! UserID => 1,
Permission => 'rw',
);
***************
*** 3152,3161 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CustomerUserLogin => $Ticket{CustomerUser},
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3182,3191 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CustomerUserLogin => $Ticket{CustomerUser},
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3166,3175 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CustomerUserLogin => [$Ticket{CustomerUserID}, '1234'],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3196,3205 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CustomerUserLogin => [$Ticket{CustomerUserID}, '1234'],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3180,3192 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
! TicketNumber => $Ticket{TicketNumber},
! Title => $Ticket{Title},
! CustomerID => $Ticket{CustomerID},
CustomerUserLogin => $Ticket{CustomerUserID},
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3210,3222 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
! TicketNumber => $Ticket{TicketNumber},
! Title => $Ticket{Title},
! CustomerID => $Ticket{CustomerID},
CustomerUserLogin => $Ticket{CustomerUserID},
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3197,3209 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
! TicketNumber => [$Ticket{TicketNumber}, 'ABC'],
! Title => [$Ticket{Title}, '123'],
! CustomerID => [$Ticket{CustomerID}, '1213421'],
CustomerUserLogin => [$Ticket{CustomerUserID}, 'iadasd'],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3227,3239 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
! TicketNumber => [$Ticket{TicketNumber}, 'ABC'],
! Title => [$Ticket{Title}, '123'],
! CustomerID => [$Ticket{CustomerID}, '1213421'],
CustomerUserLogin => [$Ticket{CustomerUserID}, 'iadasd'],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3214,3224 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
TicketNumber => [$Ticket{TicketNumber}, 'ABC'],
! StateType => 'Closed',
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3244,3254 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
TicketNumber => [$Ticket{TicketNumber}, 'ABC'],
! StateType => 'Closed',
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3229,3239 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
TicketNumber => [$Ticket{TicketNumber}, 'ABC'],
! StateType => 'Open',
! UserID => 1,
! Permission => 'rw',
);
$Self->False(
--- 3259,3269 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
TicketNumber => [$Ticket{TicketNumber}, 'ABC'],
! StateType => 'Open',
! UserID => 1,
! Permission => 'rw',
);
$Self->False(
***************
*** 3244,3253 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
! Body => '*write perl modules*',
! StateType => 'Closed',
! UserID => 1,
Permission => 'rw',
);
--- 3274,3283 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
! Body => '*write perl modules*',
! StateType => 'Closed',
! UserID => 1,
Permission => 'rw',
);
***************
*** 3261,3268 ****
Result => 'HASH',
# result limit
! Limit => 100,
! Body => '*write perl modules*',
! StateType => 'Open',
! UserID => 1,
Permission => 'rw',
);
--- 3291,3298 ----
Result => 'HASH',
# result limit
! Limit => 100,
! Body => '*write perl modules*',
! StateType => 'Open',
! UserID => 1,
Permission => 'rw',
);
***************
*** 3273,3280 ****
my $TicketMove = $Self->{TicketObject}->MoveTicket(
! Queue => 'Junk',
TicketID => $TicketID,
SendNoNotification => 1,
! UserID => 1,
);
$Self->True(
--- 3303,3310 ----
my $TicketMove = $Self->{TicketObject}->MoveTicket(
! Queue => 'Junk',
TicketID => $TicketID,
SendNoNotification => 1,
! UserID => 1,
);
$Self->True(
***************
*** 3284,3290 ****
my $TicketState = $Self->{TicketObject}->StateSet(
! State => 'open',
TicketID => $TicketID,
! UserID => 1,
);
$Self->True(
--- 3314,3320 ----
my $TicketState = $Self->{TicketObject}->StateSet(
! State => 'open',
TicketID => $TicketID,
! UserID => 1,
);
$Self->True(
***************
*** 3295,3305 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
TicketNumber => [$Ticket{TicketNumber}, 'ABC'],
! StateType => 'Open',
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3325,3335 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
TicketNumber => [$Ticket{TicketNumber}, 'ABC'],
! StateType => 'Open',
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3310,3320 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
TicketNumber => [$Ticket{TicketNumber}, 'ABC'],
! StateType => 'Closed',
! UserID => 1,
! Permission => 'rw',
);
$Self->False(
--- 3340,3350 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
TicketNumber => [$Ticket{TicketNumber}, 'ABC'],
! StateType => 'Closed',
! UserID => 1,
! Permission => 'rw',
);
$Self->False(
***************
*** 3339,3349 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 1000,
! From => $Condition,
ConditionInline => 1,
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3369,3379 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 1000,
! From => $Condition,
ConditionInline => 1,
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3366,3376 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 1000,
! From => $Condition,
ConditionInline => 1,
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3396,3406 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 1000,
! From => $Condition,
ConditionInline => 1,
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3401,3408 ****
my $TicketLock = $Self->{TicketObject}->LockSet(
! Lock => 'lock',
TicketID => $TicketID,
SendNoNotification => 1,
! UserID => 1,
);
$Self->True(
--- 3431,3438 ----
my $TicketLock = $Self->{TicketObject}->LockSet(
! Lock => 'lock',
TicketID => $TicketID,
SendNoNotification => 1,
! UserID => 1,
);
$Self->True(
***************
*** 3414,3423 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CreatedUserIDs => [1, 455, 32],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3444,3453 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CreatedUserIDs => [1, 455, 32],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3429,3438 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CreatedPriorities => ['2 low', '3 normal'],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3459,3468 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CreatedPriorities => ['2 low', '3 normal'],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3444,3453 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CreatedPriorityIDs => [2, 3],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3474,3483 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CreatedPriorityIDs => [2, 3],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3459,3468 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CreatedStates => ['closed successful'],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3489,3498 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CreatedStates => ['closed successful'],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3474,3483 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CreatedStateIDs => [2],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3504,3513 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CreatedStateIDs => [2],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3489,3498 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CreatedQueues => ['Raw'],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3519,3528 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CreatedQueues => ['Raw'],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3504,3513 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CreatedQueueIDs => [2,3],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
--- 3534,3543 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
CreatedQueueIDs => [2,3],
! UserID => 1,
! Permission => 'rw',
);
$Self->True(
***************
*** 3519,3527 ****
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
TicketCreateTimeNewerMinutes => 60,
! UserID => 1,
Permission => 'rw',
);
--- 3549,3557 ----
%TicketIDs = $Self->{TicketObject}->TicketSearch(
# result (required)
! Result => 'HASH',
# result limit
! Limit => 100,
TicketCreateTimeNewerMinutes => 60,
! UserID => 1,
Permission => 'rw',
);
- Previous message: [otrs-cvs] otrs/scripts/database otrs-schema-post.db2.sql, 1.14, 1.15 otrs-schema-post.maxdb.sql, 1.16, 1.17 otrs-schema-post.mssql.sql, 1.12, 1.13 otrs-schema-post.mysql.sql, 1.18, 1.19 otrs-schema-post.oracle.sql, 1.18, 1.19 otrs-schema-post.postgresql.sql, 1.17, 1.18
- Next message: [otrs-cvs] otrs/Kernel/Modules AgentTicketWatcher.pm,1.8,1.9
- Messages sorted by:
[ date ]
[ thread ]
[ subject ]
[ author ]
More information about the cvs-log
mailing list