Index: BL/PPS/TBX/DocsV1.cls.xml
===================================================================
diff -u -r74771 -r75040
--- BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 74771)
+++ BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 75040)
@@ -1794,6 +1794,22 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VRDDueOutA4Etiket">
+<FormalSpec>Dag:%String,Maand:%String,LabelPrinter:%String,Aantal:%Integer=1,BONNr:%String=""</FormalSpec>
+<Implementation><![CDATA[
+ 	Do ..blLabelPrinter.Clear()
+ 	Set VRDDueOutLabel = ##class(BL.Etiket.VRDDueOutA4).%New()
+ 	Set VRDDueOutLabel.Dag = Dag
+ 	Set VRDDueOutLabel.Maand = Maand
+ 	Set VRDDueOutLabel.Device = LabelPrinter
+ 	Set VRDDueOutLabel.BONNr = BONNr
+ 	for i=1:1:Aantal {
+	 	Do ..blLabelPrinter.Add(VRDDueOutLabel)
+ 	}
+	Do ..blLabelPrinter.Print2Bartender()
+]]></Implementation>
+</Method>
+
 <Method name="BepaalAantalOverdoosEtiketten">
 <Description>
 Bepaalt het volume-aandeel van de probox-laden</Description>