Index: APPS/Halux/PPS/Verpakking/impl/LadeHogeRugKartonWerkpost.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Verpakking/impl/LadeHogeRugKartonWerkpost.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Verpakking/impl/LadeHogeRugKartonWerkpost.cls.xml	(revision 68887)
@@ -0,0 +1,31 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Verpakking.impl.LadeHogeRugKartonWerkpost">
+<Super>APPS.Halux.PPS.Verpakking.impl.KartonWerkpostBasis</Super>
+
+<Query name="QueueList">
+<Type>%SQLQuery</Type>
+<FormalSpec>BatchID:%String</FormalSpec>
+<SqlQuery><![CDATA[	SELECT Batch.Categorie || '||' || UI.WerklijstItemID As ID, ToeleveringID As TOENr, UI.ProductID As PRNr, Product.Korttekst As KortTekst, DossierCode As DOSNr, 
+	APPS_Halux_PPS_Verpakking_impl.LadeHogeRugKartonWerkpost_StatusDisplay(WerklijstItem.Status) As WPStatus
+	, SnijStatus, '' As Message
+	FROM APPS_Halux_PPS_Activiteit_impl_common_dto.LadeDoosHogeRugUitvoeringInfo As UI
+	JOIN APPS_Halux_common_impl.BatchImpl as Batch on Batch.ID = BatchID
+	JOIN DOM_PM_impl.AdministratiefProduct as Product on Product.ID = UI.ProductID
+	JOIN APPS_Halux_PPS_Activiteit_dto.ProductieSequentieWerklijstItem as WerklijstItem on WerklijstItem.ID = UI.WerklijstItemID
+	WHERE (UI.BatchID=:BatchID) and (UI.SnijStatus <> 'X')  
+	ORDER BY UI.SequentieNummer]]></SqlQuery>
+<Parameter name="CONTAINID" value="0"/>
+</Query>
+
+<Method name="GeefGekoppeldInformatieID">
+<Description>
+Geeft de InformatieID van de relevante ActiviteitWerklijstItems</Description>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ##class(APPS.Halux.PPS.Verpakking.enu.InformatieID).Lade()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Verpakking/impl/ComplexeScheidingKartonWerkpost.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Verpakking/impl/ComplexeScheidingKartonWerkpost.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Verpakking/impl/ComplexeScheidingKartonWerkpost.cls.xml	(revision 68887)
@@ -0,0 +1,31 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Verpakking.impl.ComplexeScheidingKartonWerkpost">
+<Super>APPS.Halux.PPS.Verpakking.impl.KartonWerkpostBasis</Super>
+
+<Query name="QueueList">
+<Type>%SQLQuery</Type>
+<FormalSpec>BatchID:%String</FormalSpec>
+<SqlQuery><![CDATA[	SELECT Batch.Categorie || '||' || UI.WerklijstItemID As ID, ToeleveringID As TOENr, UI.ProductID As PRNr, Product.Korttekst As KortTekst, DossierCode As DOSNr, 
+	APPS_Halux_PPS_Verpakking_impl.ComplexeScheidingKartonWerkpost_StatusDisplay(WerklijstItem.Status) As WPStatus
+	, SnijStatus, '' As Message
+	FROM APPS_Halux_PPS_Activiteit_impl_common_dto.ComplexeScheidingKartonUitvoeringInfo As UI
+	JOIN APPS_Halux_common_impl.BatchImpl as Batch on Batch.ID = BatchID
+	JOIN DOM_PM_impl.AdministratiefProduct as Product on Product.ID = UI.ProductID
+	JOIN APPS_Halux_PPS_Activiteit_dto.ProductieSequentieWerklijstItem as WerklijstItem on WerklijstItem.ID = UI.WerklijstItemID
+	WHERE (UI.BatchID=:BatchID) and (UI.SnijStatus <> 'X')  
+	ORDER BY UI.SequentieNummer]]></SqlQuery>
+<Parameter name="CONTAINID" value="0"/>
+</Query>
+
+<Method name="GeefGekoppeldInformatieID">
+<Description>
+Geeft de InformatieID van de relevante ActiviteitWerklijstItems</Description>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ##class(APPS.Halux.PPS.Verpakking.enu.InformatieID).ComplexeScheiding()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Verpakking/enu/KartonWerkpost/Verwerker.cls.xml
===================================================================
diff -u -r30548 -r68887
--- APPS/Halux/PPS/Verpakking/enu/KartonWerkpost/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 30548)
+++ APPS/Halux/PPS/Verpakking/enu/KartonWerkpost/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 68887)
@@ -12,19 +12,29 @@
 <Final>1</Final>
 <FormalSpec>KartonWerkpost:APPS.Halux.PPS.Verpakking.enu.KartonWerkpost</FormalSpec>
 <Implementation><![CDATA[
-	If KartonWerkpost = "LOSCOMP" {
+	If KartonWerkpost = "COMPLEXESCHEIDING" {
+		Do ..VerwerkComplexeScheiding()
+	} ElseIf KartonWerkpost = "LOSCOMP" {
 		Do ..VerwerkLosseComponenten()
 	} ElseIf KartonWerkpost = "LO" {
 		Do ..VerwerkLosseOnderdelen()
 	} ElseIf KartonWerkpost = "VERPAK" {
 		Do ..VerwerkVerpakking()
+	} ElseIf KartonWerkpost = "VPKHOGERUG" {
+		Do ..VerwerkVerpakkingHogeRug()
 	} Else {
-		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(KartonWerkpost,"APPS.Halux.PPS.Verpakking.enu.KartonWerkpost")
+		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(KartonWerkpost,"APPS.Halux.PPS.Verpakking.enu.KartonWerkpost",$classname())
 		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
 	}
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkComplexeScheiding">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkLosseComponenten">
 <Abstract>1</Abstract>
 <Private>1</Private>
@@ -42,6 +52,12 @@
 <Private>1</Private>
 <Implementation><![CDATA[]]></Implementation>
 </Method>
+
+<Method name="VerwerkVerpakkingHogeRug">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
 </Class>
 
 
Index: APPS/Halux/PPS/Verpakking/enu/KartonWerkpost.cls.xml
===================================================================
diff -u -r30548 -r68887
--- APPS/Halux/PPS/Verpakking/enu/KartonWerkpost.cls.xml	(.../KartonWerkpost.cls.xml)	(revision 30548)
+++ APPS/Halux/PPS/Verpakking/enu/KartonWerkpost.cls.xml	(.../KartonWerkpost.cls.xml)	(revision 68887)
@@ -5,7 +5,7 @@
 <Super>TECH.Enumeration</Super>
 
 <Parameter name="DISPLAYLIST">
-<Default>;LosseOnderdelen;Verpakking;LosseComponenten</Default>
+<Default>;LosseOnderdelen;Verpakking;LosseComponenten;VerpakkingHogeRug;ComplexeScheiding</Default>
 </Parameter>
 
 <Parameter name="VALUELIST">
@@ -32,6 +32,20 @@
 <Implementation><![CDATA[	Quit "LOSCOMP"
 ]]></Implementation>
 </Method>
+
+<Method name="VerpakkingHogeRug">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.Halux.PPS.Verpakking.enu.KartonWerkpost</ReturnType>
+<Implementation><![CDATA[	Quit "VPKHOGERUG"
+]]></Implementation>
+</Method>
+
+<Method name="ComplexeScheiding">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.Halux.PPS.Verpakking.enu.KartonWerkpost</ReturnType>
+<Implementation><![CDATA[	Quit "COMPLEXESCHEIDING"
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: APPS/Halux/PPS/Verpakking/impl/KartonWerkpostFactory.cls.xml
===================================================================
diff -u -r30549 -r68887
--- APPS/Halux/PPS/Verpakking/impl/KartonWerkpostFactory.cls.xml	(.../KartonWerkpostFactory.cls.xml)	(revision 30549)
+++ APPS/Halux/PPS/Verpakking/impl/KartonWerkpostFactory.cls.xml	(.../KartonWerkpostFactory.cls.xml)	(revision 68887)
@@ -21,6 +21,12 @@
 	ElseIf (WerkpostID = ..WerkpostEnum.LosseOnderdelen) {
 		Set Werkpost = ##class(APPS.Halux.PPS.Verpakking.impl.LOKartonWerkpost).%New()
 	} 
+	ElseIf (WerkpostID = ..WerkpostEnum.VerpakkingHogeRug) {
+		Set Werkpost = ##class(APPS.Halux.PPS.Verpakking.impl.LadeHogeRugKartonWerkpost).%New()
+	}  
+	ElseIf (WerkpostID = ..WerkpostEnum.ComplexeScheiding) {
+		Set Werkpost = ##class(APPS.Halux.PPS.Verpakking.impl.ComplexeScheidingKartonWerkpost).%New()
+	} 
 	ElseIf (WerkpostID = ..WerkpostEnum.LosseComponenten) {
 		Set Werkpost = ##class(APPS.Halux.PPS.Verpakking.impl.LosseComponentenKartonWerkpost).%New()
 	}
Index: APPS/Halux/PPS/Verpakking/enu/KartonWerkpost/AutoComplete.cls.xml
===================================================================
diff -u -r43451 -r68887
--- APPS/Halux/PPS/Verpakking/enu/KartonWerkpost/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 43451)
+++ APPS/Halux/PPS/Verpakking/enu/KartonWerkpost/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 68887)
@@ -9,31 +9,40 @@
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%SerialObject</Super>
 
+<Property name="ComplexeScheiding">
+<Type>%String</Type>
+<InitialExpression>"COMPLEXESCHEIDING"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Property name="LosseComponenten">
-<Type>APPS.Halux.PPS.Verpakking.enu.KartonWerkpost</Type>
+<Type>%String</Type>
 <InitialExpression>"LOSCOMP"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="LosseOnderdelen">
-<Type>APPS.Halux.PPS.Verpakking.enu.KartonWerkpost</Type>
+<Type>%String</Type>
 <InitialExpression>"LO"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="Verpakking">
-<Type>APPS.Halux.PPS.Verpakking.enu.KartonWerkpost</Type>
+<Type>%String</Type>
 <InitialExpression>"VERPAK"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
 
-<Storage name="Default">
-<Type>%Library.CacheSerialState</Type>
-<StreamLocation>^APPS.Halux.PPE153.AutoCompleteS</StreamLocation>
-</Storage>
+<Property name="VerpakkingHogeRug">
+<Type>%String</Type>
+<InitialExpression>"VPKHOGERUG"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
 </Class>