Index: BL/PPS/TBX/DocsV1.cls.xml =================================================================== diff -u -r56105 -r56114 --- BL/PPS/TBX/DocsV1.cls.xml (.../DocsV1.cls.xml) (revision 56105) +++ BL/PPS/TBX/DocsV1.cls.xml (.../DocsV1.cls.xml) (revision 56114) @@ -1427,7 +1427,7 @@ Do ..blLabelPrinter.Clear() #dim i As %Integer - #dim Aantal As %Integer = ..BepaalAantalOverdoosEtiketten(Toelevering) + #dim Aantal As %Integer = ..BepaalAantalOverdoosEtiketten(Toelevering) + 2 // Er werden te weinig probox overdoos etiketten aangemaakt => 2 erbij For i=1:1:Aantal { set Label = ##class(BL.Etiket.ProboxOverdoos).%New() @@ -1535,7 +1535,7 @@ } } } - #dim AantalEtiketten As %Integer = ##class(TECH.Math).Ceil(VolumeAandeel) + 2 // Er werden te weinig probox overdoos etiketten aangemaakt => 2 erbij + #dim AantalEtiketten As %Integer = ##class(TECH.Math).Ceil(VolumeAandeel) Quit AantalEtiketten ]]>