Erzeugung eines Tickets aus einer externen Applikation klappt nicht

Guten Abend, ich versuche mit dem folgenden Skript ein Ticket außerhalb des OTRS zu erzeugen, wobei sich das Skript auf dem Rechner befindet, auf dem auch OTRS installiert ist. #! /usr/bin/perl use strict; use warnings; use File::Basename; use FindBin qw($RealBin); use lib dirname($RealBin); use lib dirname($RealBin) . "/Kernel/cpan-lib"; use Kernel::Config; use Kernel::System::Time; use Kernel::System::Log; use Kernel::System::Main; use Kernel::System::DB; use Kernel::System::Ticket; my $ConfigObject = Kernel::Config->new(); my $LogObject = Kernel::System::Log->new( ConfigObject => $ConfigObject, ); my $TimeObject = Kernel::System::Time->new( LogObject => $LogObject, ConfigObject => $ConfigObject, ); my $MainObject = Kernel::System::Main->new( LogObject => $LogObject, ConfigObject => $ConfigObject, ); my $DBObject = Kernel::System::DB->new( ConfigObject => $ConfigObject, MainObject => $MainObject, LogObject => $LogObject, ); my $TicketObject = Kernel::System::Ticket->new( ConfigObject => $ConfigObject, LogObject => $LogObject, DBObject => $DBObject, MainObject => $MainObject, TimeObject => $TimeObject, ); my $TicketID = $TicketObject->TicketCreate( Title => 'Some Ticket Title', Queue => 'testqueue', # or QueueID => 123, Lock => 'unlock', Priority => '3 normal', # or PriorityID => 2, State => 'new', # or StateID => 5, CustomerID => 'maxmustermann', CustomerUser => 'm.mustermann@in-put.de', OwnerID => 3, UserID => 3, Subject => "dies ist ein Test", Body => "und hier steht der text", ); my $TicketNumber = $TicketObject->TicketNumberLookup ( TicketID => $TicketID, UserID => 3, ); print "$TicketID\n"; print "$TicketNumber\n"; ### Ende ## Als Ausgabe erhalte ich: 502 2009060810000074 Sieht ja eigentlich ganz gut aus. Aber wenn ich mich im OTRS anmelde und das Ticket aufrufe, dann steht unterhalb von "Antwort erstellen" der Hinweis "Need TicketID in TicketStdResponseString() " und es wird auch nicht der oben angegeben Body bzw. Subject ausgegeben. Was stimmt an meinem Skript noch nicht? Danke für jeden Hinweis und Tipp, Stefan
participants (1)
-
Stefan-Michael Guenther