填充优化

yanyuan

2023-10-08 9fad19fbb830f6a4f2e2625916a28919d0600a91

填充优化

 _Main/BL/Type_FillingCapacityOrder/Attribute_CurrencyID.qbl

¶Ô±ÈÐÂÎļþ
@@ -0,0 +1,7 @@
Quintiq file version 2.0
#parent: #root
Attribute CurrencyID
{
  #keys: '3[414502.0.397320037][414502.0.397320036][414502.0.397320038]'
  ValueType: String
}

 _Main/BL/Type_FillingCapacityOrder/Attribute_UnitOfMeasure_MPID.qbl

¶Ô±ÈÐÂÎļþ
@@ -0,0 +1,7 @@
Quintiq file version 2.0
#parent: #root
Attribute UnitOfMeasure_MPID
{
  #keys: '3[414502.0.397254634][414502.0.397254633][414502.0.397254635]'
  ValueType: String
}

 _Main/BL/Type_H_FunctionClass/StaticMethod_SM_OrderHedgingEx.qbl

@@ -98,7 +98,27 @@
                      AOrders.Quantity(AOrders.Quantity()+AQty);
                    }
                    // æ–°å¢žæŽˆæƒè®¢å•
                    error( "----------------请实现新增授权订单功能代码---------------------");
                    // error( "----------------请实现新增授权订单功能代码---------------------");
                    customOrder := CustomerOrder::Create( select( Owner, Product_MP, tmepPMP, tmepPMP.ID() = Obj.ProductID() ),
                                                          select( Owner, StockingPoint_MP, tempSPMP, tempSPMP.ID() = Obj.StockingPointID() ),
                                                          OS::GenerateGUIDAsString(),
                                                          Obj.OrderDate(),
                                                          AQty,
                                                          0.0,
                                                          "Normal",
                                                          Obj.SalesSegmentName(),
                                                          Obj.CurrencyID(),
                                                          Obj.UnitOfMeasureName(),
                                                          false,
                                                          Obj.Customer(),
                                                          Obj.CustomerID(),
                                                          "",
                                                          "",
                                                          true,
                                                          true,
                                                          false
                                                         );
                    customOrder.OrderTag( "授权" );
                    // è®¢å•å¿…要信息如下：
                    // OrderTag = "授权"
                    // Quantity = AQty

 _Main/UI/MacroPlannerWebApp/Component_DialogFillingCapacityOrder/Component_pnlContent.def

@@ -70,7 +70,7 @@
        DataBinding: 'DataHolderFillingCapacityOrder.Data.Quantity'
        Label: '数量'
        Mask: 'REAL'
        Taborder: 12
        Taborder: 13
      ]
    }
    Component dropDownStringListUnitOfMeasureName id:dropDownStringListUnitOfMeasureName_750
@@ -97,7 +97,7 @@
        DataBinding: 'DataHolderFillingCapacityOrder.Data.SalesAmount'
        Label: '销售额'
        Mask: 'NUMBER'
        Taborder: 13
        Taborder: 14
      ]
    }
    Component dsDemandDate
@@ -108,7 +108,7 @@
      [
        DataBinding: 'DataHolderFillingCapacityOrder.Data.DemandDate'
        Label: '需求日期'
        Taborder: 15
        Taborder: 16
      ]
    }
    Component dsForecastDemandDate
@@ -119,7 +119,7 @@
      [
        DataBinding: 'DataHolderFillingCapacityOrder.Data.ForecastDemandDate'
        Label: '预期需求日期'
        Taborder: 14
        Taborder: 15
      ]
    }
    Component ddlSalesSegment
@@ -268,7 +268,7 @@
      [
        DataBinding: 'DataHolderFillingCapacityOrder.Data.Customer'
        Label: 'Customer name'
        Taborder: 10
        Taborder: 11
      ]
    }
    Component efCustomID
@@ -278,7 +278,7 @@
      Properties:
      [
        Label: 'Customer ID'
        Taborder: 11
        Taborder: 12
      ]
    }
    Component ddslOrderType
@@ -290,7 +290,34 @@
        DataBinding: 'DataHolderFillingCapacityOrder.Data.OrderType'
        Label: '订单类型'
        Strings: '反签;授权'
        Taborder: 16
        Taborder: 17
      ]
    }
    Component ddlCurrency_MP
    {
      #keys: '[414502.0.395021898]'
      BaseType: 'WebDropDownList'
      Databinding: 'Currency_MP'
      Children:
      [
        Component deContent593
        {
          #keys: '[414502.0.395021900]'
          BaseType: 'WebDataExtractor'
          Properties:
          [
            DataType: 'MacroPlan'
            Source: 'MacroPlan'
            Taborder: 0
            Transformation: 'Currency_MP'
          ]
        }
      ]
      Properties:
      [
        DisplayField: 'Name'
        Label: '货币'
        Taborder: 10
      ]
    }
  ]

 _Main/UI/MacroPlannerWebApp/Component_DialogFillingCapacityOrder/Response_pnlActions_btnOk_OnClick.def

@@ -35,7 +35,8 @@
                                        ForecastDemandDate := dsForecastDemandDate.Date(),
                                        DemandDate         := dsDemandDate.Date(),
                                        OrderType          := ddslOrderType.Text(),
                                        SalesAmount        := [Number]edtSalesAmount.Text()
                                        SalesAmount        := [Number]edtSalesAmount.Text(),
                                        CurrencyID         := ddlCurrency_MP.Data().ID()
                                       );
      } else {
        data.ProductID( guard( ddlProduct_MP.Data().ID(), "null" ) );
@@ -49,6 +50,7 @@
        data.DemandDate( dsDemandDate.Date() );
        data.OrderType( ddslOrderType.Text() );
        data.SalesAmount( [Number]edtSalesAmount.Text() );
        data.CurrencyID( ddlCurrency_MP.Data().ID() );
      }
      
      Form.Close();

 _Main/UI/MacroPlannerWebApp/Component_FormFillingCapacityOrder/Response_PanelFillingCapacityOrder_ButtonDeduct_OnClick.def

¶Ô±ÈÐÂÎļþ
@@ -0,0 +1,20 @@
Quintiq file version 2.0
#parent: PanelFillingCapacityOrder/ButtonDeduct
Response OnClick () id:Response_PanelFillingCapacityOrder_ButtonDeduct_OnClick
{
  #keys: '[414502.0.395021805]'
  CanBindMultiple: false
  DefinitionID: 'Responsedef_WebButton_OnClick'
  Precondition:
  [*
    return not isnull( MacroPlan );
  *]
  QuillAction
  {
    Body:
    [*
      H_FunctionClass::SM_OrderHedgingEx( MacroPlan, ApplicationMacroPlanner.GetUserName() );
    *]
    GroupServerCalls: false
  }
}