Index: BL/Flow/Offerte/impl/KADParameterWrapper.cls.xml =================================================================== diff -u -r51154 -r64035 --- BL/Flow/Offerte/impl/KADParameterWrapper.cls.xml (.../KADParameterWrapper.cls.xml) (revision 51154) +++ BL/Flow/Offerte/impl/KADParameterWrapper.cls.xml (.../KADParameterWrapper.cls.xml) (revision 64035) @@ -427,6 +427,21 @@ #dim Boring2 As KADBoring = ..GeefGreepBoringVanInput(..GeefParameter(##class(BL.Flow.Offerte.enu.KADEDI.Key).K2()),..GeefParameter(##class(BL.Flow.Offerte.enu.KADEDI.Key).L2())) Do Boringen.Insert(Boring2) } + + If ..BestaatParameter(##class(BL.Flow.Offerte.enu.KADEDI.Key).K3()){ + #dim Boring3 As KADBoring = ..GeefGreepBoringVanInput(..GeefParameter(##class(BL.Flow.Offerte.enu.KADEDI.Key).K3()),..GeefParameter(##class(BL.Flow.Offerte.enu.KADEDI.Key).L3())) + Do Boringen.Insert(Boring3) + } + + If ..BestaatParameter(##class(BL.Flow.Offerte.enu.KADEDI.Key).K4()){ + #dim Boring4 As KADBoring = ..GeefGreepBoringVanInput(..GeefParameter(##class(BL.Flow.Offerte.enu.KADEDI.Key).K4()),..GeefParameter(##class(BL.Flow.Offerte.enu.KADEDI.Key).L4())) + Do Boringen.Insert(Boring4) + } + + If ..BestaatParameter(##class(BL.Flow.Offerte.enu.KADEDI.Key).K5()){ + #dim Boring5 As KADBoring = ..GeefGreepBoringVanInput(..GeefParameter(##class(BL.Flow.Offerte.enu.KADEDI.Key).K5()),..GeefParameter(##class(BL.Flow.Offerte.enu.KADEDI.Key).L5())) + Do Boringen.Insert(Boring5) + } ]]>