Index: VerpakkingsDefinitie/WS/ProductsAgent.pas
===================================================================
diff -u -r618 -r636
--- VerpakkingsDefinitie/WS/ProductsAgent.pas	(.../ProductsAgent.pas)	(revision 618)
+++ VerpakkingsDefinitie/WS/ProductsAgent.pas	(.../ProductsAgent.pas)	(revision 636)
@@ -901,7 +901,7 @@
     if TempStr <> DefaultDataObj.Positie then
       Positie := TempStr;
     // OptiType
-    if OptiType <> DefaultDataObj.OptiType then
+    if ProductVerpakking.OptiType <> DefaultDataObj.OptiType then
       OptiType := ProductVerpakking.OptiType;
     // Richting, letters aan elkaar plakken in 1 string
     TempStr := ReplaceStr(JoinStrings(ProductVerpakking.Richtingen.ToArray(), '-'), '-', '');