Index: APPS/Halux/Planning/impl/ActiviteitInfoALU.cls.xml =================================================================== diff -u -r1133 -r2246 --- APPS/Halux/Planning/impl/ActiviteitInfoALU.cls.xml (.../ActiviteitInfoALU.cls.xml) (revision 1133) +++ APPS/Halux/Planning/impl/ActiviteitInfoALU.cls.xml (.../ActiviteitInfoALU.cls.xml) (revision 2246) @@ -28,14 +28,8 @@ Set ActiviteitInfo = ##class(APPS.Halux.Planning.impl.ActiviteitInfo).%New("Kaderdeur productie",0) Do ActiviteitLijst.Insert(ActiviteitInfo) Set ResourceGebruikMap = ..BepaalResourceGebruikMap(ActiviteitInfo.ResourceGebruik) - - &SQL(SELECT SchaduwVersion INTO :SchaduwVersie FROM Prod_GAData.Template WHERE Code = "KADBasis") - If (..Product.GeefSchaduwVersie() '= SchaduwVersie) - { - Do ##class(Prod.GADef.KaderDeur).KPRCreateSchaduwViaPRNr(..Product.GeefPRNr()) - } - Set KostBouwstenenIterator = ..Product.GeefKostSchaduwBouwstenenIt() + Set KostBouwstenenIterator = ..Product.GeefKostBouwstenenIterator() While (KostBouwstenenIterator.HasNext()) { Set KostBouwsteen = KostBouwstenenIterator.Next()