#IF(#INPUT.ViewAction NE "ViewProductPrint" AND #COUNT(#SubProducts))#LOCAL("HasPrice", 0)
#LOCAL("CurrentSubProductPath",#Path) #LOOP(#SubProducts) #IF(#IsVisible) #LOCAL("CoverFlowImage", "") #IF(#ImageMedium) #SET("CoverFlowImage", #ImageMedium) #ELSIF(#ImageSmall) #SET("CoverFlowImage", #ImageSmall) #ENDIF #IF(#CoverFlowImage) #LOCAL("BasketLink", "") #SET("BasketLink", "?ChangeObjectID=" . #ID . "&ChangeAction=AddToBasket&ViewObjectID=" . #INPUT.ObjectID . "&ViewAction=JSONViewResponse") #IF(#DEFINED(#INPUT.Page)) #SET("BasketLink", #BasketLink . "&Page=" . #INPUT.Page) #ENDIF #LOCAL("DescriptionLine", #NameOrAlias) #LOCAL("VariationString", "") #LOOP(#VariationTypeValues) #LOCAL("AttributeValue",#GET(#Attribute.Alias)) #SET("VariationString", #VariationString . " - " . #Attribute.NameOrAlias . ": " . #AttributeValue.ValueOrAlias) #ENDLOCAL #ENDLOOP #SET("DescriptionLine", #DescriptionLine . #VariationString) #ENDLOCAL #LOCAL("DisplayPrice", #FUNCTION("DISPLAYPRICE", #Object, #INPUT.Currency, #Shop.TaxModel, #Session.User.Object)) #IF(#DEFINED(#DisplayPrice)) #SET("HasPrice", 1) #SET("DescriptionLine", #DescriptionLine . " " . #DisplayPrice[money]) #ENDIF #LOCAL("TempOrderUnit", #OrderUnit.NameOrAlias) #IF(#OrderUnit.Abbreviation)#SET("TempOrderUnit",#OrderUnit.Abbreviation)#ENDIF #IF(#DEFINED(#PriceQuantity) AND #PriceQuantity != 1) #SET("DescriptionLine", #DescriptionLine . " / " . #PriceQuantity . #TempOrderUnit) #ENDIF #IF(#DEFINED(#OrderUnit.Alias) AND #OrderUnit.Alias NE "piece" AND #DEFINED(#PriceQuantity) AND #PriceQuantity == 1) #SET("DescriptionLine", #DescriptionLine . " / " . #TempOrderUnit) #ENDIF #ENDLOCAL #IF(#DEFINED(#DisplayPrice)) #IF(NOT #IsAppointment) #IF(#FUNCTION("DISPLAYPRICETAGINFOGROSS", #Object, #Shop.TaxModel, #Session.User.Object)) #IF(#Shop.PriceTagInfoMultiProductGross) #SET("DescriptionLine", #DescriptionLine . " *") #ENDIF #ELSIF(#Shop.PriceTagInfoMultiProductNet) #SET("DescriptionLine", #DescriptionLine . " *") #ENDIF #ENDIF #ENDIF #ENDLOCAL #NameOrAlias #DescriptionLine #ENDLOCAL #ENDLOCAL #ENDIF #ENDLOCAL #ENDIF #ENDLOOP #ENDLOCAL
#IF(#HasPrice) #IF(#FUNCTION("DISPLAYPRICETAGINFOGROSS", #Object, #Shop.TaxModel, #Session.User.Object)) #IF(#Shop.PriceTagInfoMultiProductGross)
* #Shop.PriceTagInfoMultiProductGross[0]
#ENDIF #ELSIF(#Shop.PriceTagInfoMultiProductNet)
* #Shop.PriceTagInfoMultiProductNet[0]
#ENDIF #ENDIF #ENDLOCAL#ENDIF #SNIPPET("INC-LightboxScript")