Index: APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/BladInhoudBuilderTemplate.cls.xml
===================================================================
diff -u -r31908 -r31909
--- APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/BladInhoudBuilderTemplate.cls.xml (.../BladInhoudBuilderTemplate.cls.xml) (revision 31908)
+++ APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/BladInhoudBuilderTemplate.cls.xml (.../BladInhoudBuilderTemplate.cls.xml) (revision 31909)
@@ -171,7 +171,7 @@
Set HalffabItemsBoom = Product.GeefHalffabItemsBoom(##class(DOM.PM.Maatwerk.Calc.Common.enu.BerekeningWijze).ProductieAansturing())
}
- #dim HalffabItemIterator As TECH.Iterator = HalffabItemsBoom.GeefHalffabItemsIteratorZonderSamengesteldNiveau()
+ #dim HalffabItemIterator As TECH.Iterator = ..GeefHalffabItemIteratorVoorDetailLijnenGroepering(HalffabItemsBoom, Product)
While (HalffabItemIterator.HasNext()) {
#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = HalffabItemIterator.Next()
@@ -192,6 +192,35 @@
]]>
+
+HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,Product:DOM.PM.MaatwerkProduct
+1
+TECH.Iterator
+
+
+
HalffabItem:DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem
1
Index: APPS/Halux/PPS/Document/ProductieDetailDocument/impl/TAX/DetailBladGroepenBepaler.cls.xml
===================================================================
diff -u -r31901 -r31909
--- APPS/Halux/PPS/Document/ProductieDetailDocument/impl/TAX/DetailBladGroepenBepaler.cls.xml (.../DetailBladGroepenBepaler.cls.xml) (revision 31901)
+++ APPS/Halux/PPS/Document/ProductieDetailDocument/impl/TAX/DetailBladGroepenBepaler.cls.xml (.../DetailBladGroepenBepaler.cls.xml) (revision 31909)
@@ -54,6 +54,7 @@
ElseIf (Rol = ..Enum.Rol.TiponSynchronisatieStang) { Set GroepNaam = ..Groepen.Onderdelen2 }
ElseIf (Rol = ..Enum.Rol.TiponSynchronisatieTandwiel) { Set GroepNaam = ..Groepen.Onderdelen2 }
ElseIf (Rol = ..Enum.Rol.Verpakking) { Set GroepNaam = ..Groepen.Verpakking }
+ ElseIf ((Rol [ "FPV1") || (Rol = "Rug Horizontaal")) { Set GroepNaam = ..GeefGroepNaamVoorFlatpackV1(Rol) }
ElseIf (Rol [ "Probox ") { Set GroepNaam = ..Groepen.Verpakking }
ElseIf (Rol [ "V1 ") { Set GroepNaam = ..Groepen.Verpakking }
ElseIf (Rol = ..Enum.Rol.ZijkantLinks) { Set GroepNaam = ..Groepen.NietVermelden }
@@ -88,6 +89,24 @@
Quit GroepNaam
]]>
+
+
+Rol:DOM.PM.Maatwerk.Calc.HF.enu.TAORRol
+1
+TECH.String
+
+
Index: vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/TestFlatpackV1.cls.xml
===================================================================
diff -u -r31637 -r31909
--- vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/TestFlatpackV1.cls.xml (.../TestFlatpackV1.cls.xml) (revision 31637)
+++ vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/TestFlatpackV1.cls.xml (.../TestFlatpackV1.cls.xml) (revision 31909)
@@ -20,8 +20,8 @@
set LadenPerToeleveringArray = ##class(vhTest.Integratie.Productie.Setup.ProductenPerToeleveringArray).%New()
set Laden = ##class(vhTest.Integratie.Productie.Setup.ProductInfoLijst).%New()
- do Laden.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardBinnenladeVerpaktIn(##class(DOM.PM.enu.TAORVerpakkingType).FlatpackV1())),$$$Aantal))
- do Laden.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).BiColourBodemAfwBinnenladeVerpaktIn(##class(DOM.PM.enu.TAORVerpakkingType).FlatpackV1())),$$$Aantal))
+ do Laden.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardBinnenladeVerpaktIn(..Enum.VerpakkingType.FlatpackV1)),$$$Aantal))
+ do Laden.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).BiColourBodemAfwBinnenladeVerpaktIn(..Enum.VerpakkingType.FlatpackV1)),$$$Aantal))
do LadenPerToeleveringArray.SetAt(Laden, 222222)
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestFlatpackV1/StartBatch/Productie_004_PRODUCTIEDETAILBLAD.xml
===================================================================
diff -u -r31901 -r31909
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestFlatpackV1/StartBatch/Productie_004_PRODUCTIEDETAILBLAD.xml (.../Productie_004_PRODUCTIEDETAILBLAD.xml) (revision 31901)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestFlatpackV1/StartBatch/Productie_004_PRODUCTIEDETAILBLAD.xml (.../Productie_004_PRODUCTIEDETAILBLAD.xml) (revision 31909)
@@ -97,22 +97,16 @@
VPK.DP700X250 TAXFLA B
- FPV1_omdoos (VTL)
-
-
- VPK.OD700X300 TAXFLA B
-
-
FPV1_vork (VTL)
2st
VPK.USTUK390 TAXFLA B
- FPV1_wikkelfolie (VTL)
- 37.5mm
+ FPV1_omdoos (VTL)
+
- VPK.WIKFOL TAXFLA TRP
+ VPK.OD700X300 TAXFLA B
Horizontaal tussenschot
@@ -221,22 +215,16 @@
VPK.DP700X250 TAXFLA B
- FPV1_omdoos (VTL)
-
-
- VPK.OD700X300 TAXFLA B
-
-
FPV1_vork (VTL)
2st
VPK.USTUK390 TAXFLA B
- FPV1_wikkelfolie (VTL)
- 37.5mm
+ FPV1_omdoos (VTL)
+
- VPK.WIKFOL TAXFLA TRP
+ VPK.OD700X300 TAXFLA B
Horizontaal tussenschot