Index: VerpakkingsDefinitie/UI/GevondenProductenScherm.pas
===================================================================
diff -u -r592 -r593
--- VerpakkingsDefinitie/UI/GevondenProductenScherm.pas	(.../GevondenProductenScherm.pas)	(revision 592)
+++ VerpakkingsDefinitie/UI/GevondenProductenScherm.pas	(.../GevondenProductenScherm.pas)	(revision 593)
@@ -9,7 +9,7 @@
   Data.DB, Data.Win.ADODB,
   ObserverPattern, Util,
   Subscherm,
-  ProductsAgent, Main, ApplicationContext;
+  ProductsAgent, Main, Navigator, ApplicationContext;
 
 type
   TFormGevondenProducten = class(TFormSubscherm)
@@ -64,7 +64,10 @@
   FProductsAgent.ZoekProductDataMetProductNr(TProductInformatie(Item.Data).ProductNr, self.ApplicationContext.UserContext,
     self.ApplicationContext.ProductVerpakkingContext);
 
-  if self.ApplicationContext.ProductVerpakkingContext.IsOK = false then
+  if self.ApplicationContext.ProductVerpakkingContext.IsOK then
+    // Gelukt
+    Navigator.NavigeerNaar(NAVTOONPRODUCT)
+  else
   begin
     // Opzoeking gefaald
     ErrorMessage := self.ApplicationContext.ProductVerpakkingContext.ErrorMessage;