summaryrefslogtreecommitdiff
path: root/httemplate/elements/select-agent.html
diff options
context:
space:
mode:
authorivan <ivan>2005-12-22 04:01:17 +0000
committerivan <ivan>2005-12-22 04:01:17 +0000
commit386ec52836abbe32ce2fbf575e851a75f6e112f8 (patch)
tree81478db40760f99502fed619009f9c6870bd56ca /httemplate/elements/select-agent.html
parent96946b956b5f89693f94e2aab930510a036b8192 (diff)
tax report update, link to new line item report, per-agent tax reporting
Diffstat (limited to 'httemplate/elements/select-agent.html')
-rw-r--r--httemplate/elements/select-agent.html24
1 files changed, 24 insertions, 0 deletions
diff --git a/httemplate/elements/select-agent.html b/httemplate/elements/select-agent.html
new file mode 100644
index 000000000..c2a5e4bde
--- /dev/null
+++ b/httemplate/elements/select-agent.html
@@ -0,0 +1,24 @@
+<%
+ my( $agentnum, %opt ) = @_;
+
+ my @agents;
+ if ( $opt{'agents'} ) {
+ @agents = @{ $opt{'agents'} };
+ } else {
+ @agents = qsearch( 'agent', { disabled=>'' } );
+ }
+
+%>
+
+<SELECT NAME="agentnum">
+
+ <OPTION VALUE="">all</OPTION>
+
+ <% foreach my $agent ( sort { $a->agent cmp $b->agent } @agents ) { %>
+
+ <OPTION VALUE="<%= $agent->agentnum %>"<%= $agentnum == $agent->agentnum ? ' SELECTED' : '' %>><%= $agent->agent %>
+
+ <% } %>
+
+</SELECT>
+