diff options
Diffstat (limited to 'httemplate/misc/sales.cgi')
-rw-r--r-- | httemplate/misc/sales.cgi | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/httemplate/misc/sales.cgi b/httemplate/misc/sales.cgi new file mode 100644 index 000000000..1e5637173 --- /dev/null +++ b/httemplate/misc/sales.cgi @@ -0,0 +1,27 @@ +<% encode_json( \@return ) %>\ +<%init> + +my( $agentnum ) = $cgi->param('arg'); + +my %hash = ( 'disabled' => '' ); +if ( $agentnum > 0 ) { + $hash{'agentnum'} = $agentnum; +} +my @sales = qsearch({ + 'table' => 'sales', + 'hashref' => \%hash, + 'extra_sql' => ' AND '. $FS::CurrentUser::CurrentUser->agentnums_sql, + 'order_by' => 'ORDER BY salesperson', +}); + +warn scalar(@sales); + +my @return = map { + ( $_->salesnum, + $_->salesperson, + ) + } + #sort { $a->salesperson cmp $b->salesperson } + @sales; + +</%init> |