httemplate/edit/part_svc_link.html

   1 <& elements/edit.html,
   2   'table'         => 'part_svc_link',
   3   'name_singular' => 'dependency',
   4   'labels'        => \%labels,
   5   'fields'        => \@fields,
   6   'viewall_dir'   => 'browse',
   7 &>
   8 <%init>
   9 die "access denied"
  10   unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
  11
  12 my @fields = (
  13   { field       => 'agentnum',
  14     type        => 'select-agent',
  15     empty_label => '(global)',
  16   },
  17   { field       => 'src_svcpart',
  18     type        => 'select-part_svc',
  19     empty_label => 'Select service definition',
  20   },
  21   { field       => 'dst_svcpart',
  22     type        => 'select-part_svc',
  23     empty_label => 'Select service definition',
  24   },
  25   { field       => 'link_type',
  26     type        => 'select',
  27     #XXX false laziness w/part_svc_link POD documentation
  28     options     =>[ qw(
  29       part_pkg_restrict part_pkg_restrict_soft
  30       cust_svc_provision_restrict cust_svc_unprovision_restrict
  31       cust_svc_unprovision_cascade cust_svc_suspend_cascade
  32     )],
  33     labels      => {
  34       part_pkg_restrict => 'In package defintions, require the destination service definition when the source service definition is included',
  35       part_pkg_restrict_soft => 'In package definitions, suggest the destination service definition when the source service definition is included',
  36       cust_svc_provision_restrict => 'Require the target service to be provisioned before the source service',
  37       cust_svc_unprovision_restrict => 'Require the target service to be unprovisioned before the source service',
  38       cust_svc_unprovision_cascade => 'Automatically unprovision the target service when the source service is unprovisioned',
  39       cust_svc_suspend_cascade => 'Suspend the target service after the source service',
  40     },
  41   },
  42   { field => 'disabled', type => 'checkbox', value => 'Y' }
  43 );
  44 my %labels = (
  45   'svclinknum ' => 'Dependency',
  46   'agentnum'    => 'Agent',
  47   'src_svcpart' => 'Source service',
  48   'dst_svcpart' => 'Destination service',
  49   'link_type'   => 'Dependency type',
  50   'disabled'    => 'Disabled'
  51 );
  52 </%init>