diff options
Diffstat (limited to 'httemplate/misc/xmlhttp-part_pkg_taxproduct.html')
-rw-r--r-- | httemplate/misc/xmlhttp-part_pkg_taxproduct.html | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/httemplate/misc/xmlhttp-part_pkg_taxproduct.html b/httemplate/misc/xmlhttp-part_pkg_taxproduct.html new file mode 100644 index 000000000..5e22dd86b --- /dev/null +++ b/httemplate/misc/xmlhttp-part_pkg_taxproduct.html @@ -0,0 +1,36 @@ +<% encode_json({ part_pkg_taxproduct => [ map { $_->taxproduct => $_->description } @part_pkg_taxproduct ] }) %>\ +<%init> + +#compliance solutions specific for now, since they asked for a multi-level +# select + +#my $sub = $cgi->param('sub'); + +warn join(', ', $cgi->param); + +my( %args ) = $cgi->multi_param('arg'); + +my $hashref = { 'data_vendor' => $args{'data_vendor'} }; + +my @part_pkg_taxproduct; +if ( $args{category} =~ /^(\w)$/ ) { + my $category = $1; + @part_pkg_taxproduct = qsearch({ + table => 'part_pkg_taxproduct', + hashref => $hashref, + extra_sql => " AND taxproduct LIKE '$category%' AND length(taxproduct) = 4 ", + }); + +} elsif ( $args{product_code} =~ /^([A-Z]\d+)$/ ) { + my $product_code = $1; + @part_pkg_taxproduct = qsearch({ + table => 'part_pkg_taxproduct', + hashref => $hashref, + extra_sql => " AND taxproduct LIKE '$product_code%' AND length(taxproduct) > 4 ", + }); + +} else { + die 'neither category nor product_code specified'; +} + +</%init> |