projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
RT# 78356 - Updated documentation
[freeside.git]
/
FS
/
FS
/
part_export
/
rt_ticket.pm
diff --git
a/FS/FS/part_export/rt_ticket.pm
b/FS/FS/part_export/rt_ticket.pm
index
87a06dc
..
80254fc
100644
(file)
--- a/
FS/FS/part_export/rt_ticket.pm
+++ b/
FS/FS/part_export/rt_ticket.pm
@@
-6,7
+6,6
@@
use FS::part_export;
use FS::Record qw(qsearch qsearchs);
use FS::Conf;
use FS::TicketSystem;
use FS::Record qw(qsearch qsearchs);
use FS::Conf;
use FS::TicketSystem;
-use Data::Dumper 'Dumper';
@ISA = qw(FS::part_export);
@ISA = qw(FS::part_export);
@@
-14,6
+13,7
@@
my %templates;
my %queues;
my %template_select = (
type => 'select',
my %queues;
my %template_select = (
type => 'select',
+ freeform => 1,
option_label => sub {
$templates{$_[0]};
},
option_label => sub {
$templates{$_[0]};
},
@@
-21,7
+21,7
@@
my %template_select = (
%templates = (0 => '',
map { $_->msgnum, $_->msgname }
qsearch({ table => 'msg_template',
%templates = (0 => '',
map { $_->msgnum, $_->msgname }
qsearch({ table => 'msg_template',
- hashref => {},
+ hashref => {
disabled => ''
},
order_by => 'ORDER BY msgnum ASC'
})
);
order_by => 'ORDER BY msgnum ASC'
})
);
@@
-29,39
+29,86
@@
my %template_select = (
},
);
},
);
+my %queue_select = (
+ type => 'select',
+ freeform => 1,
+ option_label => sub {
+ $queues{$_[0]};
+ },
+ option_values => sub {
+ return (0) unless FS::Conf->new->config('ticket_system');
+ %queues = (0 => '', FS::TicketSystem->queues());
+ sort {$queues{$a} cmp $queues{$b}} keys %queues;
+ },
+);
+
tie my %options, 'Tie::IxHash', (
tie my %options, 'Tie::IxHash', (
- 'queue' => {
- label => 'Queue',
- type => 'select',
- option_label => sub {
- $queues{$_[0]};
- },
- option_values => sub {
- %queues = FS::TicketSystem->queues();
- sort {$queues{$a} cmp $queues{$b}} keys %queues;
- },
+ 'insert_queue' => {
+ before => '
+<TR><TD COLSPAN=2>
+<TABLE>
+ <TR><TH></TH><TH>Queue</TH><TH>Template</TH></TR>
+ <TR><TD>New service</TD><TD>',
+ %queue_select,
+ after => '</TD>'
},
'insert_template' => {
},
'insert_template' => {
- label => 'Insert',
- %template_select
+ before => '<TD>',
+ %template_select,
+ after => '</TD></TR>
+',
},
},
- 'replace_template' => {
- label => 'Replace',
- %template_select
+ 'delete_queue' => {
+ before => '
+ <TR><TD>Delete</TD><TD>',
+ %queue_select,
+ after => '</TD>',
},
'delete_template' => {
},
'delete_template' => {
- label => 'Delete',
- %template_select
+ before => '<TD>',
+ %template_select,
+ after => '</TD></TR>
+',
+ },
+ 'replace_queue' => {
+ before => '
+ <TR><TD>Modify</TD><TD>',
+ %queue_select,
+ after => '</TD>',
+ },
+ 'replace_template' => {
+ before => '<TD>',
+ %template_select,
+ after => '</TD></TR>
+',
+ },
+ 'suspend_queue' => {
+ before => '
+ <TR><TD>Suspend</TD><TD>',
+ %queue_select,
+ after => '</TD>',
},
'suspend_template' => {
},
'suspend_template' => {
- label => 'Suspend',
- %template_select
+ before => '<TD>',
+ %template_select,
+ after => '</TD></TR>
+',
+ },
+ 'unsuspend_queue' => {
+ before => '
+ <TR><TD>Unsuspend</TD><TD>',
+ %queue_select,
+ after => '</TD>',
},
'unsuspend_template' => {
},
'unsuspend_template' => {
- label => 'Unsuspend',
- %template_select
+ before => '<TD>',
+ %template_select,
+ after => '</TD></TR>
+ </TABLE>
+</TD></TR>',
},
'requestor' => {
},
'requestor' => {
+ freeform => 0,
label => 'Requestor',
'type' => 'select',
option_label => sub {
label => 'Requestor',
'type' => 'select',
option_label => sub {
@@
-76,22
+123,31
@@
tie my %options, 'Tie::IxHash', (
);
%info = (
);
%info = (
- 'svc' => [qw( svc_acct
)], #others?
+ 'svc' => [qw( svc_acct
svc_broadband svc_phone svc_domain )],
'desc' =>
'desc' =>
-
'Create an RT ticket',
+ 'Create an RT ticket',
'options' => \%options,
'nodomain' => '',
'options' => \%options,
'nodomain' => '',
- 'no
tes' => <<'END'
-Create a ticket in RT. The subject and body of the ticket
-will be generated from a message template.
-END
+ 'no
_machine' => 1,
+ 'notes' => '
+ Create a ticket in RT. The subject and body of the ticket
+ will be generated from a message template.'
);
sub _export_ticket {
my( $self, $action, $svc ) = (shift, shift, shift);
);
sub _export_ticket {
my( $self, $action, $svc ) = (shift, shift, shift);
+ my $conf = new FS::Conf;
+ die "rt_ticket export - no ticket system configured"
+ unless $conf->config('ticket_system');
+
+ FS::TicketSystem->init();
+
my $msgnum = $self->option($action.'_template');
return if !$msgnum;
my $msgnum = $self->option($action.'_template');
return if !$msgnum;
+ my $queue = $self->option($action.'_queue');
+ return if !$queue;
+
my $msg_template = FS::msg_template->by_key($msgnum);
return "Template $msgnum not found\n" if !$msg_template;
my $msg_template = FS::msg_template->by_key($msgnum);
return "Template $msgnum not found\n" if !$msg_template;
@@
-121,7
+177,7
@@
sub _export_ticket {
my $err_or_ticket = FS::TicketSystem->create_ticket(
'', #session should already exist
my $err_or_ticket = FS::TicketSystem->create_ticket(
'', #session should already exist
- 'queue' => $
self->option('queue')
,
+ 'queue' => $
queue
,
'subject' => $msg{'subject'},
'requestor' => $requestor,
'message' => $msg{'html_body'},
'subject' => $msg{'subject'},
'requestor' => $requestor,
'message' => $msg{'html_body'},