httemplate/browse/cgp_rule.html

   1 <% include('elements/browse.html',
   2              'title'         => "Rules for $svc_label: $svc_value",
   3              'name_singular' => 'rule',
   4              'html_init'     => $html_init,
   5              'query'         => { 'table'   => 'cgp_rule',
   6                                   'hashref' => { 'svcnum' => $svcnum },
   7                                   'order_by' => 'ORDER BY priority DESC',
   8                                 },
   9              'count_query'   => $count_query,
  10              'header'        => [ 'Priority', 'Name', '' ],
  11              'fields'        => [ sub { shift->priority || 'Inactive'; },
  12                                   'name',
  13                                   sub { 'Delete'; },
  14                                 ],
  15              #'align'
  16              'links'         => [ $edit_sub, $edit_sub, $del_sub ],
  17           )
  18 %>
  19 <%init>
  20
  21 $cgi->param('svcnum') =~ /^(\d+)$/ or die 'no svcnum';
  22 my $svcnum = $1;
  23
  24 #agent virt so you can't do cross-agent communigate rules
  25 my $cust_svc = qsearchs('cust_svc', { 'svcnum' => $svcnum })
  26   or die 'unknown svcnum';
  27
  28 my $count_query = "SELECT COUNT(*) FROM cgp_rule WHERE svcnum = $svcnum";
  29
  30 my($svc_label, $svc_value, $svcdb) = $cust_svc->label;
  31
  32
  33 my $view = FS::UI::Web::svc_url( 'm'        => $m,
  34                                  'action'   => 'view',
  35                                  'part_svc' => $cust_svc->part_svc,
  36                                  'svc'      => $cust_svc,
  37                                );
  38
  39 my $html_init =
  40   qq(<A HREF="$view">View this $svc_label</A><BR><BR>).
  41   qq!<A HREF="${p}edit/cgp_rule.html?svcnum=$svcnum">Add new rule</A><BR><BR>!;
  42
  43 my $edit_sub = [ $p.'edit/cgp_rule.html?', 'rulenum' ];
  44 my $del_sub = [ $p.'misc/delete-cgp_rule.html?', 'rulenum' ]; #XXX javascript areyousure or something
  45
  46 </%init>