#IF(#PartlyDispatchedOn OR #DispatchedOn) #LOCAL("DisplayFeature", #FUNCTION("FeaturedActionAvailable", #Shop.Object, #Action.Object, "DHL")) #IF(#DisplayFeature NE "NotVisible") #LOCAL("DHLTOSAccepted","0") #LOCAL("DHLEmailTextTrackAndTrace","") #LOOP(#Shop.ShippingMethods) #IF(#Class.Alias EQ "ShippingMethodDHL") #IF(#AcceptTOS EQ "1") #SET("DHLTOSAccepted","1") #SET("DHLEmailTextTrackAndTrace",#EmailTextTrackAndTrace[0]) #ENDIF #ENDIF #ENDLOOP #IF(#DHLTOSAccepted) #LOCAL("DHLTrackingEvents",#FUNCTION("DHLTrackingEvents",#ID)) #IF(#COUNT(#DHLTrackingEvents))
#DHLEmailTextTrackAndTrace
{Date} | {LabelId} | {ShipmentId} |
#IssueDate[datetime] | #LabelId | #ShipmentId #IF(#NoTracking)({NoTrackingPossible})#ENDIF |
#LOCAL("DHLTrackingLanguage","") #IF( (#LineItemContainer.LocaleID EQ "de_DE") OR (#LineItemContainer.LocaleID EQ "de_AT") OR (#LineItemContainer.LocaleID EQ "de_CH") ) #SET("DHLTrackingLanguage","de") #ELSE #SET("DHLTrackingLanguage","en") #ENDIF #LOCAL("TrackingParameter", "") #IF(#DEFINED(#ShippingAddress)) #IF(#ShippingAddress.Country.Code2 EQ "DE") #SET("TrackingParameter", "&zip=".#ShippingAddress.Zipcode) #ELSE #SET("TrackingParameter", "&internationalShipment=on") #ENDIF #ELSE #IF(#BillingAddress.Country.Code2 EQ "DE") #SET("TrackingParameter", "&zip=".#BillingAddress.Zipcode) #ELSE #SET("TrackingParameter", "&internationalShipment=on") #ENDIF #ENDIF #REM Show tracking link for all tracking-enabled shipments. #ENDREM {TrackDHLDelivery} #ENDLOCAL #ENDLOCAL |