Index: APPS/Halux/PPS/impl/AansturingActie/Taorbox/KlantEtiket/OnGemonteerd/EtiketPrinter.cls.xml =================================================================== diff -u -r32564 -r32579 --- APPS/Halux/PPS/impl/AansturingActie/Taorbox/KlantEtiket/OnGemonteerd/EtiketPrinter.cls.xml (.../EtiketPrinter.cls.xml) (revision 32564) +++ APPS/Halux/PPS/impl/AansturingActie/Taorbox/KlantEtiket/OnGemonteerd/EtiketPrinter.cls.xml (.../EtiketPrinter.cls.xml) (revision 32579) @@ -54,7 +54,7 @@ 1 APPS.Halux.common.impl.ProductieSequentieGroepering Index: APPS/Halux/common/impl/ProductieSequentieGroepeerderListBased.cls.xml =================================================================== diff -u --- APPS/Halux/common/impl/ProductieSequentieGroepeerderListBased.cls.xml (revision 0) +++ APPS/Halux/common/impl/ProductieSequentieGroepeerderListBased.cls.xml (revision 32579) @@ -0,0 +1,130 @@ + + + +TECH.RegisteredObject,APPS.Halux.common.ProductieSequentieGroepeerder + + +APPS.Halux.common.impl.ProductieSequentieGroepering +1 + + + +APPS.Halux.common.ProductieSequentieRepository +1 + + + +APPS.Halux.common.Batch +1 + + + +1 +1 +%Status +1 + + + + +BatchID:%String +APPS.Halux.common.impl.ProductieSequentieGroepering + + + + +ProductieSequentieItem:APPS.Halux.common.ProductieSequentieItem +1 +APPS.Halux.common.dto.ProductieSequentie + + + + +ToeleveringID:%String,ToeleveringLijnID:%String +1 +%String + + + + +BatchID:TECH.String,ToeleveringID:TECH.String,ToeleveringLijnID:TECH.String,SequentieInfo:APPS.Halux.common.dto.ProductieSequentie +1 + + + + + + Index: APPS/Halux/common/impl/ProductieSequentieGroepeerder.cls.xml =================================================================== diff -u -r32573 -r32579 --- APPS/Halux/common/impl/ProductieSequentieGroepeerder.cls.xml (.../ProductieSequentieGroepeerder.cls.xml) (revision 32573) +++ APPS/Halux/common/impl/ProductieSequentieGroepeerder.cls.xml (.../ProductieSequentieGroepeerder.cls.xml) (revision 32579) @@ -1,7 +1,7 @@ -TECH.RegisteredObject,APPS.Halux.common.ProductieSequentieGroepeerder,APPS.Halux.common.enu.Categorie.Verwerker +TECH.RegisteredObject,APPS.Halux.common.ProductieSequentieGroepeerder APPS.Halux.common.impl.ProductieSequentieGroepering @@ -13,11 +13,6 @@ 1 - -APPS.Halux.common.Batch -1 - - 1 1 @@ -40,7 +35,7 @@ #dim GroeperingID As %String = 1 While (ResultSet.Next()) { - #dim SequentieInfo AS APPS.Halux.common.dto.ProductieSequentie = ..GeefSequentieInfoVoorResultSet(ResultSet) + #dim SequentieInfo AS APPS.Halux.common.dto.ProductieSequentie = ..GeefSequentieInfo(ResultSet) Do ..Groepering.VoegToe(GroeperingID, SequentieInfo) } @@ -64,7 +59,7 @@ Continue:$$$Not(DeelAantal = 1) - Set SequentieInfo = ..GeefSequentieInfoVoorResultSet(ResultSet) + Set SequentieInfo = ..GeefSequentieInfo(ResultSet) Set SequentieInfo.DeelAantal = "" If $$$Not(ProductID = SequentieInfo.ProductID) { @@ -86,15 +81,51 @@ BatchID:%String APPS.Halux.common.impl.ProductieSequentieGroepering + +BatchID:TECH.String,ToeleveringID:TECH.String,ToeleveringLijnID:TECH.String,SequentieInfo:APPS.Halux.common.dto.ProductieSequentie +1 + + + BatchID:%String APPS.Halux.common.impl.ProductieSequentieGroepering @@ -109,7 +140,7 @@ Continue:$$$Not(DeelAantal = 1) - #dim SequentieInfo AS APPS.Halux.common.dto.ProductieSequentie = ..GeefSequentieInfoVoorResultSet(ResultSet) + #dim SequentieInfo AS APPS.Halux.common.dto.ProductieSequentie = ..GeefSequentieInfo(ResultSet) Set SequentieInfo.DeelAantal = "" Do ..Groepering.VoegToe(ToeleveringID,SequentieInfo) } @@ -136,7 +167,7 @@ Continue:$$$Not(DeelAantal = 1) - Set SequentieInfo = ..GeefSequentieInfoVoorResultSet(ResultSet) + Set SequentieInfo = ..GeefSequentieInfo(ResultSet) Set SequentieInfo.DeelAantal = "" If ((ToeleveringID = SequentieInfo.ToeleveringID ) && ( ProductID = SequentieInfo.ProductID)) { @@ -174,7 +205,7 @@ Continue:$$$Not(DeelAantal = 1) - Set SequentieInfo = ..GeefSequentieInfoVoorResultSet(ResultSet) + Set SequentieInfo = ..GeefSequentieInfo(ResultSet) Set SequentieInfo.DeelAantal = "" Set ProductID = SequentieInfo.ProductID @@ -210,7 +241,7 @@ ]]> - + ResultSet:TECH.ResultSet 1 APPS.Halux.common.dto.ProductieSequentie @@ -230,26 +261,6 @@ ]]> - -ProductieSequentieItem:APPS.Halux.common.ProductieSequentieItem -1 -APPS.Halux.common.dto.ProductieSequentie - - - ToeleveringID:%String,ToeleveringLijnID:%String 1 @@ -272,150 +283,6 @@ Quit CorrecteToeleveringLijnID ]]> - - -1 - - - - -1 - - - - -BatchID:TECH.String,ToeleveringID:TECH.String,ToeleveringLijnID:TECH.String,SequentieInfo:APPS.Halux.common.dto.ProductieSequentie -1 - - - - -1 - - - - -1 - - - - -1 - - - - -1 - - - - -1 - - - - -1 - - - - -1 - - - - -1 - - - - -1 - - - - -1 - - - - -1 - - - - -1 - - - - -1 - - - - -1 - - - - -1 - - - - -1 - -