summaryrefslogtreecommitdiff
path: root/httemplate/elements/select-cust-part_pkg.html
diff options
context:
space:
mode:
Diffstat (limited to 'httemplate/elements/select-cust-part_pkg.html')
-rw-r--r--httemplate/elements/select-cust-part_pkg.html35
1 files changed, 35 insertions, 0 deletions
diff --git a/httemplate/elements/select-cust-part_pkg.html b/httemplate/elements/select-cust-part_pkg.html
new file mode 100644
index 000000000..731beae2a
--- /dev/null
+++ b/httemplate/elements/select-cust-part_pkg.html
@@ -0,0 +1,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>