Index: APPS/VKP/impl/OfferteService.cls.xml
===================================================================
diff -u -r42401 -r42402
--- APPS/VKP/impl/OfferteService.cls.xml	(.../OfferteService.cls.xml)	(revision 42401)
+++ APPS/VKP/impl/OfferteService.cls.xml	(.../OfferteService.cls.xml)	(revision 42402)
@@ -226,7 +226,13 @@
 </Method>
 
 <Method name="GeefHandelOfferteNaarVanHoeckeOfferteConverteerder">
-<Implementation><![CDATA[	quit ##class(APPS.VKP.Offerte.impl.HandelOfferteNaarVanHoeckeOfferteConverteerderVhisie3).%New()
+<FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
+<Implementation><![CDATA[
+	If Offerte.IsVhisie4() {
+		Quit ##class(APPS.VKP.Offerte.impl.HandelOfferteNaarVanHoeckeOfferteConverteerderVhisie4).%New()
+	} Else {
+		Quit ##class(APPS.VKP.Offerte.impl.HandelOfferteNaarVanHoeckeOfferteConverteerderVhisie3).%New()
+	}
 ]]></Implementation>
 </Method>