Index: APPS/Halux/PPS/Activiteit/impl/WerklijstItemsUitvoerder.cls.xml =================================================================== diff -u -r59931 -r60116 --- APPS/Halux/PPS/Activiteit/impl/WerklijstItemsUitvoerder.cls.xml (.../WerklijstItemsUitvoerder.cls.xml) (revision 59931) +++ APPS/Halux/PPS/Activiteit/impl/WerklijstItemsUitvoerder.cls.xml (.../WerklijstItemsUitvoerder.cls.xml) (revision 60116) @@ -65,10 +65,10 @@ Set SamengesteldeLijst = ##class(APPS.Halux.PPS.dto.UitvoeringInfoLijst).%New() #dim SamengesteldeLijstIterator AS TECH.ListIterator = ##class(TECH.ListIterator).%New(SamengesteldeLijst) - #dim UitvoeringLijstIterator AS TECH.ListIterator = ##class(TECH.ListIterator).%New(UitvoeringInfoLijst) + #dim UitvoeringLijstIterator AS TECH.ListIterator = ##class(TECH.ListIterator).%New(UitvoeringInfoLijst) - while UitvoeringLijstIterator.HasNext() { - #dim Mat As APPS.Halux.PPS.Activiteit.impl.common.dto.MattenUitvoeringInfo = UitvoeringLijstIterator.Next() + while UitvoeringLijstIterator.HasNext() && 0 { + #dim Mat As APPS.Halux.PPS.Activiteit.impl.common.dto.MattenUitvoeringInfo = UitvoeringLijstIterator.Next() #dim OvereenkomstigeMatGevonden As %Boolean = $$$False #dim Batch As APPS.Halux.common.Batch = ##class(APPS.ApplicatieContext).Instance().GeefProductieAPI().GeefBatchService().GeefBatch(Mat.BatchID) If ( $IsObject(Mat) && (..IsProductiegroepKast(Batch) || (..IsProductiegroepProbox(Batch))) && (Mat.%ClassName(1)="APPS.Halux.PPS.Activiteit.impl.common.dto.MattenUitvoeringInfo") ){ @@ -85,7 +85,7 @@ Do SamengesteldeLijstIterator.Reset() } } - If ((SamengesteldeLijst.Count()>0) && ((..IsProductiegroepKast(Batch)) || (..IsProductiegroepProbox(Batch)))){ + If (0 && (SamengesteldeLijst.Count()>0) && ((..IsProductiegroepKast(Batch)) || (..IsProductiegroepProbox(Batch)))){ Set UitvoeringResultaat = Verwerker.VerwerkUitvoeringInfoLijst(SamengesteldeLijst,ActiviteitParameters) } else { Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Tandembox.Aansturing/Test002/StartBatch/Productie_017_GekoppeldeIK_MattenLijst.txt =================================================================== diff -u -r59409 -r60116 --- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Tandembox.Aansturing/Test002/StartBatch/Productie_017_GekoppeldeIK_MattenLijst.txt (.../Productie_017_GekoppeldeIK_MattenLijst.txt) (revision 59409) +++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Tandembox.Aansturing/Test002/StartBatch/Productie_017_GekoppeldeIK_MattenLijst.txt (.../Productie_017_GekoppeldeIK_MattenLijst.txt) (revision 60116) @@ -8,7 +8,8 @@ ---------|----|------------------------|------|------|------------|-------| 2221 | 2 |Antislip Zwart | 473 | 1500 | - | 360 | | | | | | | | - 2222 | 4 |Antislip Zwart | 473 | 1500 | - | 360 | + 2222 | 2 |Antislip Zwart | 473 | 1500 | - | 360 | + 2222 | 2 |Antislip Zwart | 473 | 1500 | - | 360 | 2222 | 1 |Antislip Zwart | 423 | 1500 | - | 515 | 2222 | 1 |Antislip Antraciet | 323 | 1500 | - | 984 | ---------|----|------------------------|------|------|------------|-------| Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Legrabox.Aansturing/TestLBXFree/StartBatch/LBX voormontage_001_GekoppeldeIK_MattenLijst.txt =================================================================== diff -u -r59490 -r60116 --- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Legrabox.Aansturing/TestLBXFree/StartBatch/LBX voormontage_001_GekoppeldeIK_MattenLijst.txt (.../LBX voormontage_001_GekoppeldeIK_MattenLijst.txt) (revision 59490) +++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Legrabox.Aansturing/TestLBXFree/StartBatch/LBX voormontage_001_GekoppeldeIK_MattenLijst.txt (.../LBX voormontage_001_GekoppeldeIK_MattenLijst.txt) (revision 60116) @@ -6,7 +6,8 @@ ---------|----|------------------------|------|------|------------|-------| Toelev | # | Mat | D | B | ink D | ink B | ---------|----|------------------------|------|------|------------|-------| - 2222 | 2 |AS-Fiber Antraciet | 373 | 1500 | - | 520 | + 2222 | 1 |AS-Fiber Antraciet | 373 | 1500 | - | 520 | + 2222 | 1 |AS-Fiber Antraciet | 373 | 1500 | - | 520 | ---------|----|------------------------|------|------|------------|-------| \ No newline at end of file Index: BL/PPS/TBX/DocsV1.cls.xml =================================================================== diff -u -r60111 -r60116 --- BL/PPS/TBX/DocsV1.cls.xml (.../DocsV1.cls.xml) (revision 60111) +++ BL/PPS/TBX/DocsV1.cls.xml (.../DocsV1.cls.xml) (revision 60116) @@ -1176,7 +1176,7 @@ #dim SamengesteldeLijstIterator AS TECH.ListIterator = ##class(TECH.ListIterator).%New(SamengesteldeLijst) #dim UitvoeringLijstIterator AS TECH.ListIterator = ##class(TECH.ListIterator).%New(UitvoeringInfoLijst) - while UitvoeringLijstIterator.HasNext() { + while UitvoeringLijstIterator.HasNext() && 0 { #dim Mat As APPS.Halux.PPS.Activiteit.impl.common.dto.MattenUitvoeringInfo= UitvoeringLijstIterator.Next() #dim OvereenkomstigeMatGevonden As %Boolean = $$$False #dim Batch As APPS.Halux.common.Batch = ..BatchService.GeefBatch(Mat.BatchID) @@ -1199,7 +1199,7 @@ set ActiviteitParameters.Printer = ..Printer set Afdrukker = ##class(APPS.Halux.PPS.Document.impl.GekoppeldeIK.Matten).%New() - If ((SamengesteldeLijst.Count()>0) && (..IsProductiegroepKast(Batch) || (..IsProductiegroepProbox(Batch)))){ + If (0 && (SamengesteldeLijst.Count()>0) && (..IsProductiegroepKast(Batch) || (..IsProductiegroepProbox(Batch)))){ Do Afdrukker.VerwerkUitvoeringInfoLijst(SamengesteldeLijst,ActiviteitParameters) } else {