Index: APPS/Halux/PPS/impl/AansturingActie/common/OverzichtBatch.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/impl/AansturingActie/common/OverzichtBatch.cls.xml	(revision 0)
+++ APPS/Halux/PPS/impl/AansturingActie/common/OverzichtBatch.cls.xml	(revision 60219)
@@ -0,0 +1,90 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.impl.AansturingActie.common.OverzichtBatch">
+<ClassType>persistent</ClassType>
+<Modified>0</Modified>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>APPS.Halux.PPS.impl.AansturingActie</Super>
+
+<Property name="BedrijfID">
+<Type>%String</Type>
+<InitialExpression>"HALUX"</InitialExpression>
+<Private>1</Private>
+<Required>1</Required>
+</Property>
+
+<Property name="Document">
+<Type>APPS.common.Print.Kolommen.Document</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="VoerUit">
+<FormalSpec>BatchID:%String,ActieParameters:%ListOfDataTypes</FormalSpec>
+<ReturnType>APPS.Halux.PPS.dto.ActieResultaat</ReturnType>
+<Implementation><![CDATA[
+	Set ..Document = ##class(APPS.common.Print.Kolommen.Document).%New("TAX_OverzichtBatch","Overzicht Batch: "_BatchID)
+	
+	Do ..VoegRijenToeAanDocument(BatchID)
+	
+	Set ..BedrijfID = "HALUX"
+	#dim Afdrukker = ##class(APPS.Halux.PPS.Document.impl.OverzichtBatchAfdrukker).%New()
+	Do Afdrukker.ZetPrinter(..GeefUitvoeringParameter(##class(APPS.Halux.PPS.enu.UitvoeringParameter).Printer()))
+	Do Afdrukker.DrukAfDocument(..Document)
+	Do Afdrukker.DrukAfDocument(..Document)
+		
+	quit ..GeefGeslaagdAansturingResultaat()
+]]></Implementation>
+</Method>
+
+<Method name="VoegRijenToeAanDocument">
+<FormalSpec>BatchID:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set BatchService = ##class(APPS.Halux.Planning.impl.BatchService).%New()
+	#dim LijstToeleveringen As APPS.Halux.Planning.dto.BatchToeleveringen = BatchService.GeefToeleveringenInBatch(BatchID)
+	#dim ToeleveringIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(LijstToeleveringen.Toeleveringen)
+	
+	while ToeleveringIterator.HasNext() {		
+		#dim Toelevering As %String = ToeleveringIterator.Next()
+		Do ..Document.GeefKolom(1).Insert(Toelevering.Volgnummer)
+		Do ..Document.GeefKolom(2).Insert(Toelevering.ID)
+					
+	}
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+<DefaultData>OverzichtBatchDefaultData</DefaultData>
+<Data name="OverzichtBatchDefaultData">
+<Subscript>"OverzichtBatch"</Subscript>
+<Value name="1">
+<Value>Document</Value>
+</Value>
+<Value name="2">
+<Value>BedrijfID</Value>
+</Value>
+<Value name="3">
+<Value>UitvoeringInfoVerwerker</Value>
+</Value>
+<Value name="4">
+<Value>UitvoeringInfoUtils</Value>
+</Value>
+<Value name="5">
+<Value>ListenerVerwittiger</Value>
+</Value>
+<Value name="6">
+<Value>UitvoeringInfoBewaarder</Value>
+</Value>
+<Value name="7">
+<Value>ActiviteitParameters</Value>
+</Value>
+<Value name="8">
+<Value>PrinterID</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Activiteit/impl/common/OverzichtBatch.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Activiteit/impl/common/OverzichtBatch.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Activiteit/impl/common/OverzichtBatch.cls.xml	(revision 60219)
@@ -0,0 +1,64 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Activiteit.impl.common.OverzichtBatch">
+<Super>APPS.Halux.PPS.Activiteit.Activiteit,APPS.Halux.PPS.Activiteit.ProductieSequentieAwareActiviteit,APPS.Halux.PPS.Activiteit.impl.common.WerklijstItemMaker</Super>
+
+<Method name="GeefInformatieID">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+</Method>
+
+<Method name="GeefKlasseNaam">
+<Abstract>1</Abstract>
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+</Method>
+
+<Method name="GeefKlasseNaamLijst">
+<Abstract>1</Abstract>
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+</Method>
+
+<Method name="IsNodigWerklijstItemToevoegenVoorIngegevenKenmerken">
+<Abstract>1</Abstract>
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+</Method>
+
+<Method name="MaakActiviteit">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>ActiviteitGroepID:%String</FormalSpec>
+<ReturnType>APPS.Halux.PPS.Activiteit.Activiteit</ReturnType>
+<Implementation><![CDATA[
+	Do $Classmethod(..GeefKlasseNaamLijst(),"MaakDocument")
+	Do ##class(Tools.Wlip).%New(110).String(..GeefKlasseNaamLijst())
+	#dim Activiteit As APPS.Halux.PPS.Activiteit.impl.common.OverzichtBatch = ##super(ActiviteitGroepID)	
+	Quit Activiteit
+]]></Implementation>
+</Method>
+
+<Method name="Init">
+<Private>1</Private>
+<Implementation><![CDATA[	Do ..VoegToeUitvoeringInfoLijstVerwerkerKlasseNaam(..GeefKlasseNaam(), ..GeefInformatieID())
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+<DefaultData>OverzichtBatchDefaultData</DefaultData>
+<Data name="OverzichtBatchDefaultData">
+<Subscript>"OverzichtBatch"</Subscript>
+<Value name="1">
+<Value>WerklijstItemMakerInput</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Activiteit/impl/TBX/OverzichtBatch.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Activiteit/impl/TBX/OverzichtBatch.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Activiteit/impl/TBX/OverzichtBatch.cls.xml	(revision 60219)
@@ -0,0 +1,57 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Activiteit.impl.TBX.OverzichtBatch">
+<Super>APPS.Halux.PPS.Activiteit.impl.common.OverzichtBatch</Super>
+
+<Parameter name="InformatieID">
+<Default>TBXOverzichtBatch</Default>
+</Parameter>
+
+<Parameter name="Code">
+<Type>%String</Type>
+<Default>TBXOverzichtBatch</Default>
+</Parameter>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Tandembox overzicht batch</Default>
+</Parameter>
+
+<Method name="GeefInformatieID">
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..#InformatieID
+]]></Implementation>
+</Method>
+
+<Method name="GeefKlasseNaam">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ##class(APPS.Halux.PPS.Activiteit.impl.TBX.OverzichtBatch).%ClassName(1)
+]]></Implementation>
+</Method>
+
+<Method name="GeefKlasseNaamLijst">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ##class(APPS.Halux.PPS.DocumentDefinitie.TAX.OverzichtBatch).%ClassName(1)
+]]></Implementation>
+</Method>
+
+<Method name="IsNodigWerklijstItemToevoegenVoorIngegevenKenmerken">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit 1
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+</Storage>
+</Class>
+
+
+</Export>
Index: vhDeploy/Maatwerk/TBX/AansturingActieOverzichtToeleveringenAanmaken.cls.xml
===================================================================
diff -u
--- vhDeploy/Maatwerk/TBX/AansturingActieOverzichtToeleveringenAanmaken.cls.xml	(revision 0)
+++ vhDeploy/Maatwerk/TBX/AansturingActieOverzichtToeleveringenAanmaken.cls.xml	(revision 60219)
@@ -0,0 +1,33 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Maatwerk.TBX.AansturingActieOverzichtToeleveringenAanmaken">
+<Super>vhDeploy.Maatwerk.Aansturing</Super>
+
+<Method name="ExecCode">
+<Description>
+Oproepen vanuit een 'echte' deploy-klasse  OF  via telnet-command :
+   Do ##class(vhDeploy.Maatwerk.TBX.AansturingActieOverzichtToeleveringenAanmaken).ExecCode() </Description>
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	#dim Categorie As APPS.Halux.common.enu.Categorie = ##class(APPS.Halux.common.enu.Categorie).Tandembox()
+	#dim Aansturing As vhDeploy.Maatwerk.TBX.AansturingActieOverzichtToeleveringenAanmaken = ..%New()
+	
+	Do Aansturing.MaakAansturingsActie(Categorie)
+	
+	do ##class(APPS.Halux.PPS.impl.AansturingActie).%PurgeIndices()
+	do ##class(APPS.Halux.PPS.impl.AansturingActie).%BuildIndices()
+]]></Implementation>
+</Method>
+
+<Method name="MaakAansturingsActie">
+<FormalSpec>Categorie:%String</FormalSpec>
+<Implementation><![CDATA[
+	#dim ActiviteitGroepProductie As %String = ..MaakOfVervangActiviteitGroep(Categorie, "TBX.Groep.TBXProductie")
+	#dim ActiviteitID As %String = ..MaakOfGeefActiviteitID(ActiviteitGroepProductie, "TBX.OverzichtBatch")
+	#dim ActieID= ..MaakOfVervangOudeAansturingActie("OverzichtBatch", Categorie, "Overzicht batch", $$$False, ActiviteitGroepProductie)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhDeploy/Maatwerk/TAOR/AansturingActieOverzichtToeleveringenAanmaken.cls.xml
===================================================================
diff -u
--- vhDeploy/Maatwerk/TAOR/AansturingActieOverzichtToeleveringenAanmaken.cls.xml	(revision 0)
+++ vhDeploy/Maatwerk/TAOR/AansturingActieOverzichtToeleveringenAanmaken.cls.xml	(revision 60219)
@@ -0,0 +1,34 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Maatwerk.TAOR.AansturingActieOverzichtToeleveringenAanmaken">
+<Super>vhDeploy.Maatwerk.Aansturing</Super>
+
+<Method name="ExecCode">
+<Description>
+Oproepen vanuit een 'echte' deploy-klasse  OF  via telnet-command :
+   Do ##class(vhDeploy.Maatwerk.TAOR.AansturingActieOverzichtToeleveringenAanmaken).ExecCode() </Description>
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	#dim Categorie As APPS.Halux.common.enu.Categorie = ##class(APPS.Halux.common.enu.Categorie).TAORbox()
+	#dim Aansturing As vhDeploy.Maatwerk.TAOR.AansturingActieOverzichtToeleveringenAanmaken = ..%New()
+	
+	Do Aansturing.MaakAansturingsActie(Categorie)
+	
+	do ##class(APPS.Halux.PPS.impl.AansturingActie).%PurgeIndices()
+	do ##class(APPS.Halux.PPS.impl.AansturingActie).%BuildIndices()
+]]></Implementation>
+</Method>
+
+<Method name="MaakAansturingsActie">
+<FormalSpec>Categorie:%String</FormalSpec>
+<Implementation><![CDATA[
+	#dim ActiviteitGroepProductie As %String = ..MaakOfVervangActiviteitGroep(Categorie, "TAOR.Groep.TAORProductie")
+	#dim ActiviteitID As %String = ..MaakOfGeefActiviteitID(ActiviteitGroepProductie, "TAOR.OverzichtBatch")
+	#dim ActieID= ..MaakOfVervangOudeAansturingActie("OverzichtBatch", Categorie, "Overzicht batch", $$$False, ActiviteitGroepProductie)
+	Do ..ZetActieAlsNietStandaard(ActieID)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Activiteit/impl/TAOR/OverzichtBatch.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Activiteit/impl/TAOR/OverzichtBatch.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/OverzichtBatch.cls.xml	(revision 60219)
@@ -0,0 +1,57 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Activiteit.impl.TAOR.OverzichtBatch">
+<Super>APPS.Halux.PPS.Activiteit.impl.common.OverzichtBatch</Super>
+
+<Parameter name="InformatieID">
+<Default>TAXOverzichtBatch</Default>
+</Parameter>
+
+<Parameter name="Code">
+<Type>%String</Type>
+<Default>TAXOverzichtBatch</Default>
+</Parameter>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>TAORbox overzicht batch</Default>
+</Parameter>
+
+<Method name="GeefInformatieID">
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..#InformatieID
+]]></Implementation>
+</Method>
+
+<Method name="GeefKlasseNaam">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.OverzichtBatch).%ClassName(1)
+]]></Implementation>
+</Method>
+
+<Method name="GeefKlasseNaamLijst">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ##class(APPS.Halux.PPS.DocumentDefinitie.TAX.OverzichtBatch).%ClassName(1)
+]]></Implementation>
+</Method>
+
+<Method name="IsNodigWerklijstItemToevoegenVoorIngegevenKenmerken">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit 1
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+</Storage>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/DocumentDefinitie/TAX/OverzichtBatch.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/DocumentDefinitie/TAX/OverzichtBatch.cls.xml	(revision 0)
+++ APPS/Halux/PPS/DocumentDefinitie/TAX/OverzichtBatch.cls.xml	(revision 60219)
@@ -0,0 +1,36 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.DocumentDefinitie.TAX.OverzichtBatch">
+<ClassType/>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%RegisteredObject</Super>
+
+<Method name="GeefDocumentType">
+<Description>
+d ##class(APPS.Halux.PPS.DocumentDefinitie.TAX.OverzichtBatch).MaakDocument()</Description>
+<ClassMethod>1</ClassMethod>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[    Quit "TAX_OverzichtBatch"
+]]></Implementation>
+</Method>
+
+<Method name="MaakDocument">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	// maakt een document
+	Set DocumentType = ##class(APPS.common.Print.Kolommen.DocumentType).%New(..GeefDocumentType())
+	
+	// verwijdert eventuele oude definities
+	Do DocumentType.ClearDocument()
+	
+	// maak kolommen aan
+	Do DocumentType.VoegKolomDefinitieToe(##class(APPS.common.Print.Kolommen.KolomDefinitie).%New("VolgNr",9,##class(APPS.common.Print.Kolommen.TekstType).String(),##class(APPS.common.Print.Kolommen.TekstUitlijning).Links()))
+	Do DocumentType.VoegKolomDefinitieToe(##class(APPS.common.Print.Kolommen.KolomDefinitie).%New("ToeLevNr",10,##class(APPS.common.Print.Kolommen.TekstType).String(),##class(APPS.common.Print.Kolommen.TekstUitlijning).Links()))
+	// sla het documenttype op
+	Do DocumentType.SaveDocument()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Activiteit/impl/TBX/Groep/TBXProductie.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Activiteit/impl/TBX/Groep/TBXProductie.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Activiteit/impl/TBX/Groep/TBXProductie.cls.xml	(revision 60219)
@@ -0,0 +1,36 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Activiteit.impl.TBX.Groep.TBXProductie">
+<Super>APPS.Halux.PPS.Activiteit.ProductieSequentieAwareActiviteitGroep</Super>
+
+<Method name="%OnNew">
+<Description>
+Constructor args worden niet gebruikt</Description>
+<FormalSpec>Categorie:APPS.Halux.common.enu.Categorie,Naam:%String</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[	Quit ##super(##class(APPS.Halux.common.enu.Categorie).Tandembox(), "Productie")
+]]></Implementation>
+</Method>
+
+<Method name="GeefProductieSequentieProcessor">
+<Description>
+Geeft de processor voor deze groep.  Deze processor is verantwoordelijk
+voor filtering en sequencing van de overkoepelende productiesequentie om
+zo de groepsequentie te bekomen.  Hierin geeft het groepsequentienummer
+aan welke volgorde voor de activiteitgroep relevant is.</Description>
+<FormalSpec>TeVerwerkenSequentie:APPS.Halux.common.ProductieSequentie</FormalSpec>
+<ReturnType>APPS.Halux.common.ProductieSequentieProcessor</ReturnType>
+<Implementation><![CDATA[	Quit ##class(APPS.Halux.common.impl.AssemblageSequentieProcessor).%New(TeVerwerkenSequentie)
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+</Storage>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Activiteit/ProductieSequentieAwareActiviteitGroep.cls.xml
===================================================================
diff -u -r47981 -r60219
--- APPS/Halux/PPS/Activiteit/ProductieSequentieAwareActiviteitGroep.cls.xml	(.../ProductieSequentieAwareActiviteitGroep.cls.xml)	(revision 47981)
+++ APPS/Halux/PPS/Activiteit/ProductieSequentieAwareActiviteitGroep.cls.xml	(.../ProductieSequentieAwareActiviteitGroep.cls.xml)	(revision 60219)
@@ -73,12 +73,14 @@
 	#dim ExceptieLijst As TECH.ExceptionList = ##class(TECH.ExceptionList).%New()
 	While (ActiviteitIterator.HasNext()) {
 		#dim Activiteit As APPS.Halux.PPS.Activiteit.ProductieSequentieAwareActiviteit = ActiviteitIterator.Next()
-		Try {
-			Do ##class(vhLib.Logger).%New().Debug("VerwerkProductieSequentieSubset", "Groep:'"_Activiteit.GeefActiviteitGroepID() _ "'; Code:'"_ Activiteit.GeefCode() _"'; Omschrijving: '"_ Activiteit.GeefOmschrijving() _"'")
-			do Activiteit.VerwerkGroepSequentie(##this, ProductieSequentieSubset )
-			
-		} Catch {
-			Do ExceptieLijst.Insert(##class(TECH.ExceptionHandler).Catch())
+		If $$$Not(Activiteit.GeefOmschrijving() = "TAORbox overzicht batch") {
+			Try {
+				Do ##class(vhLib.Logger).%New().Debug("VerwerkProductieSequentieSubset", "Groep:'"_Activiteit.GeefActiviteitGroepID() _ "'; Code:'"_ Activiteit.GeefCode() _"'; Omschrijving: '"_ Activiteit.GeefOmschrijving() _"'")
+				do Activiteit.VerwerkGroepSequentie(##this, ProductieSequentieSubset )
+				
+			} Catch {
+				Do ExceptieLijst.Insert(##class(TECH.ExceptionHandler).Catch())
+			}
 		}
 	}
 	If ExceptieLijst.Count() {
Index: APPS/Halux/PPS/Document/impl/OverzichtBatchAfdrukker.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Document/impl/OverzichtBatchAfdrukker.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Document/impl/OverzichtBatchAfdrukker.cls.xml	(revision 60219)
@@ -0,0 +1,20 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Document.impl.OverzichtBatchAfdrukker">
+<Description>
+Drukt tekstdocumenten af gebaseerd op APPS.Halux.common.Print.Kolommen.
+
+De basisklasse voorziet een convenience method om een document af te
+drukken (aangeboden aan afgeleide klassen).</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>APPS.Halux.PPS.Document.impl.TekstDocumentAfdrukker</Super>
+
+<Method name="ZetPrinter">
+<FormalSpec>PrinterID:%String</FormalSpec>
+<Implementation><![CDATA[	Set ..PrinterID = PrinterID
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>