<% include("/elements/header.html","$action Agent Type", menubar( 'View all agent types' => "${p}browse/agent_type.cgi", )) %> <% include('/elements/error.html') %>

Agent Type #<% $agent_type->typenum || "(NEW)" %>

Agent Type
Disable	disabled eq 'Y' ? ' CHECKED' : '' %>>

Package definitions that agents of this type can sell

<% include('/elements/checkboxes-table.html', 'source_obj' => $agent_type, 'link_table' => 'type_pkgs', 'target_table' => 'part_pkg', 'name_callback' => sub { encode_entities( $_[0]->pkg_comment(nopkgpart => 1) ); }, 'target_link' => $p.'edit/part_pkg.cgi?', 'disable-able' => 1, ) %>

">

<% include('/elements/footer.html') %> <%init> die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('Configuration'); my($agent_type); if ( $cgi->param('error') ) { $agent_type = new FS::agent_type ( { map { $_, scalar($cgi->param($_)) } fields('agent') } ); } elsif ( $cgi->keywords ) { #editing my( $query ) = $cgi->keywords; $query =~ /^(\d+)$/; $agent_type=qsearchs('agent_type',{'typenum'=>$1}); } else { #adding $agent_type = new FS::agent_type {}; } my $action = $agent_type->typenum ? 'Edit' : 'Add';