Index: BL/PPS/TBX/Sequencer.cls.xml
===================================================================
diff -u -r73612 -r73672
--- BL/PPS/TBX/Sequencer.cls.xml	(.../Sequencer.cls.xml)	(revision 73612)
+++ BL/PPS/TBX/Sequencer.cls.xml	(.../Sequencer.cls.xml)	(revision 73672)
@@ -94,7 +94,7 @@
 	. . Set PRNr=$P(LRec,D,2)
 	. . Quit:$P(LRec,D,3)<1
 	. . Quit:PRNr'?4.7N
-	. . Set SortKey=..SequenceKey(PRNr)
+	. . Set SortKey=..SequenceKey(PRNr,TOENr,TLUNr)
 	. . Quit:SortKey=""
 	. . Quit:'ProductAPI.GeefProduct(PRNr).%Extends("DOM.PM.TBXProduct.TBXLade")
 	. . Set SortKey=SortKey_"-"_TOENr_"-"_TLUNr
@@ -133,7 +133,7 @@
 
 <Method name="SequenceKey">
 <ClassMethod>1</ClassMethod>
-<FormalSpec>PRNr</FormalSpec>
+<FormalSpec>PRNr,TOENr,TLUNr</FormalSpec>
 <Implementation><![CDATA[
 	#define LeftPad4(%v)    (10000-%v)
 	Quit:PRNr'?4.7N ""
@@ -145,7 +145,7 @@
 	;w "internebreedte",IB
 	Quit:IB="" "" ; geen breedte
 
-	Quit $$$LeftPad4(LD)_"-"_$$$LeftPad4($Case(RH,"N":69,"M":84,"K":116,"B":135,"C":167,"D":199,"G":400,:"999"))_"-"_$$$LeftPad4(IB)_"-"_PRNr
+	Quit $$$LeftPad4(LD)_"-"_$$$LeftPad4($Case(RH,"N":69,"M":84,"K":116,"B":135,"C":167,"D":199,"G":400,:"999"))_"-"_$$$LeftPad4(IB)_"-"_PRNr_"-"_TOENr_"-"_TLUNr
 ]]></Implementation>
 </Method>
 
Index: APPS/Halux/common/impl/ProductieSequentie/Tandembox.cls.xml
===================================================================
diff -u -r73665 -r73672
--- APPS/Halux/common/impl/ProductieSequentie/Tandembox.cls.xml	(.../Tandembox.cls.xml)	(revision 73665)
+++ APPS/Halux/common/impl/ProductieSequentie/Tandembox.cls.xml	(.../Tandembox.cls.xml)	(revision 73672)
@@ -67,7 +67,7 @@
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken = MaatwerkProduct.GeefProductSpecificatie().GeefIngegevenKenmerken()
 	#dim SorteerSleutel As %String = $$$LeftPad4(IngegevenKenmerken.LadeDiepte)_"-"
 	Set SorteerSleutel = SorteerSleutel_$$$LeftPad4($Case(IngegevenKenmerken.LadeHoogte,"N":"10","M":"20","K":"30","B":"35","C":"40","D":"45","F":"50","G":"55",:"999"))_"-"
-	Set SorteerSleutel = SorteerSleutel_$$$LeftPad4(IngegevenKenmerken.InterneBreedte)_"-"
+	Set SorteerSleutel = SorteerSleutel_$$$LeftPad4($Select(IngegevenKenmerken.InterneBreedte = "":$LG(##class(Prod.Kenmerk.DataDefinitie).Get("TBX",MaatwerkProduct.GeefID(),"IB")), 1:IngegevenKenmerken.InterneBreedte))_"-"
 	Set SorteerSleutel = SorteerSleutel_MaatwerkProduct.GeefID()
 	Set SorteerSleutel = SorteerSleutel_"-"_Item.ToeleveringID
 	Set SorteerSleutel = SorteerSleutel_"-"_Item.ToeleveringLijnID