diff options
author | cvs2git <cvs2git> | 2010-12-27 00:04:45 +0000 |
---|---|---|
committer | cvs2git <cvs2git> | 2010-12-27 00:04:45 +0000 |
commit | c82d349f864e6bd9f96fd1156903bc1f7193a203 (patch) | |
tree | e117a87533656110b6acd56fc0ca64289892a9f5 /httemplate/edit/access_user.html | |
parent | 74e058c8a010ef6feb539248a550d0bb169c1e94 (diff) |
This commit was manufactured by cvs2svn to create tag 'TORRUS_1_0_9'.TORRUS_1_0_9
Diffstat (limited to 'httemplate/edit/access_user.html')
-rw-r--r-- | httemplate/edit/access_user.html | 77 |
1 files changed, 0 insertions, 77 deletions
diff --git a/httemplate/edit/access_user.html b/httemplate/edit/access_user.html deleted file mode 100644 index 86ce25374..000000000 --- a/httemplate/edit/access_user.html +++ /dev/null @@ -1,77 +0,0 @@ -<% include( 'elements/edit.html', - 'name' => 'Employee', - 'table' => 'access_user', - 'fields' => [ - 'username', - { field=>'_password', type=>'password' }, - { field=>'_password2', type=>'password' }, - 'last', - 'first', - { field=>'user_custnum', type=>'search-cust_main', }, - { field=>'disabled', type=>'checkbox', value=>'Y' }, - ], - 'labels' => { - 'usernum' => 'User number', - 'username' => 'Username', - '_password' => 'Password', - '_password2' => 'Re-enter Password', - 'last' => 'Last name', - 'first' => 'First name', - 'user_custnum' => 'Customer (optional)', - 'disabled' => 'Disable employee', - }, - 'edit_callback' => \&edit_callback, - 'field_callback'=> \&field_callback, - 'viewall_dir' => 'browse', - 'html_bottom' => - sub { - my $access_user = shift; - - '<BR>Employee 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>' - ; - }, - 'onsubmit' => 'check_user_custnum_search', - 'html_foot' => $check_user_custnum_search, - ) -%> -<%init> - -die "access denied" - unless $FS::CurrentUser::CurrentUser->access_right('Configuration'); - -my $check_user_custnum_search = <<END; - <SCRIPT TYPE="text/javascript"> - function check_user_custnum_search(what) { - while ( user_custnum_search_active ) { - // javascript needs ambien - } - return true; - } - </SCRIPT> -END - -sub edit_callback { - my ($c, $o, $f, $opt) = @_; - $o->set('_password', ''); -} - -sub field_callback { - my ($c, $o, $f) = @_; - if($f->{'type'} eq 'password' and $o->is_system_user) { - $f->{'type'} = 'hidden'; - $f->{'disabled'} = 1; - } -} - -</%init> |