Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test003MetTiponSynchronisatieStang/StartBatch/TAX voormontage_001_TAX_TiponSynchronisatiestangInkortenLijst.txt =================================================================== diff -u -r32372 -r32405 --- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test003MetTiponSynchronisatieStang/StartBatch/TAX voormontage_001_TAX_TiponSynchronisatiestangInkortenLijst.txt (.../TAX voormontage_001_TAX_TiponSynchronisatiestangInkortenLijst.txt) (revision 32372) +++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test003MetTiponSynchronisatieStang/StartBatch/TAX voormontage_001_TAX_TiponSynchronisatiestangInkortenLijst.txt (.../TAX voormontage_001_TAX_TiponSynchronisatiestangInkortenLijst.txt) (revision 32405) @@ -10,10 +10,12 @@ | | | | | | PICKING | | | | | | | | 1 | | | | 1 | |ZST.2000W WELLE V50 ROH | + 2 | | | | 1 | |T60.1125W WELLE V40 S | | | | | | | | | | | | | | INKORTEN | | | | | | | | 1 |222:LI7K | 601 | P | 1 | |ZST.2000W WELLE V50 ROH | + 2 |222:LI7L | 583 | P | 1 | TOB |T60.1125W WELLE V40 S | | | | | | | | | | | | | | LEGENDE | | | | | | | | Index: APPS/Halux/PPS/Activiteit/impl/common/TiponSynchronisatiestangInkorten.cls.xml =================================================================== diff -u -r29059 -r32405 --- APPS/Halux/PPS/Activiteit/impl/common/TiponSynchronisatiestangInkorten.cls.xml (.../TiponSynchronisatiestangInkorten.cls.xml) (revision 29059) +++ APPS/Halux/PPS/Activiteit/impl/common/TiponSynchronisatiestangInkorten.cls.xml (.../TiponSynchronisatiestangInkorten.cls.xml) (revision 32405) @@ -71,7 +71,7 @@ 1 -Rol:DOM.PM.Maatwerk.Calc.HF.enu.LBXRol +Rol:DOM.PM.Maatwerk.Calc.HF.enu.HalffabRol 1 TECH.String @@ -112,12 +112,15 @@ #dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = Item.GeefHalffabItemsBoom() #dim TiponSynchronisatiestangVoorItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = "" #dim RollenTiponSynchronisatieStangIterator = ##class(TECH.ListIterator).%New(..GeefRollenTiponSynchronisatieStang()) + While RollenTiponSynchronisatieStangIterator.HasNext() && $$$Not($IsObject(TiponSynchronisatiestangVoorItem)) { - #dim Rol As DOM.PM.Maatwerk.Calc.HF.enu.LBXRol = RollenTiponSynchronisatieStangIterator.Next() + #dim Rol As DOM.PM.Maatwerk.Calc.HF.enu.HalffabRol = RollenTiponSynchronisatieStangIterator.Next() + If HalffabItemsBoom.BevatRol(Rol) { Set TiponSynchronisatiestangVoorItem = HalffabItemsBoom.GeefHalffabItem(Rol) } } + Quit TiponSynchronisatiestangVoorItem ]]> Index: APPS/Halux/common/impl/TAXVoormontageSequentieProcessor.cls.xml =================================================================== diff -u -r29059 -r32405 --- APPS/Halux/common/impl/TAXVoormontageSequentieProcessor.cls.xml (.../TAXVoormontageSequentieProcessor.cls.xml) (revision 29059) +++ APPS/Halux/common/impl/TAXVoormontageSequentieProcessor.cls.xml (.../TAXVoormontageSequentieProcessor.cls.xml) (revision 32405) @@ -3,7 +3,7 @@ Deze ProductieSequentieProcessor neemt onconditioneel alle items van de bronsequentie over -APPS.Halux.common.ProductieSequentieProcessor +APPS.Halux.common.ProductieSequentieProcessor,DOM.PM.Maatwerk.TAX.impl.Base SequentieItem:APPS.Halux.common.ProductieSequentieItem @@ -59,8 +59,12 @@ 1 %Boolean Index: APPS/Halux/PPS/Activiteit/impl/TAX/TiponSynchronisatiestangInkorten.cls.xml =================================================================== diff -u -r29059 -r32405 --- APPS/Halux/PPS/Activiteit/impl/TAX/TiponSynchronisatiestangInkorten.cls.xml (.../TiponSynchronisatiestangInkorten.cls.xml) (revision 29059) +++ APPS/Halux/PPS/Activiteit/impl/TAX/TiponSynchronisatiestangInkorten.cls.xml (.../TiponSynchronisatiestangInkorten.cls.xml) (revision 32405) @@ -37,7 +37,7 @@ 1 %ListOfDataTypes - @@ -47,11 +47,25 @@ ]]> + +Item:APPS.Halux.common.ProductieSequentieItem +%Boolean + + + -Rol:DOM.PM.Maatwerk.Calc.HF.enu.LBXRol +Rol:DOM.PM.Maatwerk.Calc.HF.enu.TAORRol 1 TECH.String -