httemplate/edit/access_user.html


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50

<% include( 'elements/edit.html',
                 'name'   => 'Internal User',
                 'table'  => 'access_user',
                 'fields' => [
                               'username',
                               { field=>'_password', type=>'password' },
                               { field=>'_password2', type=>'password' },
                               'last',
                               'first',
                               { field=>'disabled', type=>'checkbox', value=>'Y' },
                             ],
                 'labels' => { 
                               'usernum'   => 'User number',
                               'username'  => 'Username',
                               '_password' => 'Password',
                               '_password2'=> 'Re-enter Password',
                               'last'      => 'Last name',
                               'first'     => 'First name',
                               'disabled'  => 'Disable employee',
                             },
                 'edit_callback' => sub { my( $c, $o ) = @_; 
                                          $o->set('_password', '');
                                        },
                 'viewall_dir' => 'browse',
                 'html_bottom' =>
                   sub {
                     my $access_user = shift;

                     '<BR>Internal Access Groups<BR>'.
                     ntable("#cccccc",2).
                     '<TR><TD>'.
                     include( '/elements/checkboxes-table.html',
                                'source_obj'   => $access_user,
                                'link_table'   => 'access_usergroup',
                                'target_table' => 'access_group',
                                'name_col'     => 'groupname',
                                'target_link'  => $p.'edit/access_group.html?',
                                #'disable-able' => 1,
                            ).
                     '</TR></TD></TABLE>'
                     ;
                   },
           )
%>
<%init>

die "access denied"
  unless $FS::CurrentUser::CurrentUser->access_right('Configuration');

</%init>