hongji.li
2023-09-07 67ff28f43d635a3728bb7d39364a9c6f8345912b
_Main/BL/Type_MacroPlan/Method_InitialUnitAndStockingPoint.qbl
@@ -90,16 +90,21 @@
                                isfromdb );
    }
    
    Currency_MP::CreateCurrency( this, "CNY", "CNY", "", true );
    currency := Currency_MP::FindById( this, "EUR" );
    currency.IsBase(false);
    Transaction::Transaction().Propagate();
    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();
      }
    
    isproductcatagory := false;
    isfromdb := false;
    ProductLevel_MP::Create( "1", isproductcatagory, this, isfromdb );
    ProductLevel_MP::Create( "2", isproductcatagory, this, isfromdb );
    ProductLevel_MP::Create( "3", isproductcatagory, this, isfromdb );
    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 );
      }
  *]
}