Index: APPS/Halux/PPS/TAORProductie/ZijkantTester/impl/OphalenData.cls.xml
===================================================================
diff -u -r70054 -r70056
--- APPS/Halux/PPS/TAORProductie/ZijkantTester/impl/OphalenData.cls.xml	(.../OphalenData.cls.xml)	(revision 70054)
+++ APPS/Halux/PPS/TAORProductie/ZijkantTester/impl/OphalenData.cls.xml	(.../OphalenData.cls.xml)	(revision 70056)
@@ -70,6 +70,8 @@
 		Do ..OphalenProductInfo()
 		Do ..OphalenLaatsteKeer()
 		Do ..OphalenRework()
+	} Else {
+		Do ##class(Tools.Wlip).%New(252).String("Empty")
 	}
 	
 	Quit ..InstellenData
@@ -145,7 +147,7 @@
 <Implementation><![CDATA[
 	Set BarcodeID = ..InstellenData.BarcodeID
 	Set (LaatsteKeer, AantalKeer) = ""
-	&SQL(Select max(TijdstipTest), count(*) into :LaatsteKeer, :AantalKeer from APPS_Halux_PPS_TAORProductie_ZijkantTester_impl.Metingen where BarcodeId=:BarcodeID)
+	&SQL(Select max(AServerTijdstipTest), count(*) into :LaatsteKeer, :AantalKeer from APPS_Halux_PPS_TAORProductie_ZijkantTester_impl.Data where AServerBarcodeId=:BarcodeID)
 	Set ..InstellenData.TijdstipLaatsteTest = LaatsteKeer
 	Set ..InstellenData.AantalKeerGetest = (AantalKeer + 1)
 ]]></Implementation>
Index: APPS/Halux/PPS/TAORProductie/ZijkantTester/impl/OpslaanData.cls.xml
===================================================================
diff -u -r70054 -r70056
--- APPS/Halux/PPS/TAORProductie/ZijkantTester/impl/OpslaanData.cls.xml	(.../OpslaanData.cls.xml)	(revision 70054)
+++ APPS/Halux/PPS/TAORProductie/ZijkantTester/impl/OpslaanData.cls.xml	(.../OpslaanData.cls.xml)	(revision 70056)
@@ -79,7 +79,7 @@
 	Set ..Data.MetingHoogteAchter = ..MetingData.MetingHoogteAchter
 	Set ..Data.MetingHoogteVoor = ..MetingData.MetingHoogteVoor
 	Set ..Data.MetingStelSchroef = ..MetingData.MetingStelSchroef
-	Set ..Data.MetingFronthaakAfstandBoven = ..MetingData.MetingFronthaakAfstandBoven
+	Set ..Data.MetingFrontHaakAfstandBoven = ..MetingData.MetingFrontHaakAfstandBoven
 	Set ..Data.MetingFrontHaakAfstandOnder = ..MetingData.MetingFrontHaakAfstandOnder
 	
 	Set ..Data.FoutDiepte = ..MetingData.FoutDiepte