or return { 'error' => "Can't resume session" }; #better error message
my $custnum = $session->{'custnum'};
or return { 'error' => "Can't resume session" }; #better error message
my $custnum = $session->{'custnum'};
my $cust_main = qsearchs('cust_main', { 'custnum' => $custnum } )
or return { 'error' => "unknown custnum $custnum" };
my $pkgnum = $p->{'pkgnum'};
my $cust_main = qsearchs('cust_main', { 'custnum' => $custnum } )
or return { 'error' => "unknown custnum $custnum" };
my $pkgnum = $p->{'pkgnum'};
my $cust_pkg = qsearchs('cust_pkg', { 'custnum' => $custnum,
'pkgnum' => $pkgnum, } )
or return { 'error' => "unknown pkgnum $pkgnum" };
my $cust_pkg = qsearchs('cust_pkg', { 'custnum' => $custnum,
'pkgnum' => $pkgnum, } )
or return { 'error' => "unknown pkgnum $pkgnum" };
my($context, $session, $custnum) = _custoragent_session_custnum($p);
return { 'error' => $session } if $context eq 'error';
my($context, $session, $custnum) = _custoragent_session_custnum($p);
return { 'error' => $session } if $context eq 'error';
# warn "$me adjust_ticket_priority: initializing ticket system\n" if $DEBUG;
# FS::TicketSystem->init;
my $ss_priority = FS::TicketSystem->selfservice_priority;
# warn "$me adjust_ticket_priority: initializing ticket system\n" if $DEBUG;
# FS::TicketSystem->init;
my $ss_priority = FS::TicketSystem->selfservice_priority;