httemplate/edit/agent.cgi

   1 %
   2 %
   3 %my $agent;
   4 %if ( $cgi->param('error') ) {
   5 %  $agent = new FS::agent ( {
   6 %    map { $_, scalar($cgi->param($_)) } fields('agent')
   7 %  } );
   8 %} elsif ( $cgi->keywords ) {
   9 %  my($query) = $cgi->keywords;
  10 %  $query =~ /^(\d+)$/;
  11 %  $agent = qsearchs( 'agent', { 'agentnum' => $1 } );
  12 %} else { #adding
  13 %  $agent = new FS::agent {};
  14 %}
  15 %my $action = $agent->agentnum ? 'Edit' : 'Add';
  16 %my $hashref = $agent->hashref;
  17 %
  18 %my $conf = new FS::Conf;
  19 %
  20 %
  21
  22
  23 <% include("/elements/header.html","$action Agent", menubar(
  24   'Main Menu' => $p,
  25   'View all agents' => $p. 'browse/agent.cgi',
  26 )) %>
  27 % if ( $cgi->param('error') ) {
  28
  29 <FONT SIZE="+1" COLOR="#ff0000">Error: <% $cgi->param('error') %></FONT>
  30 % }
  31
  32
  33 <FORM ACTION="<%popurl(1)%>process/agent.cgi" METHOD=POST>
  34 <INPUT TYPE="hidden" NAME="agentnum" VALUE="<% $hashref->{agentnum} %>">
  35 Agent #<% $hashref->{agentnum} ? $hashref->{agentnum} : "(NEW)" %>
  36
  37 <% &ntable("#cccccc", 2, '') %>
  38
  39 <TR>
  40   <TH ALIGN="right">Agent</TH>
  41   <TD><INPUT TYPE="text" NAME="agent" SIZE=32 VALUE="<% $hashref->{agent} %>"></TD>
  42 </TR>
  43
  44   <TR>
  45     <TH ALIGN="right">Agent type</TH>
  46     <TD><SELECT NAME="typenum" SIZE=1>
  47 % foreach my $agent_type (qsearch('agent_type',{})) {
  48
  49     <OPTION VALUE="<% $agent_type->typenum %>"<% ( $hashref->{typenum} && ( $hashref->{typenum} == $agent_type->typenum ) ) ? ' SELECTED' : '' %>>
  50     <% $agent_type->getfield('typenum') %>: <% $agent_type->getfield('atype') %>
  51 % }
  52
  53
  54   </SELECT></TD>
  55   </TR>
  56
  57   <TR>
  58     <TD ALIGN="right">Disable</TD>
  59     <TD><INPUT TYPE="checkbox" NAME="disabled" VALUE="Y"<% $hashref->{disabled} eq 'Y' ? ' CHECKED' : '' %>></TD>
  60   </TR>
  61
  62   <TR>
  63     <TD ALIGN="right"><!--Frequency--></TD>
  64     <TD><INPUT TYPE="hidden" NAME="freq" VALUE="<% $hashref->{freq} %>"></TD>
  65   </TR>
  66
  67   <TR>
  68     <TD ALIGN="right"><!--Program--></TD>
  69     <TD><INPUT TYPE="hidden" NAME="prog" VALUE="<% $hashref->{prog} %>"></TD>
  70   </TR>
  71 % if ( $conf->config('ticket_system') ) {
  72 %    my $default_queueid = $conf->config('ticket_system-default_queueid');
  73 %    my $default_queue = FS::TicketSystem->queue($default_queueid);
  74 %    $default_queue = "(default) $default_queueid: $default_queue"
  75 %      if $default_queueid;
  76 %    my %queues = FS::TicketSystem->queues();
  77 %    my @queueids = sort { $a <=> $b } keys %queues;
  78 %
  79
  80     <TR>
  81       <TD ALIGN="right">Ticketing queue</TD>
  82       <TD>
  83         <SELECT NAME="ticketing_queueid">
  84           <OPTION VALUE=""><% $default_queue %>
  85 % foreach my $queueid ( @queueids ) {
  86
  87             <OPTION VALUE="<% $queueid %>" <% $agent->ticketing_queueid == $queueid ? ' SELECTED' : '' %>><% $queueid %>: <% $queues{$queueid} %>
  88 % }
  89
  90         </SELECT>
  91       </TD>
  92     </TR>
  93 % }
  94
  95
  96   <TR>
  97     <TD ALIGN="right">Agent interface username</TD>
  98     <TD>
  99       <INPUT TYPE="text" NAME="username" VALUE="<% $hashref->{username} %>">
 100     </TD>
 101   </TR>
 102
 103   <TR>
 104     <TD ALIGN="right">Agent interface password</TD>
 105     <TD>
 106       <INPUT TYPE="text" NAME="_password" VALUE="<% $hashref->{_password} %>">
 107     </TD>
 108   </TR>
 109
 110 </TABLE>
 111
 112 <BR><INPUT TYPE="submit" VALUE="<% $hashref->{agentnum} ? "Apply changes" : "Add agent" %>">
 113     </FORM>
 114   </BODY>
 115 </HTML>