Index: WSdata/EC/ExterneVerkoop/VerzendingMogelijkheid/VerzendingItem.cls.xml
===================================================================
diff -u -r37917 -r37921
--- WSdata/EC/ExterneVerkoop/VerzendingMogelijkheid/VerzendingItem.cls.xml	(.../VerzendingItem.cls.xml)	(revision 37917)
+++ WSdata/EC/ExterneVerkoop/VerzendingMogelijkheid/VerzendingItem.cls.xml	(.../VerzendingItem.cls.xml)	(revision 37921)
@@ -48,10 +48,6 @@
 <Type>TECH.Integer</Type>
 </Property>
 
-<Property name="ColliDragerType">
-<Type>TECH.String</Type>
-</Property>
-
 <Storage name="Default">
 <Type>%Library.CacheSerialState</Type>
 <State>VerzendingItemState</State>
@@ -93,9 +89,6 @@
 <Value name="12">
 <Value>AantalPalletten</Value>
 </Value>
-<Value name="13">
-<Value>ColliDragerType</Value>
-</Value>
 </Data>
 </Storage>
 </Class>
Index: APPS/VKP/OrderIngaveService.cls.xml
===================================================================
diff -u -r37917 -r37921
--- APPS/VKP/OrderIngaveService.cls.xml	(.../OrderIngaveService.cls.xml)	(revision 37917)
+++ APPS/VKP/OrderIngaveService.cls.xml	(.../OrderIngaveService.cls.xml)	(revision 37921)
@@ -168,9 +168,7 @@
 <Implementation><![CDATA[
 	If Offerte.VerzendingItem.AantalPalletten > 0 {
 		Do Order.MaakNieuweTekstLijn("Aantal palletten is " _Offerte.VerzendingItem.AantalPalletten)
-		if ##class(DOM.VKP.enu.ColliDragerType).Validate(Offerte.VerzendingItem.ColliDragerType) { 
-			Do Order.ZetColliDragerType(Offerte.VerzendingItem.ColliDragerType)
-		}
+		Do Order.ZetColliDragerType(##class(DOM.VKP.enu.ColliDragerType).WegwerpPallet())
 	}
 ]]></Implementation>
 </Method>
Index: APPS/VKP/impl/Offerte/VerzendingItem.cls.xml
===================================================================
diff -u -r37917 -r37921
--- APPS/VKP/impl/Offerte/VerzendingItem.cls.xml	(.../VerzendingItem.cls.xml)	(revision 37917)
+++ APPS/VKP/impl/Offerte/VerzendingItem.cls.xml	(.../VerzendingItem.cls.xml)	(revision 37921)
@@ -44,10 +44,6 @@
 <Type>TECH.Integer</Type>
 </Property>
 
-<Property name="ColliDragerType">
-<Type>TECH.String</Type>
-</Property>
-
 <Storage name="Default">
 <Type>%Library.CacheSerialState</Type>
 <State>VerzendingItemState</State>
@@ -83,9 +79,6 @@
 <Value name="10">
 <Value>AantalPalletten</Value>
 </Value>
-<Value name="11">
-<Value>ColliDragerType</Value>
-</Value>
 </Data>
 </Storage>
 </Class>
FishEye: Tag 37921 refers to a dead (removed) revision in file `vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails/TestColliDragerType.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
Index: WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml
===================================================================
diff -u -r37917 -r37921
--- WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 37917)
+++ WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 37921)
@@ -241,11 +241,6 @@
 	Set VerzendingItem.Omschrijving = VerzendingMogelijkheid.Omschrijving
 	Set VerzendingItem.TransportFirma = VerzendingMogelijkheid.TransportFirma
 	Set VerzendingItem.AantalPalletten = OfferteItem.AantalPalletten
-	If (..IsHeinPersonality() || ..IsHeinKlant()) {
-		Set VerzendingItem.ColliDragerType = ##class(WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.enu.ColliDragerType).WegwerpPallet()
-	} else {
-		Set VerzendingItem.ColliDragerType = ""
-	}
 	Set VerzendingItem.Optie = ..ConverteerCarbonNeutral(VerzendingMogelijkheid.Optie)
 	Quit VerzendingItem
 ]]></Implementation>
@@ -286,20 +281,6 @@
 	Quit Selecties
 ]]></Implementation>
 </Method>
-
-<Method name="IsHeinPersonality">
-<Private>1</Private>
-<ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit (..Sessie.GeefPersonalityID() = ##class(DOM.common.enu.Personality).Hein())
-]]></Implementation>
-</Method>
-
-<Method name="IsHeinKlant">
-<Private>1</Private>
-<ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit (..Sessie.GeefKlantID() = ##class(DOM.VKP.enu.Klant).Hein())
-]]></Implementation>
-</Method>
 </Class>
 
 
FishEye: Tag 37921 refers to a dead (removed) revision in file `WSdata/EC/ExterneVerkoop/VerzendingMogelijkheid/enu/ColliDragerType/AutoComplete.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
FishEye: Tag 37921 refers to a dead (removed) revision in file `WSdata/EC/ExterneVerkoop/VerzendingMogelijkheid/enu/ColliDragerType.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
FishEye: Tag 37921 refers to a dead (removed) revision in file `WSdata/EC/ExterneVerkoop/VerzendingMogelijkheid/enu/ColliDragerType/Verwerker.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?