Here you go, add this to rpc-example.pl:
# create a new ticket number
my $TicketNumber = $RPC->Dispatch($User, $Pw, 'TicketObject',
'TicketCreateNumber');
print "NOTICE: TicketObject->TicketCreateNumber() = $TicketNumber\n";
print "NOTICE: TicketObject->TicketCreate()\n";
my $TicketId = $RPC->Dispatch($User, $Pw, 'TicketObject', 'TicketCreate',
TN => $TicketNumber,
Title => 'Some Ticket Title',
Queue => 'Raw', # or QueueID => 123,
Lock => 'unlock',
PriorityID => 2, # or PriorityID => 2,
State => 'new', # or StateID => 5,
CustomerUser => 'customer@example.com',
OwnerID => 1, # new owner
ResponsibleID => 1, # new responsible
UserID => 1,
);
print "NOTICE: New Ticket id is: $TicketId\n";
if ($TicketId) {
# get ticket attributes
print "NOTICE: TicketObject->TicketGet(TicketID => $TicketId)\n";
my %Ticket = $RPC->Dispatch($User, $Pw, 'TicketObject', 'TicketGet',
TicketID => $TicketId);
print "NOTICE: Ticket Number is: $Ticket{TicketNumber}\n";
print "NOTICE: Ticket State is: $Ticket{State}\n";
print "NOTICE: Ticket Queue is: $Ticket{Queue}\n";
}
Actually it is quite easy to use this from perl. Simply swap the calls
for Object->Method(ARGS) with:
$RPC->Dispatch($User, $Pw, 'Object', 'Method', ARGS);
It's that easy!
Regards,
Umberto
On Mon, Jun 30, 2008 at 2:51 PM, Egor Tsilenko
Hello community! I have an idea to create ticket in OTRS from other system using RPC. I've only found /opt/otrs/bin/cgi-bin/rpc.pl and /opt/otrs/scripts/rpc-example.pl Does anyone have already realized such thing like creating a ticket via RPC? Any docs, rtfm's or working scripts? Thanks in advance. -- Циленко Егор _______________________________________________ OTRS mailing list: otrs - Webpage: http://otrs.org/ Archive: http://lists.otrs.org/pipermail/otrs To unsubscribe: http://lists.otrs.org/cgi-bin/listinfo/otrs Support or consulting for your OTRS system? => http://www.otrs.com/