<% include( 'elements/edit.html', 'name' => 'Employee', 'table' => 'access_user', 'fields' => [ 'username', { field=>'_password', type=>'password' }, { field=>'_password2', type=>'password' }, 'last', 'first', { field=>'sched_item_enabled', type=>'checkbox', value=>'Y' }, { field=>'user_custnum', type=>'search-cust_main', }, { field => 'report_salesnum', type => 'select-sales', empty_label => 'all', }, { field=>'disabled', type=>'checkbox', value=>'Y' }, ], 'labels' => { 'usernum' => 'User number', 'username' => 'Username', '_password' => 'Password', '_password2' => 'Re-enter Password', 'last' => 'Last name', 'first' => 'First name', 'sched_item_enabled' => 'Installer', 'user_custnum' => 'Customer (optional)', 'report_salesnum' => 'Limit commission report to sales person', 'disabled' => 'Disable employee', }, 'edit_callback' => \&edit_callback, 'field_callback'=> \&field_callback, 'viewall_dir' => 'browse', 'html_bottom' => sub { my $access_user = shift; '
Employee Groups
'. ntable("#cccccc",2). ''. 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, ). '' ; }, '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 = < function check_user_custnum_search(what) { while ( user_custnum_search_active ) { // javascript needs ambien } return true; } END sub edit_callback { my ($cgi, $access_user, $fields_listref, $opt_hashref) = @_; $access_user->_password(''); my @sched_item = $access_user->sched_item; $access_user->sched_item_enabled('Y') if $sched_item[0] && ! $sched_item[0]->disabled; } sub field_callback { my ($c, $o, $f) = @_; if($f->{'type'} eq 'password' and $o->is_system_user) { $f->{'type'} = 'hidden'; $f->{'disabled'} = 1; } }