Index: APPS/Halux/PPS/impl/AansturingService/AansturingActiePrinterBepaler.cls.xml
===================================================================
diff -u -r62250 -r67663
--- APPS/Halux/PPS/impl/AansturingService/AansturingActiePrinterBepaler.cls.xml	(.../AansturingActiePrinterBepaler.cls.xml)	(revision 62250)
+++ APPS/Halux/PPS/impl/AansturingService/AansturingActiePrinterBepaler.cls.xml	(.../AansturingActiePrinterBepaler.cls.xml)	(revision 67663)
@@ -39,29 +39,36 @@
 		Set PrinterID = ##class(TECH.Config.ConfigMgr).Instance().GetString("APPS.Halux.PPS.AansturingService.Printer")
 	}
 	
-	If ..AfdrukkenOpGekleurdPapier(ClassName) {
+	If ..AfdrukkenOpGekleurdPapier(ClassName, Actie.Omschrijving) {
 		Set PrinterID = ##class(TECH.Config.ConfigMgr).Instance().GetString("APPS.Halux.PPS.AansturingService.Printer.GekleurdPapier")
 	}
 	Quit PrinterID
 ]]></Implementation>
 </Method>
 
 <Method name="AfdrukkenOpGekleurdPapier">
-<FormalSpec>ClassName:%String</FormalSpec>
+<FormalSpec>ClassName:%String,ActieOmschrijving:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
-	set Lijst = ##class(%ListOfDataTypes).%New()
-	do Lijst.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.LijnvullerLijst).%ClassName(1))
-	do Lijst.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.Spoelbak).%ClassName(1))
-	do Lijst.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.WizardbladBinnenlade).%ClassName(1))
-	do Lijst.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.WizardbladLadeMetUitsparing).%ClassName(1))
-	do Lijst.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.DwarsverdelingenInkortLijst).%ClassName(1))
-	do Lijst.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.RelingInkortLijst).%ClassName(1))
-	do Lijst.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.MattenLijst).%ClassName(1))
-	do Lijst.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.FrontLijst).%ClassName(1))
-	do Lijst.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.GlassnijLijst).%ClassName(1))
-	quit Lijst.Find(ClassName)>0
+	Set LijstKlasseNamen = ##class(%ListOfDataTypes).%New()
+	Do LijstKlasseNamen.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.LijnvullerLijst).%ClassName(1))
+	Do LijstKlasseNamen.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.Spoelbak).%ClassName(1))
+	Do LijstKlasseNamen.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.WizardbladBinnenlade).%ClassName(1))
+	Do LijstKlasseNamen.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.WizardbladLadeMetUitsparing).%ClassName(1))
+	Do LijstKlasseNamen.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.DwarsverdelingenInkortLijst).%ClassName(1))
+	Do LijstKlasseNamen.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.RelingInkortLijst).%ClassName(1))
+	Do LijstKlasseNamen.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.MattenLijst).%ClassName(1))
+	Do LijstKlasseNamen.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.FrontLijst).%ClassName(1))
+	Do LijstKlasseNamen.Insert(##class(APPS.Halux.PPS.impl.AansturingActie.Tandembox.GlassnijLijst).%ClassName(1))
+	Do LijstKlasseNamen.Insert(##class(APPS.Halux.PPS.Activiteit.impl.TBX.LadeMetUitsparingDetailBlad).%ClassName(1))
+	Do LijstKlasseNamen.Insert(##class(APPS.Halux.PPS.Activiteit.impl.TBX.BinnenladeDetailBlad).%ClassName(1))
+	
+	Set LijstActieOmschrijvingen = ##class(%ListOfDataTypes).%New()
+	Do LijstActieOmschrijvingen.Insert("Productiedetailblad binnenlade (nieuw)")
+	Do LijstActieOmschrijvingen.Insert("Productiedetailblad spoelbak sifon (nieuw)")
+	
+	Quit ((LijstKlasseNamen.Find(ClassName)>0) || (LijstActieOmschrijvingen.Find(ActieOmschrijving)>0))
 ]]></Implementation>
 </Method>
 </Class>