Index: APPS/Halux/PPS/TBXZaag/dto/OpdrachtPlaat.cls.xml
===================================================================
diff -u -r2828 -r2829
--- APPS/Halux/PPS/TBXZaag/dto/OpdrachtPlaat.cls.xml	(.../OpdrachtPlaat.cls.xml)	(revision 2828)
+++ APPS/Halux/PPS/TBXZaag/dto/OpdrachtPlaat.cls.xml	(.../OpdrachtPlaat.cls.xml)	(revision 2829)
@@ -22,6 +22,10 @@
 <Type>%Integer</Type>
 </Property>
 
+<Property name="PlaatLengte">
+<Type>%Integer</Type>
+</Property>
+
 <Property name="Hoogte">
 <Description>
 uitgedrukt in 10x mm</Description>
@@ -53,7 +57,7 @@
 </Property>
 
 <Property name="LengteUntilChange">
-<Type>%Integer</Type>
+<Type>%Float</Type>
 </Property>
 
 <Property name="ChangeAfter">
@@ -88,7 +92,8 @@
 	Set dtoPlaat.Hoogte=Lade.GeefBodem().GeefDiepte()
 	Set dtoPlaat.HoogteOms=Lade.GeefBodem().GeefDiepteVanLade()
 	Set dtoPlaat.Breedte=Lade.GeefBodemBreedte()
-	Set dtoPlaat.NodigePlaatLengte=Lade.GeefBodemBreedte()/Lade.GeefBodem().GeefBreedte()
+	Set dtoPlaat.PlaatLengte=Lade.GeefBodem().GeefBreedte()
+	Set dtoPlaat.NodigePlaatLengte=Lade.GeefBodemBreedte()/dtoPlaat.PlaatLengte
 	Set dtoPlaat.HoogteSensor=1
 	Set dtoPlaat.AanslagSensor=1
 	Set dtoPlaat.ProductNr=Lade.GeefBodem().GeefPRNr()
@@ -113,7 +118,8 @@
 	Set dtoPlaat.KleurZichtbaar=Lade.GeefRugKleur()
 	Set dtoPlaat.Kleur2de=Lade.GeefRug().GeefKleur2de(dtoPlaat.KleurZichtbaar)
 	Set dtoPlaat.Hoogte=Lade.GeefRug().GeefHoogte()
-	Set dtoPlaat.NodigePlaatLengte=Lade.GeefRugBreedte()/Lade.GeefRug().GeefBreedte()
+	Set dtoPlaat.PlaatLengte=Lade.GeefRug().GeefBreedte()
+	Set dtoPlaat.NodigePlaatLengte=Lade.GeefRugBreedte()/dtoPlaat.PlaatLengte
 	Set dtoPlaat.HoogteOms=Lade.GeefRugHoogte()_" "_dtoPlaat.Hoogte
 	Set dtoPlaat.Breedte=Lade.GeefRugBreedte()
 	Set dtoPlaat.HoogteSensor=1
@@ -127,7 +133,7 @@
 <Method name="BuildList">
 <ReturnType>%List</ReturnType>
 <Implementation><![CDATA[
- Set List=$LB(..AanslagSensor,..Bewerking, ..ChangeAfter, $J(..LengteUntilChange,0,0), ..ChangeHoogte ,..ChangeKleur,..Breedte,..Hoogte,..HoogteOms,..HoogteSensor,..Kleur2de,..KleurZichtbaar,..ReturnsAfter,..ProductNr,..ImageURL)
+ Set List=$LB(..AanslagSensor,..Bewerking, ..ChangeAfter, $J(..LengteUntilChange,0,1), ..ChangeHoogte ,..ChangeKleur,..Breedte,..Hoogte,..HoogteOms,..HoogteSensor,..Kleur2de,..KleurZichtbaar,..ReturnsAfter,..ProductNr,..ImageURL)
  Quit List
 ]]></Implementation>
 </Method>
Index: APPS/Halux/PPS/TBXZaag/impl/SyncHelper.cls.xml
===================================================================
diff -u -r2817 -r2829
--- APPS/Halux/PPS/TBXZaag/impl/SyncHelper.cls.xml	(.../SyncHelper.cls.xml)	(revision 2817)
+++ APPS/Halux/PPS/TBXZaag/impl/SyncHelper.cls.xml	(.../SyncHelper.cls.xml)	(revision 2829)
@@ -140,9 +140,9 @@
 	{
 		If Lijn.BatchKey'=""
 		{
-			Set Lijn.BatchChanged=($R(100)>90)
-			Set Lijn.BufferAantal=$R(10)
-			Set Lijn.BufferLengte=$R(1000)
+			Set Lijn.BatchChanged=1 ;($R(100)>90)
+			Set Lijn.BufferAantal=0 ;$R(10)
+			Set Lijn.BufferLengte=0 ;$R(1000)
 		}
 		Set Lijn=ProdLijnen.GetNext(.Key)
 	}