From bac6da002528f06ab9c91bb48d5a6e72493b2b60 Mon Sep 17 00:00:00 2001 From: lazhen <17772815105@139.com> Date: 星期四, 29 八月 2024 17:01:07 +0800 Subject: [PATCH] 装配上线计划添加一个4位码 --- _Main/BL/Type_AssemblyOnlinePlanPush/StaticMethod_GenerateData.qbl | 4 +++- 1 files changed, 3 insertions(+), 1 deletions(-) diff --git a/_Main/BL/Type_AssemblyOnlinePlanPush/StaticMethod_GenerateData.qbl b/_Main/BL/Type_AssemblyOnlinePlanPush/StaticMethod_GenerateData.qbl index 08cd41e..a06d769 100644 --- a/_Main/BL/Type_AssemblyOnlinePlanPush/StaticMethod_GenerateData.qbl +++ b/_Main/BL/Type_AssemblyOnlinePlanPush/StaticMethod_GenerateData.qbl @@ -37,14 +37,16 @@ ordercell := selectobject( column, AssemblyOnlinePlanCell, ocell, ocell.AssemblyOnlinePlanRow().ProductID() = quantityrow.ProductID() and ocell.AssemblyOnlinePlanRow().ProductionLine() = quantityrow.ProductionLine() and ocell.AssemblyOnlinePlanRow().Type() = '2' ); + product := selectobject( macroplan, Product_MP, product, product.ID() = quantityrow.ProductID() ); - cd :=interfaceDataset.AssemblyOnlinePlanPPPSPush( relnew, Product := quantityrow.ProductID() + cd :=interfaceDataset.AssemblyOnlinePlanPPPSPush( relnew, Product := product.ID() , PlanningDate := column.ColumnDate() , PlanningQty := [Number]cell.Value() , Sequence := ordercell.Value() , VersionName := macroplan.ScenarioName() , InterfaceTime := nowdate , VersionFlag := versionflag + , ProductFourCode := product.Notes() ); loginfo.AssemblyOnlinePlanPPPSPush( relinsert, cd ); } -- Gitblit v1.9.3