httemplate/elements/select-cust-part_pkg.html


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
36
37
38
39
40
41

<%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>

<% include( '/elements/select-part_pkg.html',
              'empty_label'    => '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 ( agentnum IS NOT NULL '.
  '         OR 0 < ( SELECT COUNT(*) FROM type_pkgs '.
  '                    WHERE typenum = '. $cust_main->agent->typenum.
  '                      AND type_pkgs.pkgpart = part_pkg.pkgpart )'.
  '     )';

</%init>