summaryrefslogtreecommitdiff
path: root/httemplate/edit/access_user.html
diff options
context:
space:
mode:
Diffstat (limited to 'httemplate/edit/access_user.html')
-rw-r--r--httemplate/edit/access_user.html77
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>