From f3dec8f5b480474c9a3b2ea0fabb0f6b9fdc0423 Mon Sep 17 00:00:00 2001
From: renhao <renhui.hao@capgemini.com>
Date: 星期五, 13 十月 2023 17:11:34 +0800
Subject: [PATCH] Merge branch 'dev'
---
_Main/BL/Type_MacroPlan/Method_InitialUnitAndStockingPoint.qbl | 111 +++++++++++--------------------------------------------
1 files changed, 23 insertions(+), 88 deletions(-)
diff --git a/_Main/BL/Type_MacroPlan/Method_InitialUnitAndStockingPoint.qbl b/_Main/BL/Type_MacroPlan/Method_InitialUnitAndStockingPoint.qbl
index e3f3545..ee48ee3 100644
--- a/_Main/BL/Type_MacroPlan/Method_InitialUnitAndStockingPoint.qbl
+++ b/_Main/BL/Type_MacroPlan/Method_InitialUnitAndStockingPoint.qbl
@@ -7,99 +7,34 @@
// Administrator Sep-1-2023 (created)
//Set the Default values
- unitofmeasurename := "PCS";
- currencyid := "CNY";
- startdate := Date::Date( 1900, 1, 1 );
- enddate := Date::Date( 9999, 12, 31 );
- capacitytype := "Infinite";
+ //unitofMeasureName := "PCS";
+ //currencyid := "CNY";
+ //startdate := Date::Date( 1900, 1, 1 );
+ //enddate := Date::Date( 9999, 12, 31 );
+ //capacitytype := "Transport quantity";
- if( isnull( Unit::FindById( this, "绌鸿繍" ) ) ){
- this.Unit( relnew,
- ID := "绌鸿繍",
- Name := "绌鸿繍",
- UnitOfMeasureName := unitofmeasurename,
- CurrencyID := currencyid,
- StartDate := startdate,
- EndDate := enddate,
- CapacityType := capacitytype );
+
+ existcurrency := Currency_MP::FindById( this, "CNY" );
+ if( isnull( existcurrency ) ){
+ Currency_MP::CreateCurrency( this, "CNY", "CNY", "", true );
+ currency := Currency_MP::FindById( this, "EUR" );
+ currency.IsBase(false);
+ Transaction::Transaction().Propagate();
}
-
- if( isnull( Unit::FindById( this, "搴撳瓨浜嬪姟澶勭悊" ) ) ){
- this.Unit( relnew,
- ID := "搴撳瓨浜嬪姟澶勭悊",
- Name := "搴撳瓨浜嬪姟澶勭悊",
- UnitOfMeasureName := unitofmeasurename,
- CurrencyID := currencyid,
- StartDate := startdate,
- EndDate := enddate,
- CapacityType := capacitytype );
- }
-
- unitofmeasurename := "PCS";
- name := "鎵嬪姩鍒涘缓搴撳瓨鐐�";
- currencyname := "CNY";
- isplannedinfinite := false;
- datestart := Date::Construct(1900, 1, 1) ;
- dateend := Date::Construct(9999, 12, 31);
- groupname := " ";
- description := " ";
- isfromdb := true;
-
- if( isnull( StockingPoint_MP::FindById( this, "F13_FG_STOCK" ) ) ){
- StockingPoint_MP::Create( this,
- "F13_FG_STOCK",
- "F13",
- name,
- unitofmeasurename,
- currencyname,
- isplannedinfinite,
- datestart,
- dateend,
- groupname,
- description,
- isfromdb );
- }
-
- if( isnull( StockingPoint_MP::FindById( this, "H10_SA_STOCK" ) ) ){
- StockingPoint_MP::Create( this,
- "H10_SA_STOCK",
- "H10",
- name,
- unitofmeasurename,
- currencyname,
- isplannedinfinite,
- datestart,
- dateend,
- groupname,
- description,
- isfromdb );
- }
-
- if( isnull( StockingPoint_MP::FindById( this, "Q10_FG_STOCK" ) ) ){
- StockingPoint_MP::Create( this,
- "Q10_FG_STOCK",
- "Q10",
- name,
- unitofmeasurename,
- currencyname,
- isplannedinfinite,
- datestart,
- dateend,
- groupname,
- description,
- isfromdb );
- }
-
- Currency_MP::CreateCurrency( this, "CNY", "CNY", "", true );
- currency := Currency_MP::FindById( this, "EUR" );
- currency.IsBase(false);
- Transaction::Transaction().Propagate();
isproductcatagory := false;
isfromdb := false;
+ existproductlevel := ProductLevel_MP::FindProductLevelTypeIndex( "2" );
+ if( isnull( existproductlevel ) ){
+ ProductLevel_MP::Create( "1", isproductcatagory, this, isfromdb );
+ ProductLevel_MP::Create( "2", isproductcatagory, this, isfromdb );
+ ProductLevel_MP::Create( "3", isproductcatagory, this, isfromdb );
+ }
- ProductLevel_MP::Create( "1", isproductcatagory, this, isfromdb );
- ProductLevel_MP::Create( "2", isproductcatagory, this, isfromdb );
- ProductLevel_MP::Create( "3", isproductcatagory, this, isfromdb );
+ existsalestlevel := SalesLevel_MP::FindSalesLevelTypeIndex( "2")
+ if( isnull( existsalestlevel ) ){
+ SalesLevel_MP::Create( "1",this,isfromdb);
+ SalesLevel_MP::Create( "2",this,isfromdb);
+ }
*]
}
--
Gitblit v1.9.3