Index: BL/Flow/TransportLijst/Doc.cls.xml
===================================================================
diff -u -r73454 -r73691
--- BL/Flow/TransportLijst/Doc.cls.xml	(.../Doc.cls.xml)	(revision 73454)
+++ BL/Flow/TransportLijst/Doc.cls.xml	(.../Doc.cls.xml)	(revision 73691)
@@ -135,11 +135,11 @@
 	#dim Task As Sys.FOP.Task = ..CreateFopTask("DocRenderAndPrint",,)
 	#dim Doc As Sys.FOP.emDoc = Task.AddDoc()
 	#dim lbDocs As %List = $LB("TOER",+DatumVan,+DatumTot,VerzendWijze)
-	#dim sc As %Status = ..DocSetRenderDefs(Doc, lbDocs, ..#ADBTemplateBewijsStapled, "PS", $LB(), pWithLogo)
+	#dim sc As %Status = ..DocSetRenderDefs(Doc, lbDocs, ..#ADBTemplateBewijsNotStapled, "PS", $LB(), pWithLogo)
 	
-	#dim StaplingMode As %String = "1"
+	#dim StaplingMode As %String = ""
 	#dim OutputTray As %String = ""
-	#dim pStaplingConfig As %String = ##class(BL.Sys.FOP.CommonTasks).GetStaplingConfig(PrinterName, .StaplingMode, .OutputTray)
+	#dim pStaplingConfig As %String = ""   ; ##class(BL.Sys.FOP.CommonTasks).GetStaplingConfig(PrinterName, .StaplingMode, .OutputTray)
 	Set Doc.XSLParameters = Doc.XSLParameters _ ..BuildXsltParams("", "", "", pTraySelect, "", pStaplingConfig)   ; Let op: er is nog geen controle op dubbele KVP's 
 	
 	#dim NumCopies As %Integer = 1
@@ -152,25 +152,14 @@
 
 <Method name="RenderAndPrintANotasViaBons">
 <Description>
-Oproepen via :
-  s sc=##class(BL.Flow.TransportLijst.Doc).RenderAndPrintANotasViaBons($LB(335823),"BrotherBoekH",1,"1",)   w sc,!
-   or 
-  s sc=##class(BL.Flow.Levering.Doc).RenderAndPrintDocViaType(305229,"BonWit_Bewijs","BrotherBoekH")   w sc,!</Description>
+DEPRECATED method. 
+Instead of this method, call RenderAndPrintLevBewijzen() </Description>
 <ClassMethod>1</ClassMethod>
 <FormalSpec>lbBONNrs:%List,PrinterName:%String,pWithLogo:%Boolean=1,pTraySelect:%String="",StaplingMode:%String=""</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
-	Set PrinterName=$G(PrinterName,..#PrinterDFL)   ; "DocuColor"
-	Set OutputTray=""
-	Set pStaplingConfig=##class(BL.Sys.FOP.CommonTasks).GetStaplingConfig(PrinterName,.StaplingMode,.OutputTray)
-	Set Task=..CreateFopTask("DocRenderAndPrint",,)
-	Set sc=..DocSetRenderDefsLevBewijs(Task.AddDoc(), $LB("BONS",lbBONNrs), "PS", $LB(), pWithLogo, pTraySelect, pStaplingConfig, (StaplingMode=""))
-	;Set sc=..DocSetRenderDefs(Task.AddDoc(), $LB("BONS",lbBONNrs), ..#ADBTemplateANotas, "PS", $LB(), pWithLogo)   ; lbDocs = $LB("BONS",$LB(333444,333555))
-	Set NumCopies=1
-	Set:($$$ISOK(sc)) sc=Task.AddActionPrint(PrinterName,NumCopies,,)
-	Quit:($$$ISERR(sc)) sc
-	Set sc=##class(BL.Sys.FOP.CommonTasks).RunFopTask(Task,$$$rmBatch,$$$qpvLow+1)   ; $$$rmBatch   ; $$$rmSync
-	Quit sc
+	; Implementation is removed. See svn.
+	Quit $$$ERROR($$$GeneralError,"Method RenderAndPrintANotasViaBons() is DEPRECATED!")
 ]]></Implementation>
 </Method>