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

WGBP indent view method of Sku::Product

Browse source
This commit is contained in:
Colin Kuskie 2008-04-11 22:52:15 +00:00
parent 23ea56bbe6
commit fd1a51562c
1 changed files with 92 additions and 90 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -993,58 +993,60 @@ sub www_moveSpecificationUp {
#------------------------------------------------------------------- #-------------------------------------------------------------------
sub view { sub view {
my $self = shift; my $self = shift;
if (!$self->session->var->isAdminOn && $self->get("cacheTimeout") > 10) { if (!$self->session->var->isAdminOn && $self->get("cacheTimeout") > 10) {
my $out = WebGUI::Cache->new($self->session,"view_".$self->getId)->get; my $out = WebGUI::Cache->new($self->session,"view_".$self->getId)->get;
return $out if $out; return $out if $out;
} }
my (%data, $sth, $file, $segment, %var, @featureloop, @benefitloop, @specificationloop, @accessoryloop, @relatedloop); my (%data, $sth, $file, $segment, %var, @featureloop, @benefitloop, @specificationloop, @accessoryloop, @relatedloop);
tie %data, 'Tie::CPHash'; tie %data, 'Tie::CPHash';
my $brochure = $self->get("brochure"); my $brochure = $self->get("brochure");
my $manual = $self->get("manual"); my $manual = $self->get("manual");
my $warranty = $self->get("warranty"); my $warranty = $self->get("warranty");
my $image1 = $self->get("image1"); my $image1 = $self->get("image1");
my $image2 = $self->get("image2"); my $image2 = $self->get("image2");
my $image3 = $self->get("image3"); my $image3 = $self->get("image3");
#---brochure
#---brochure
my $i18n = WebGUI::International->new($self->session,'Asset_Product'); my $i18n = WebGUI::International->new($self->session,'Asset_Product');
if ($brochure) { if ($brochure) {
$file = WebGUI::Storage->get($self->session,$brochure); $file = WebGUI::Storage->get($self->session,$brochure);
$var{"brochure.icon"} = $self->getFileIconUrl($file); $var{"brochure.icon"} = $self->getFileIconUrl($file);
$var{"brochure.label"} = $i18n->get(13); $var{"brochure.label"} = $i18n->get(13);
$var{"brochure.URL"} = $self->getFileUrl($file); $var{"brochure.URL"} = $self->getFileUrl($file);
} }
#---manual #---manual
if ($manual) { if ($manual) {
$file = WebGUI::Storage->get($self->session,$manual); $file = WebGUI::Storage->get($self->session,$manual);
$var{"manual.icon"} = $self->getFileIconUrl($file); $var{"manual.icon"} = $self->getFileIconUrl($file);
$var{"manual.label"} = $i18n->get(14); $var{"manual.label"} = $i18n->get(14);
$var{"manual.URL"} = $self->getFileUrl($file); $var{"manual.URL"} = $self->getFileUrl($file);
} }
#---warranty #---warranty
if ($warranty) { if ($warranty) {
$file = WebGUI::Storage->get($self->session,$warranty); $file = WebGUI::Storage->get($self->session,$warranty);
$var{"warranty.icon"} = $self->getFileIconUrl($file); $var{"warranty.icon"} = $self->getFileIconUrl($file);
$var{"warranty.label"} = $i18n->get(15); $var{"warranty.label"} = $i18n->get(15);
$var{"warranty.URL"} = $self->getFileUrl($file); $var{"warranty.URL"} = $self->getFileUrl($file);
} }
#---image1 #---image1
if ($image1) { if ($image1) {
$file = WebGUI::Storage->get($self->session,$image1); $file = WebGUI::Storage->get($self->session,$image1);
$var{thumbnail1} = $self->getThumbnailUrl($file); $var{thumbnail1} = $self->getThumbnailUrl($file);
$var{image1} = $self->getFileUrl($file); $var{image1} = $self->getFileUrl($file);
} }
#---image2 #---image2
if ($image2) { if ($image2) {
$file = WebGUI::Storage->get($self->session,$image2); $file = WebGUI::Storage->get($self->session,$image2);
$var{thumbnail2} = $self->getThumbnailUrl($file); $var{thumbnail2} = $self->getThumbnailUrl($file);
$var{image2} = $self->getFileUrl($file); $var{image2} = $self->getFileUrl($file);
} }
#---image3 #---image3
if ($image3) { if ($image3) {
$file = WebGUI::Storage->get($self->session,$image3); $file = WebGUI::Storage->get($self->session,$image3);
$var{thumbnail3} = $self->getThumbnailUrl($file); $var{thumbnail3} = $self->getThumbnailUrl($file);
$var{image3} = $self->getFileUrl($file); $var{image3} = $self->getFileUrl($file);
} }
#---features #---features
@ -1081,63 +1083,63 @@ sub view {
$sth->finish; $sth->finish;
$var{benefit_loop} = \@benefitloop; $var{benefit_loop} = \@benefitloop;
#---specifications #---specifications
$var{"addSpecification.url"} = $self->getUrl('func=editSpecification&sid=new'); $var{"addSpecification.url"} = $self->getUrl('func=editSpecification&sid=new');
$var{"addSpecification.label"} = $i18n->get(35); $var{"addSpecification.label"} = $i18n->get(35);
$sth = $self->session->db->read("select name,value,units,Product_specificationId from Product_specification where assetId=".$self->session->db->quote($self->getId)." order by sequenceNumber"); $sth = $self->session->db->read("select name,value,units,Product_specificationId from Product_specification where assetId=".$self->session->db->quote($self->getId)." order by sequenceNumber");
while (%data = $sth->hash) { while (%data = $sth->hash) {
$segment = $self->session->icon->delete('func=deleteSpecificationConfirm&sid='.$data{Product_specificationId},$self->get("url"),$i18n->get(5)) $segment = $self->session->icon->delete('func=deleteSpecificationConfirm&sid='.$data{Product_specificationId},$self->get("url"),$i18n->get(5))
.$self->session->icon->edit('func=editSpecification&sid='.$data{Product_specificationId},$self->get("url")) . $self->session->icon->edit('func=editSpecification&sid='.$data{Product_specificationId},$self->get("url"))
.$self->session->icon->moveUp('func=moveSpecificationUp&sid='.$data{Product_specificationId},$self->get("url")) . $self->session->icon->moveUp('func=moveSpecificationUp&sid='.$data{Product_specificationId},$self->get("url"))
.$self->session->icon->moveDown('func=moveSpecificationDown&sid='.$data{Product_specificationId},$self->get("url")); . $self->session->icon->moveDown('func=moveSpecificationDown&sid='.$data{Product_specificationId},$self->get("url"));
push(@specificationloop,{ push(@specificationloop,{
"specification.controls"=>$segment, "specification.controls" => $segment,
"specification.specification"=>$data{value}, "specification.specification" => $data{value},
"specification.units"=>$data{units}, "specification.units" => $data{units},
"specification.label"=>$data{name} "specification.label" => $data{name},
}); });
} }
$sth->finish; $sth->finish;
$var{specification_loop} = \@specificationloop; $var{specification_loop} = \@specificationloop;
#---accessories #---accessories
$var{"addaccessory.url"} = $self->getUrl('func=addAccessory'); $var{"addaccessory.url"} = $self->getUrl('func=addAccessory');
$var{"addaccessory.label"} = $i18n->get(36); $var{"addaccessory.label"} = $i18n->get(36);
$sth = $self->session->db->read("select Product_accessory.accessoryAssetId from Product_accessory $sth = $self->session->db->read("select Product_accessory.accessoryAssetId from Product_accessory
where Product_accessory.assetId=".$self->session->db->quote($self->getId)." where Product_accessory.assetId=".$self->session->db->quote($self->getId)."
order by Product_accessory.sequenceNumber"); order by Product_accessory.sequenceNumber");
while (my ($id) = $sth->array) { while (my ($id) = $sth->array) {
$segment = $self->session->icon->delete('func=deleteAccessoryConfirm&aid='.$id,$self->get("url"),$i18n->get(2)) $segment = $self->session->icon->delete('func=deleteAccessoryConfirm&aid='.$id,$self->get("url"),$i18n->get(2))
.$self->session->icon->moveUp('func=moveAccessoryUp&aid='.$id,$self->get("url")) . $self->session->icon->moveUp('func=moveAccessoryUp&aid='.$id,$self->get("url"))
.$self->session->icon->moveDown('func=moveAccessoryDown&aid='.$id,$self->get("url")); . $self->session->icon->moveDown('func=moveAccessoryDown&aid='.$id,$self->get("url"));
my $accessory = WebGUI::Asset->newByDynamicClass($self->session,$id); my $accessory = WebGUI::Asset->newByDynamicClass($self->session,$id);
push(@accessoryloop,{ push(@accessoryloop,{
"accessory.URL"=>$accessory->getUrl, "accessory.URL" => $accessory->getUrl,
"accessory.title"=>$accessory->getTitle, "accessory.title" => $accessory->getTitle,
"accessory.controls"=>$segment "accessory.controls" => $segment,
}); });
} }
$sth->finish; $sth->finish;
$var{accessory_loop} = \@accessoryloop; $var{accessory_loop} = \@accessoryloop;
#---related #---related
$var{"addrelatedproduct.url"} = $self->getUrl('func=addRelated'); $var{"addrelatedproduct.url"} = $self->getUrl('func=addRelated');
$var{"addrelatedproduct.label"} = $i18n->get(37); $var{"addrelatedproduct.label"} = $i18n->get(37);
$sth = $self->session->db->read("select Product_related.relatedAssetId $sth = $self->session->db->read("select Product_related.relatedAssetId
from Product_related from Product_related
where Product_related.assetId=".$self->session->db->quote($self->getId)." where Product_related.assetId=".$self->session->db->quote($self->getId)."
order by Product_related.sequenceNumber"); order by Product_related.sequenceNumber");
while (my ($id) = $sth->array) { while (my ($id) = $sth->array) {
$segment = $self->session->icon->delete('func=deleteRelatedConfirm&rid='.$id,$self->get("url"),$i18n->get(4)) $segment = $self->session->icon->delete('func=deleteRelatedConfirm&rid='.$id,$self->get("url"),$i18n->get(4))
.$self->session->icon->moveUp('func=moveRelatedUp&rid='.$id,$self->get("url")) . $self->session->icon->moveUp('func=moveRelatedUp&rid='.$id,$self->get("url"))
.$self->session->icon->moveDown('func=moveRelatedDown&rid='.$id,$self->get("url")); . $self->session->icon->moveDown('func=moveRelatedDown&rid='.$id,$self->get("url"));
my $related = WebGUI::Asset->newByDynamicClass($self->session,$id); my $related = WebGUI::Asset->newByDynamicClass($self->session,$id);
push(@relatedloop,{ push(@relatedloop,{
"relatedproduct.URL"=>$related->getUrl, "relatedproduct.URL" => $related->getUrl,
"relatedproduct.title"=>$related->getTitle, "relatedproduct.title" => $related->getTitle,
"relatedproduct.controls"=>$segment "relatedproduct.controls" => $segment,
}); });
} }
$sth->finish; $sth->finish;
$var{relatedproduct_loop} = \@relatedloop; $var{relatedproduct_loop} = \@relatedloop;
my $out = $self->processTemplate(\%var,undef,$self->{_viewTemplate}); my $out = $self->processTemplate(\%var,undef,$self->{_viewTemplate});