ich möchte gerne, dass von geschlossenen Tickets automatisch ein PDF-Audruck in einem Ordner auf dem Server landet. Daher hatte ich die Idee mit dem GenericAgent einen Job zu erstellen, wo dann eine geänderte Version des AgentTicketPrint-Script ausgeführt wird. Die Datei /Kernel/System/PDF.pm habe für die Speicherung um eine Zeile ergänzt:
Code: Select all
$Self->{PDF}->saveas('test.pdf');
Code: Select all
sub DocumentOutput {
my ( $Self, %Param ) = @_;
# check needed stuff
for (qw()) {
if ( !defined( $Param{$_} ) ) {
$Self->{LogObject}->Log( Priority => 'error', Message => "Need $_!" );
return;
}
}
if ( !$Self->{PDF} ) {
$Self->{LogObject}->Log( Priority => 'error', Message => "Need a PDF Object!" );
return;
}
if ( !$Self->{Page} ) {
$Self->{LogObject}->Log( Priority => 'error', Message => "Need a Page!" );
return;
}
$Self->{PDF}->saveas('test.pdf');
# return the document as string
my $DocumentString = $Self->{PDF}->stringify;
$Self->{PDF}->end();
return $DocumentString;
}
Wenn ich jetzt testweise das Script aufrufe erhalte ich folgende Fehlermeldung:
Hat jemand eine Idee was falsch ist, bzw. eine andere Lösung für mich?Software error:
Can't call method "out_file" on an undefined value at C:/strawberry/perl/site/lib/PDF/API2.pm line 941.
Schonmal vielen Dank
Fast Fred