Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Tandembox.Aansturing/Test002/StartBatch/Productie_013_GekoppeldeIK_MattenLijst.txt
===================================================================
diff -u
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Tandembox.Aansturing/Test002/StartBatch/Productie_013_GekoppeldeIK_MattenLijst.txt (revision 0)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Tandembox.Aansturing/Test002/StartBatch/Productie_013_GekoppeldeIK_MattenLijst.txt (revision 72155)
@@ -0,0 +1,14 @@
+
+ HALUX N.V. Blz: 1
+ EUROPARK-NOORD 7 TBX Mattenlijst (PROBOX) X 15-11-14
+ B-9100 SINT-NIKLAAS Lijn:1 Batch:15000 09:15
+
+ -----|-----------|----|-----------------------|------|------|-------|------
+ Tot# | Toelev | # | Mat | D | B | ink D | ink B
+ -----|-----------|----|-----------------------|------|------|-------|------
+ |2222 | 4 |AS-Fiber Zwart | 473 | 1500 | - | 360 |
+ |2222 | 1 |AS-Fiber Zwart | 423 | 1500 | - | 515 |
+ 6|2222 | 1 |AS-Fiber Antraciet | 323 | 1500 | - | 984 |
+ -----|-----------|----|-----------------------|------|------|-------|------
+
+
\ No newline at end of file
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Legrabox.Aansturing/Test015ProboxMetOnderdelen/StartBatch/LBX voormontage_002_GekoppeldeIK_MattenLijst.txt
===================================================================
diff -u
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Legrabox.Aansturing/Test015ProboxMetOnderdelen/StartBatch/LBX voormontage_002_GekoppeldeIK_MattenLijst.txt (revision 0)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Legrabox.Aansturing/Test015ProboxMetOnderdelen/StartBatch/LBX voormontage_002_GekoppeldeIK_MattenLijst.txt (revision 72155)
@@ -0,0 +1,12 @@
+
+ HALUX N.V. Blz: 1
+ EUROPARK-NOORD 7 LBX Mattenlijst (PROBOX) Probox 14-11-14
+ B-9100 SINT-NIKLAAS Lijn:1 Batch:15000 09:15
+
+ -----|-----------|----|-----------------------|------|------|-------|------
+ Tot# | Toelev | # | Mat | D | B | ink D | ink B
+ -----|-----------|----|-----------------------|------|------|-------|------
+ 1|2223 | 1 |AS-Fiber Antraciet | 273 | 1500 | - | 522 |
+ -----|-----------|----|-----------------------|------|------|-------|------
+
+
\ No newline at end of file
Index: BL/PPS/TBX/DocsV1.cls.xml
===================================================================
diff -u -r72154 -r72155
--- BL/PPS/TBX/DocsV1.cls.xml (.../DocsV1.cls.xml) (revision 72154)
+++ BL/PPS/TBX/DocsV1.cls.xml (.../DocsV1.cls.xml) (revision 72155)
@@ -1204,6 +1204,10 @@
Set SamengesteldeLijst = ##class(APPS.Halux.PPS.dto.UitvoeringInfoLijst).%New()
#dim SamengesteldeLijstIterator AS TECH.ListIterator = ##class(TECH.ListIterator).%New(SamengesteldeLijst)
#dim LijstAantallen As %ListOfDataTypes = ##class(%ListOfDataTypes).%New("")
+ #dim UitvoeringLijstIterator AS TECH.ListIterator = ##class(TECH.ListIterator).%New(UitvoeringInfoLijst)
+
+ //Berekenen en schrijven van property TotaalAantalMattenInToelevering
+ Do ..ZetTotaalAantalMattenPerToelevering(UitvoeringLijstIterator)
Set UitvoeringLijstIterator = ##class(TECH.ListIterator).%New(UitvoeringInfoLijst)
//Matten met zelfde dimensies groeperen
@@ -1249,7 +1253,8 @@
While SamengesteldeLijstIterator.HasNext() {
Set Mat = SamengesteldeLijstIterator.Next()
- If (Mat.ToeleveringID = ToeleveringID) {
+ If (Mat.ToeleveringID = ToeleveringID) {
+ Set Mat.TotaalAantalMattenInToelevering = ""
Do SamengesteldeLijstPerToelevering.Insert(Mat)
Set TotaalAantalMattenInToelevering = TotaalAantalMattenInToelevering + Mat.Aantal
}
@@ -1277,6 +1282,35 @@
]]>
+
+UitvoeringLijstIterator:TECH.ListIterator
+1
+
+
+
SamengesteldeLijstIterator:TECH.ListIterator
1
Index: APPS/Halux/PPS/Activiteit/impl/WerklijstItemsUitvoerder.cls.xml
===================================================================
diff -u -r72154 -r72155
--- APPS/Halux/PPS/Activiteit/impl/WerklijstItemsUitvoerder.cls.xml (.../WerklijstItemsUitvoerder.cls.xml) (revision 72154)
+++ APPS/Halux/PPS/Activiteit/impl/WerklijstItemsUitvoerder.cls.xml (.../WerklijstItemsUitvoerder.cls.xml) (revision 72155)
@@ -70,6 +70,10 @@
#dim LijstAantallen As %ListOfDataTypes = ##class(%ListOfDataTypes).%New("")
#dim ObjectIsMat As %Boolean = $$$False
+ //Berekenen en schrijven van property TotaalAantalMattenInToelevering
+ Do ..ZetTotaalAantalMattenPerToelevering(UitvoeringLijstIterator)
+ Set UitvoeringLijstIterator = ##class(TECH.ListIterator).%New(UitvoeringInfoLijst)
+
Do ..GroepeerTiponSynchronisatiestangen(UitvoeringLijstIterator)
Set UitvoeringLijstIterator = ##class(TECH.ListIterator).%New(UitvoeringInfoLijst)
@@ -112,7 +116,8 @@
While SamengesteldeLijstIterator.HasNext() {
Set Mat = SamengesteldeLijstIterator.Next()
- If (Mat.ToeleveringID = ToeleveringID) {
+ If (Mat.ToeleveringID = ToeleveringID) {
+ Set Mat.TotaalAantalMattenInToelevering = ""
Do SamengesteldeLijstPerToelevering.Insert(Mat)
Set TotaalAantalMattenInToelevering = TotaalAantalMattenInToelevering + Mat.Aantal
}
@@ -144,6 +149,37 @@
]]>
+
+UitvoeringLijstIterator:TECH.ListIterator
+1
+
+
+
SamengesteldeLijstIterator:TECH.ListIterator
1
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Legrabox.Aansturing/Test015ProboxMetOnderdelen/StartBatch/LBX voormontage_001_GekoppeldeIK_MattenLijst.txt
===================================================================
diff -u -r70875 -r72155
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Legrabox.Aansturing/Test015ProboxMetOnderdelen/StartBatch/LBX voormontage_001_GekoppeldeIK_MattenLijst.txt (.../LBX voormontage_001_GekoppeldeIK_MattenLijst.txt) (revision 70875)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Legrabox.Aansturing/Test015ProboxMetOnderdelen/StartBatch/LBX voormontage_001_GekoppeldeIK_MattenLijst.txt (.../LBX voormontage_001_GekoppeldeIK_MattenLijst.txt) (revision 72155)
@@ -7,8 +7,6 @@
Tot# | Toelev | # | Mat | D | B | ink D | ink B
-----|-----------|----|-----------------------|------|------|-------|------
1|2224 | 1 |AS-Fiber Antraciet | 273 | 1500 | - | 522 |
- | | | | | | | |
- 1|2223 | 1 |AS-Fiber Antraciet | 273 | 1500 | - | 522 |
-----|-----------|----|-----------------------|------|------|-------|------
\ No newline at end of file
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Tandembox.Aansturing/Test002/StartBatch/Productie_012_GekoppeldeIK_MattenLijst.txt
===================================================================
diff -u -r70873 -r72155
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Tandembox.Aansturing/Test002/StartBatch/Productie_012_GekoppeldeIK_MattenLijst.txt (.../Productie_012_GekoppeldeIK_MattenLijst.txt) (revision 70873)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Tandembox.Aansturing/Test002/StartBatch/Productie_012_GekoppeldeIK_MattenLijst.txt (.../Productie_012_GekoppeldeIK_MattenLijst.txt) (revision 72155)
@@ -7,10 +7,6 @@
Tot# | Toelev | # | Mat | D | B | ink D | ink B
-----|-----------|----|-----------------------|------|------|-------|------
2|2221 | 2 |AS-Fiber Zwart | 473 | 1500 | - | 360 |
- | | | | | | | |
- |2222 | 4 |AS-Fiber Zwart | 473 | 1500 | - | 360 |
- |2222 | 1 |AS-Fiber Zwart | 423 | 1500 | - | 515 |
- 6|2222 | 1 |AS-Fiber Antraciet | 323 | 1500 | - | 984 |
-----|-----------|----|-----------------------|------|------|-------|------
\ No newline at end of file