oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

begin implementing inventory control. Continue to separate the variants loop and the list of available variants for sale.

Browse source
This commit is contained in:
Colin Kuskie 2008-05-24 23:14:38 +00:00
parent 28252f59e0
commit e3061a1606
1 changed files with 42 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

45
lib/WebGUI/Asset/Sku/Product.pm
View file

@ -73,6 +73,7 @@ cart decrements the quantity by 1.
sub addToCart { sub addToCart {
my $self = shift; my $self = shift;
my $variant = shift; my $variant = shift;
my $i18n = WebGUI::International->new($self->session, 'Asset_Product');
$variant->{quantity} -= 1; $variant->{quantity} -= 1;
$self->setCollateral('variantsJSON', 'variantId', $variant); $self->setCollateral('variantsJSON', 'variantId', $variant);
$self->SUPER::addToCart($variant); $self->SUPER::addToCart($variant);
@ -390,6 +391,21 @@ sub getFileUrl {
#------------------------------------------------------------------- #-------------------------------------------------------------------
=head2 getMaxAllowedInCart ( )
Returns the quantity after options from a variant have been applied to this
Product via applyOptions. For WebGUI::Shop::CartItem, this is handled by
getSku automatically.
=cut
sub getMaxAllowedInCart {
my $self = shift;
return $self->getOptions->{quantity};
}
#-------------------------------------------------------------------
=head2 getPrice ( ) =head2 getPrice ( )
Only returns a price after options from a variant have been applied to this Only returns a price after options from a variant have been applied to this
@ -510,6 +526,29 @@ sub moveCollateralUp {
} }
#-------------------------------------------------------------------
=head2 onAdjustQuantityInCart ( item, amount )
Override the default Sku to handle checking inventory
=head3 item
The WebGUI::Shop::CartItem that is having its quantity adjusted.
=head3 amount
The amount adjusted. Could be positive or negative.
=cut
sub onAdjustQuantityInCart {
my $self = shift;
my $item = shift;
my $amount = shift;
}
#------------------------------------------------------------------- #-------------------------------------------------------------------
=head2 prepareView ( ) =head2 prepareView ( )
@ -1413,10 +1452,10 @@ sub view {
'variant_weight' => $collateral->{weight}, 'variant_weight' => $collateral->{weight},
'variant_quantity' => $collateral->{quantity}, 'variant_quantity' => $collateral->{quantity},
}); });
$variants{$id} = $collateral->{shortdesc}; $variants{$id} = $collateral->{shortdesc} if $collateral->{quantity} > 0;
} }
if (scalar @variantLoop) { if (scalar keys %variants) {
##Don't display the form unless you have variants to sell. ##Don't display the form unless you have available variants to sell.
$var{buy_form_header} = WebGUI::Form::formHeader($session, { action => $self->getUrl} ) $var{buy_form_header} = WebGUI::Form::formHeader($session, { action => $self->getUrl} )
. WebGUI::Form::hidden($session, { name=>'func', value=>'buy', } ); . WebGUI::Form::hidden($session, { name=>'func', value=>'buy', } );
$var{buy_form_footer} = WebGUI::Form::formFooter($session); $var{buy_form_footer} = WebGUI::Form::formFooter($session);