blob: 2b6406a686608a25a7600f419e30c620ffedab8d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
<% 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',
});
my @return = map {
( $_->salesnum,
$_->salesperson,
)
}
#sort { $a->salesperson cmp $b->salesperson }
@sales;
</%init>
|