From f6abf4cd6d8e7a0121124e9394b5f28f5bc4daa5 Mon Sep 17 00:00:00 2001 From: Mark Wells Date: Sat, 31 Jan 2015 14:44:16 -0800 Subject: discounts + quotations, #33099 --- FS/FS/quotation.pm | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) (limited to 'FS/FS/quotation.pm') diff --git a/FS/FS/quotation.pm b/FS/FS/quotation.pm index 5c94150..38e7318 100644 --- a/FS/FS/quotation.pm +++ b/FS/FS/quotation.pm @@ -631,6 +631,27 @@ sub search_sql_where { } +=item _items_pkg + +Return line item hashes for each package on this quotation. Differs from the +base L version in that it recalculates each quoted package +first, and doesn't implement the "condensed" option. + +=cut + +sub _items_pkg { + my ($self, %options) = @_; + my @quotation_pkg = $self->quotation_pkg; + foreach (@quotation_pkg) { + my $error = $_->estimate; + die "error calculating estimate for pkgpart " . $_->pkgpart.": $error\n" + if $error; + } + + # run it through the Template_Mixin engine + return $self->_items_cust_bill_pkg(\@quotation_pkg, %options); +} + =back =head1 BUGS -- cgit v1.1