Index: APPS/Halux/PPS/TBXZaag/impl/LijstHelper.cls.xml
===================================================================
diff -u -r2875 -r2883
--- APPS/Halux/PPS/TBXZaag/impl/LijstHelper.cls.xml	(.../LijstHelper.cls.xml)	(revision 2875)
+++ APPS/Halux/PPS/TBXZaag/impl/LijstHelper.cls.xml	(.../LijstHelper.cls.xml)	(revision 2883)
@@ -250,7 +250,7 @@
 <FormalSpec>Lengte:%Integer,PlaatLengte:%Integer</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	
+	Set:PlaatLengte>1500 Lengte=Lengte*1.1 ;uit stroken
 	Set AantalPlaten=Lengte\PlaatLengte
 	Set Rest=$J(Lengte#PlaatLengte/1000,0,1)
 	Quit $S(AantalPlaten:AantalPlaten_"pl ",1:"")_$S(Rest>0.1:$TR(Rest,".","m"),1:"")