| | |
| | | and cls.ProductSecond().ID() = excel.Product2() |
| | | and cls.Unit().ID() = excel.Unit() ); |
| | | if( isnull( cls ) ){ |
| | | cls := macroplan.ChangeLossSetting( relnew, ChangeLossNr := excel.ChangeLossNr() ); |
| | | cls := macroplan.ChangeLossSetting( relnew, ChangeLossNr := [Number]excel.ChangeLossNumber() ); |
| | | product1 := selectobject( macroplan, Product_MP, product, product.ID() = excel.Product1() ); |
| | | product2 := selectobject( macroplan, Product_MP, product, product.ID() = excel.Product2() ); |
| | | unit := selectobject( macroplan, Unit, unit, unit.ID() = excel.Unit() ); |
| | |
| | | cls.ProductSecond( relset, product2 ); |
| | | cls.Unit( relset, unit ); |
| | | }else { |
| | | cls.ChangeLossNr( excel.ChangeLossNr() ); |
| | | cls.ChangeLossNr( [Number]excel.ChangeLossNumber() ); |
| | | } |
| | | excel.Delete(); |
| | | } |