Index: vhUnitTest/APPS/EC/impl/HaefeleDEVerzendwijzeBepaler/Test.cls.xml
===================================================================
diff -u -r65183 -r67251
--- vhUnitTest/APPS/EC/impl/HaefeleDEVerzendwijzeBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 65183)
+++ vhUnitTest/APPS/EC/impl/HaefeleDEVerzendwijzeBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 67251)
@@ -180,6 +180,25 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test Noorwegen">
+<Implementation><![CDATA[
+	#dim LandCode as %String = "NO"
+	Set Bepaler = ##class(APPS.EC.impl.HaefeleDEVerzendwijzeBepaler).%New()
+	
+	Do $$$AssertEquals(Bepaler.GeefVerzendWijze(LandCode,"0000"),"DA4")
+	Do $$$AssertEquals(Bepaler.GeefVerzendWijze(LandCode,"1300"),"DA5")
+	Do $$$AssertEquals(Bepaler.GeefVerzendWijze(LandCode,"8000"),"DA6")
+	Do $$$AssertEquals(Bepaler.GeefVerzendWijze(LandCode,"9000"),"DA7")
+	
+	Do ##class(TECH.Config.ConfigMgr).Instance().SetBoolean("ErkaCoronaTransportTijden",$$$True,..#Applicatie)
+	
+	Do $$$AssertEquals(Bepaler.GeefVerzendWijze(LandCode,"0000"),"DA4")
+	Do $$$AssertEquals(Bepaler.GeefVerzendWijze(LandCode,"1300"),"DA5")
+	Do $$$AssertEquals(Bepaler.GeefVerzendWijze(LandCode,"8000"),"DA6")
+	Do $$$AssertEquals(Bepaler.GeefVerzendWijze(LandCode,"9000"),"DA7")
+]]></Implementation>
+</Method>
+
 <Method name="Test geldige postcodes in Italie">
 <Implementation><![CDATA[
 	#dim LandCode as %String = "IT"
Index: APPS/EC/impl/HaefeleDEVerzendwijzeBepaler.cls.xml
===================================================================
diff -u -r65183 -r67251
--- APPS/EC/impl/HaefeleDEVerzendwijzeBepaler.cls.xml	(.../HaefeleDEVerzendwijzeBepaler.cls.xml)	(revision 65183)
+++ APPS/EC/impl/HaefeleDEVerzendwijzeBepaler.cls.xml	(.../HaefeleDEVerzendwijzeBepaler.cls.xml)	(revision 67251)
@@ -44,6 +44,20 @@
 			Set Verzendwijze = "DAX"
 		}		
 	}
+	
+	if ((LandCode = "NO") && ($$$HasLength(Postcode)) & (##class(TECH.StringUtils).RemoveAllWhitespaces(##class(TECH.StringUtils).StripAllNumeric(Postcode))="")) {
+		Set Regio = +$Extract(Postcode,1,2)
+		If (Regio < 13) {
+			Set Verzendwijze = "DA4"
+		} Elseif (Regio < 80) {
+			Set Verzendwijze = "DA5"
+		} Elseif (Regio < 90) {
+			Set Verzendwijze = "DA6"
+		} Else {
+			Set Verzendwijze = "DA7"
+		}
+	}
+	
 	if ((LandCode = "IT") && ($$$HasLength(Postcode)) & (##class(TECH.StringUtils).RemoveAllWhitespaces(##class(TECH.StringUtils).StripAllNumeric(Postcode))="")) {
 		Set Regio = +$Extract(Postcode,1,2)
 		If (Regio < 10) {
@@ -141,8 +155,22 @@
 			Set Verzendwijze = "DAX"
 		}		
 	}
-		if ((LandCode = "IT") && ($$$HasLength(Postcode)) & (##class(TECH.StringUtils).RemoveAllWhitespaces(##class(TECH.StringUtils).StripAllNumeric(Postcode))="")) {
+	
+	if ((LandCode = "NO") && ($$$HasLength(Postcode)) & (##class(TECH.StringUtils).RemoveAllWhitespaces(##class(TECH.StringUtils).StripAllNumeric(Postcode))="")) {
 		Set Regio = +$Extract(Postcode,1,2)
+		If (Regio < 13) {
+			Set Verzendwijze = "DA4"
+		} Elseif (Regio < 80) {
+			Set Verzendwijze = "DA5"
+		} Elseif (Regio < 90) {
+			Set Verzendwijze = "DA6"
+		} Else {
+			Set Verzendwijze = "DA7"
+		}
+	}
+	
+	if ((LandCode = "IT") && ($$$HasLength(Postcode)) & (##class(TECH.StringUtils).RemoveAllWhitespaces(##class(TECH.StringUtils).StripAllNumeric(Postcode))="")) {
+		Set Regio = +$Extract(Postcode,1,2)
 		If (Regio < 10) {
 			Set Verzendwijze = "HD4"
 		} Elseif((Regio > 9) && (Regio < 46)) {