From 221cf86c35ab100bb8d6af6a066c195b3c5560f2 Mon Sep 17 00:00:00 2001 From: hongjli <3117313295@qq.com> Date: 星期六, 07 十月 2023 16:27:13 +0800 Subject: [PATCH] 填产优化 --- _Main/UI/MacroPlannerWebApp/Component_DialogFillingCapacityOrder/Response_pnlActions_btnOk_OnClick.def | 49 ++++++++++++++++++++++++++++++++++++++++--------- 1 files changed, 40 insertions(+), 9 deletions(-) diff --git a/_Main/UI/MacroPlannerWebApp/Component_DialogFillingCapacityOrder/Response_pnlActions_btnOk_OnClick.def b/_Main/UI/MacroPlannerWebApp/Component_DialogFillingCapacityOrder/Response_pnlActions_btnOk_OnClick.def index 89f4bc2..4e6488a 100644 --- a/_Main/UI/MacroPlannerWebApp/Component_DialogFillingCapacityOrder/Response_pnlActions_btnOk_OnClick.def +++ b/_Main/UI/MacroPlannerWebApp/Component_DialogFillingCapacityOrder/Response_pnlActions_btnOk_OnClick.def @@ -6,20 +6,51 @@ DefinitionID: 'Responsedef_WebButton_OnClick' Precondition: [* - feedback := Translations::FilllingCapacity_ValidateInput(); - - checkValue := not dropDownStringListProductID.Text() = '' and not dropDownStringListSalesSegmentName.Text() = '' - and not dropDownStringListStockPointID.Text() = '' and not dropDownStringListCustomer.Text() = '' - and not edtQuantity.Text() = '' and not dropDownStringListUnitOfMeasureName.Text() = '' - and not edtSalesAmount.Text() = '' - - return checkValue; + //feedback := Translations::FilllingCapacity_ValidateInput(); + // + //checkValue := not dropDownStringListProductID.Text() = '' and not dropDownStringListSalesSegmentName.Text() = '' + // and not dropDownStringListStockPointID.Text() = '' and not dropDownStringListCustomer.Text() = '' + // and not edtQuantity.Text() = '' and not dropDownStringListUnitOfMeasureName.Text() = '' + // and not edtSalesAmount.Text() = '' + // + //return checkValue; *] QuillAction { Body: [* - Form.ClickBtnOk() + Form.ApplyChanges(); + + data := guard( DataHolderFillingCapacityOrder.Data().WrappedInstance(), null( FillingCapacityOrder ) );; + if ( isnull( data ) ) { + MacroPlan.FillingCapacityOrder( relnew, + ProductID := guard( ddlProduct_MP.Data().ID(), "null" ), + BusinessType := guard( ddlBusinessType.Data().BusinessTypeName(), "null" ), + SalesSegmentName := guard( ddlSalesSegment.Data().Name(), "null" ), + StockingPointID := guard( ddlStockingPoint_MP.Data().ID(), "null" ), + Customer := efCustomerName.Text(), + Quantity := [Real]edtQuantity.Text(), + UnitOfMeasureName := ddlUnitOfMeasure_MP.Data().Name(), + ForecastDemandDate := dsForecastDemandDate.Date(), + DemandDate := dsDemandDate.Date(), + OrderType := ddslOrderType.Text(), + SalesAmount := [Number]edtSalesAmount.Text() + ); + } else { + data.ProductID( guard( ddlProduct_MP.Data().ID(), "null" ) ); + data.BusinessType( guard( ddlBusinessType.Data().BusinessTypeName(), "null" ) ); + data.SalesSegmentName( guard( ddlSalesSegment.Data().Name(), "null" ) ); + data.StockingPointID( guard( ddlStockingPoint_MP.Data().ID(), "null" ) ); + data.Customer( efCustomerName.Text() ); + data.Quantity( [Real]edtQuantity.Text() ); + data.UnitOfMeasureName( ddlUnitOfMeasure_MP.Data().Name() ); + data.ForecastDemandDate( dsForecastDemandDate.Date() ); + data.DemandDate( dsDemandDate.Date() ); + data.OrderType( ddslOrderType.Text() ); + data.SalesAmount( [Number]edtSalesAmount.Text() ); + } + + Form.Close(); *] GroupServerCalls: false } -- Gitblit v1.9.3