#REM Parameters: #SNIPPET.AdditionalAttributes ... comma separated string of attribute names from the Shop.RegistrationSet which conatain additional information (string ends with a comma!) default: "Department,JobTitle,VATID,FiscalCode,Phone,PhoneBusiness,PhonePrivate,PhoneCell,Birthday,EMail,EMailBusiness,EMailPrivate,Fax," Example: #SNIPPET("SNIPPET-UnityAdditionalAddressInformation", "AdditionalAttributes", "Birthday,EMail,EMailBusiness,EMailPrivate,Fax,") #ENDREM #LOCAL("AdditionalAttributes", "Department,JobTitle,VATID,FiscalCode,Phone,PhoneBusiness,PhonePrivate,PhoneCell,Birthday,EMail,EMailBusiness,EMailPrivate,Fax," ) #IF(#DEFINED(#SNIPPET.AdditionalAttributes)) #SET("AdditionalAttributes", #SNIPPET.AdditionalAttributes) #ENDIF #LOCAL("CustomerInfo","") #LOOP(#Shop.RegistrationSet) #IF((#Attribute.Alias."," IN #AdditionalAttributes) AND #Attribute.IsVisible) #LOCAL("Value", #GET(#Attribute.Alias)) #IF(#Value) #IF(#Attribute.Alias EQ "Birthday") #SET("Value", #Value[date]) #ELSE #SET("Value", #Value[html]) #ENDIF #SET("CustomerInfo", #CustomerInfo . "
  • " . #Attribute.NameOrAlias . ": " . #Value . "
  • ") #ENDIF #ENDLOCAL #ENDIF #ENDLOOP #IF(#CustomerInfo) #ENDIF #ENDLOCAL #REM #ENDREM #ENDLOCAL #REM #ENDREM