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

Add getAddToCartForm to skus, update Shelf code, help, i18n and template.

Browse source
This commit is contained in:
Colin Kuskie 2009-03-28 17:25:43 +00:00
parent b4c60af457
commit 01b8ccf412
14 changed files with 222 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -240,6 +240,37 @@ sub duplicate {
}
#-------------------------------------------------------------------
=head2 getAddToCartForm ( )
Returns a form to add this Sku to the cart. Used when this Sku is part of
a shelf. Overrode master class to add variant dropdown.
=cut
sub getAddToCartForm {
my $self = shift;
my $session = $self->session;
my $i18n = WebGUI::International->new($session, 'Asset_Product');
my %variants = ();
tie %variants, 'Tie::IxHash';
foreach my $collateral ( @{ $self->getAllCollateral('variantsJSON')} ) {
$variants{$collateral->{variantId}} = join ", ", $collateral->{shortdesc}, sprintf('%.2f',$collateral->{price});
}
return
WebGUI::Form::formHeader($session, {action => $self->getUrl})
. WebGUI::Form::hidden( $session, {name => 'func', value => 'buy'})
. WebGUI::Form::selectBox( $session, {
name => 'vid',
options => \%variants,
value => [0],
})
. WebGUI::Form::submit( $session, {value => $i18n->get('add to cart')})
. WebGUI::Form::formFooter($session)
;
}
#-------------------------------------------------------------------
=head2 getAllCollateral ( tableName )