| | |
| | | unit := selectobject( macroplan, Unit, unit, unit.ID() = excel.Unit() ); |
| | | feedback := ''; |
| | | if( ChangeLossSetting::ValidateInput( feedback, macroplan, null( ChangeLossSetting ), unit, product1, product2, excel.StartDate(), excel.EndDate(), excel.ChangeLossNumber() ) ){ |
| | | cls := macroplan.ChangeLossSetting( relnew, ChangeLossNumber := [Real]excel.ChangeLossNumber() ); |
| | | cls := macroplan.ChangeLossSetting( relnew, ChangeLossNumber := [Real]excel.ChangeLossNumber(), StartDate := excel.StartDate(), EndDate := excel.EndDate() ); |
| | | |
| | | cls.ProductFirst( relset, product1 ); |
| | | cls.ProductSecond( relset, product2 ); |