blob: 731beae2a0a36ea13888b25f876ce0c7a0192372 (
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
26
27
28
29
30
31
32
33
34
35
 | <%doc>
Example:
  include( '/elements/select-cust-part_pkg.html',
    #required
    'cust_main'  => $cust_main, #or 'custnum' ? 
             
    #strongly recommended (you want your forms to be "sticky" on errors, right?)
    'curr_value' => 'current_value',
  
    #opt
    'part_pkg'   => \@records,
    #select-table.html options
  )
</%doc>
<& /elements/select-part_pkg.html,
              'empty_label'    => emt('Select package'), #? need here in case removed
                                                    #from select-part_pkg ??
              %opt,
&>
<%init>
my( %opt ) = @_;
my $cust_main = $opt{'cust_main'}
  or die "cust_main not specified";
$opt{'extra_sql'} .= ' AND '. FS::part_pkg->agent_pkgs_sql( $cust_main->agent );
</%init>
 |