Index: APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased.cls.xml =================================================================== diff -u -r32604 -r41084 --- APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased.cls.xml (.../ProductieSequentieGroepeerderResultSetBased.cls.xml) (revision 32604) +++ APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased.cls.xml (.../ProductieSequentieGroepeerderResultSetBased.cls.xml) (revision 41084) @@ -172,15 +172,12 @@ Set SequentieInfo = ..GeefSequentieInfo(ResultSet) Set SequentieInfo.DeelAantal = "" - If ((ToeleveringID = SequentieInfo.ToeleveringID ) && ( ProductID = SequentieInfo.ProductID)) { - Set TotaalSequentieInfo.TotaalAantal = TotaalSequentieInfo.TotaalAantal + SequentieInfo.TotaalAantal - } Else { - Do:$$$Not(ToeleveringID = "") ..Groepering.VoegToe(GroeperingID,TotaalSequentieInfo) - Set TotaalSequentieInfo = SequentieInfo - Set:$$$Not(ToeleveringID = SequentieInfo.ToeleveringID) GroeperingID = GroeperingID + 1 - Set ProductID = SequentieInfo.ProductID - Set ToeleveringID = SequentieInfo.ToeleveringID - } + Do:$$$Not(ToeleveringID = "") ..Groepering.VoegToe(GroeperingID,TotaalSequentieInfo) + Set TotaalSequentieInfo = SequentieInfo + Set:$$$Not(ToeleveringID = SequentieInfo.ToeleveringID) GroeperingID = GroeperingID + 1 + Set ProductID = SequentieInfo.ProductID + Set ToeleveringID = SequentieInfo.ToeleveringID + } Do ..Groepering.VoegToe(GroeperingID, TotaalSequentieInfo)