Index: vhUnitTest/BL/Flow/Proxy/pxLevering/TestAfzenderHoofding.cls.xml
===================================================================
diff -u -r51122 -r51124
--- vhUnitTest/BL/Flow/Proxy/pxLevering/TestAfzenderHoofding.cls.xml	(.../TestAfzenderHoofding.cls.xml)	(revision 51122)
+++ vhUnitTest/BL/Flow/Proxy/pxLevering/TestAfzenderHoofding.cls.xml	(.../TestAfzenderHoofding.cls.xml)	(revision 51124)
@@ -87,7 +87,7 @@
 		Do $$$AssertEquals(afzender.T8,"")
 	}
 	
-	Do $$$AssertEquals(pxLevering.HeaderType,##class(BL.FOP.Proxy.enu.HoofdingType).HaefeleNL())
+	Do $$$AssertEquals(pxLevering.HeaderType,##class(BL.FOP.Proxy.enu.HoofdingType).Custom())
 	Do $$$AssertEquals(pxLevering.KlantTelefoon,"")
 	Do $$$AssertEquals(pxLevering.BTWNR,"")
 	Do $$$AssertEquals(pxLevering.FactuurAan,"","""Factuur aan: "" niet ingevuld")
Index: BL/Flow/Proxy/pxLevering.cls.xml
===================================================================
diff -u -r51122 -r51124
--- BL/Flow/Proxy/pxLevering.cls.xml	(.../pxLevering.cls.xml)	(revision 51122)
+++ BL/Flow/Proxy/pxLevering.cls.xml	(.../pxLevering.cls.xml)	(revision 51124)
@@ -485,6 +485,7 @@
 	} ElseIf ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).HaefeleNL(){
 		Set ..KlantTelefoon = ""
 		Set ..BTWNR = ""
+		Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).Custom()
 	} Else {
 		Set ..KlantTelefoon=$P($$$KLRec(0),"\",13)
 		Set ..CheckSumBon= "" ;CheckSumBon