#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

#LOCAL("ShowTrackingLink","0") #LOOP(#DHLTrackingEvents) #IF(NOT #NoTracking)#SET("ShowTrackingLink","1")#ENDIF #ENDLOOP #IF(#ShowTrackingLink) #ENDIF #ENDLOCAL
{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
#ENDIF #ENDLOCAL #ENDIF #ENDLOCAL #ENDLOCAL #ENDIF #ENDLOCAL #ENDIF