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