httemplate/edit/access_group.html

   1 <% include( 'elements/edit.html',
   2                  'name'   => 'Internal Access Group',
   3                  'table'  => 'access_group',
   4                  'labels' => {
   5                                'groupnum'   => 'Group number',
   6                                'groupname'  => 'Group name',
   7                              },
   8
   9                  'viewall_dir' => 'browse',
  10
  11                  'html_bottom' =>
  12                    sub {
  13                      my $access_group = shift;
  14
  15                      "<BR>Group virtualized to customers of agents:<BR>".
  16                      ntable("#cccccc",2).
  17                      '<TR><TD>'.
  18                      include( '/elements/checkboxes-table.html',
  19                                 'source_obj'   => $access_group,
  20                                 'link_table'   => 'access_groupagent',
  21                                 'target_table' => 'agent',
  22                                 'name_col'     => 'agent',
  23                                 'target_link'  => $p.'edit/agent.cgi?',
  24                                 'disable-able' => 1,
  25                             ).
  26                      '</TR></TD></TABLE>'.
  27
  28                      "<BR>Group rights:<BR>".
  29                      ntable("#cccccc",2).
  30                      '<TR><TD>'.
  31                      include( '/elements/checkboxes-table-name.html',
  32                                 'source_obj'   => $access_group,
  33                                 'link_table'   => 'access_right',
  34                                 'link_static'  => { 'righttype' =>
  35                                                       'FS::access_group',
  36                                                   },
  37                                 'num_col'      => 'rightobjnum',
  38                                 'name_col'     => 'rightname',
  39                                 'names_list'   => [ FS::AccessRight->rights() ],
  40                             ).
  41                      '</TR></TD></TABLE>'
  42
  43                      ;
  44                    },
  45            )
  46 %>