X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fagent.cgi;h=40115a932b35fd143bb5d085214299bf27c95931;hb=8e9dcecdfc1cad277dcce3fd58d51b20566f9ec9;hp=449456cdd7efc1e7d5fc6a79d5b7815b79c0e4e0;hpb=0ebeec96313dd7edfca340f01f8fbbbac1f4aa1d;p=freeside.git diff --git a/httemplate/edit/agent.cgi b/httemplate/edit/agent.cgi index 449456cdd..40115a932 100755 --- a/httemplate/edit/agent.cgi +++ b/httemplate/edit/agent.cgi @@ -1,4 +1,3 @@ - <% my $agent; @@ -16,59 +15,95 @@ if ( $cgi->param('error') ) { my $action = $agent->agentnum ? 'Edit' : 'Add'; my $hashref = $agent->hashref; -print header("$action Agent", menubar( +my $conf = new FS::Conf; + +%> + +<%= include("/elements/header.html","$action Agent", menubar( 'Main Menu' => $p, 'View all agents' => $p. 'browse/agent.cgi', -)); +)) %> + +<% if ( $cgi->param('error') ) { %> +Error: <%= $cgi->param('error') %> +<% } %> -print qq!Error: !, $cgi->param('error'), - "" - if $cgi->param('error'); +
+ +Agent #<%= $hashref->{agentnum} ? $hashref->{agentnum} : "(NEW)" %> -print '', - qq!!, - "Agent #", $hashref->{agentnum} ? $hashref->{agentnum} : "(NEW)"; +<%= &ntable("#cccccc", 2, '') %> -print &ntable("#cccccc", 2, ''), < Agent - + - - Agent type - + + <% foreach my $agent_type (qsearch('agent_type',{})) { %> +