From f6d33f5430e3c12423daeaf44dac7f88bd61cf81 Mon Sep 17 00:00:00 2001
From: yypsybs <yypsybs@foxmail.com>
Date: 星期四, 21 九月 2023 17:24:04 +0800
Subject: [PATCH] Merge branch 'dev_yx' into dev
---
_Main/BL/Type_MPSync/StaticMethod_TestData.qbl | 63 +++++++++++++++++++++----------
1 files changed, 42 insertions(+), 21 deletions(-)
diff --git a/_Main/BL/Type_MPSync/StaticMethod_TestData.qbl b/_Main/BL/Type_MPSync/StaticMethod_TestData.qbl
index 3cb7643..87c2b27 100644
--- a/_Main/BL/Type_MPSync/StaticMethod_TestData.qbl
+++ b/_Main/BL/Type_MPSync/StaticMethod_TestData.qbl
@@ -12,32 +12,53 @@
info( "MPSync::TestData" );
productCodeList := selectuniquevalues( macroPlan, Product_MP, item, item.ID() );
-
info( "productCodeList : " + [String]productCodeList.Size() );
mpSync.MappingCapacityAndSaleBudge( relflush );
- for( i := 1; i <= productCodeList.Size(); i := i + 1 ) {
- productCode := productCodeList.Element( i - 1 );
- mappingCapacityAndSaleBudge := mpSync.MappingCapacityAndSaleBudge( relnew,
- ProductCode := productCode,
- BusinessType := "浜嬩笟閮�" + [String](productCode.Length() mod 3 + 1),
- PlaceOfProductionOfArray := "闈㈡澘鍩哄湴" + [String](productCode.Length() mod 4 + 1)
- );
- for( month := 1; month <= 12; month := month + 1 ) {
- field := Reflection::FindAttribute( "MappingCapacityAndSaleBudge", "CapacityInPCSInMonth" + [String]month );
- field.Set( mappingCapacityAndSaleBudge, Real::Random( 20.0, 30.0 ) );
- field := Reflection::FindAttribute( "MappingCapacityAndSaleBudge", "CapacityInSheetInMonth" + [String]month );
- field.Set( mappingCapacityAndSaleBudge, Real::Random( 20.0, 30.0 ) );
- field := Reflection::FindAttribute( "MappingCapacityAndSaleBudge", "SaleAmountInMonth" + [String]month );
- field.Set( mappingCapacityAndSaleBudge, Real::Random( 20.0, 30.0 ) );
+ for( year := Date::ActualDate().Year() - 10; year <= Date::ActualDate().Year(); year := year + 1 ) {
+ for( i := 1; i <= productCodeList.Size(); i := i + 1 ) {
+ productCode := productCodeList.Element( i - 1 );
+ mappingCapacityAndSaleBudge := mpSync.MappingCapacityAndSaleBudge( relnew,
+ YearNo := year,
+ ProductCode := productCode,
+ BusinessType := "浜嬩笟閮�" + [String](productCode.Length() mod 3 + 1),
+ PlaceOfProductionOfArray := "闈㈡澘鍩哄湴" + [String](productCode.Length() mod 4 + 1)
+ );
+ for( month := 1; month <= 12; month := month + 1 ) {
+ field := Reflection::FindAttribute( "MappingCapacityAndSaleBudge", "CapacityInPCSInMonth" + [String]month );
+ field.Set( mappingCapacityAndSaleBudge, Real::Random( 20000.0, 30000.0 ) );
+ field := Reflection::FindAttribute( "MappingCapacityAndSaleBudge", "CapacityInSheetInMonth" + [String]month );
+ field.Set( mappingCapacityAndSaleBudge, Real::Random( 20000.0, 30000.0 ) );
+ field := Reflection::FindAttribute( "MappingCapacityAndSaleBudge", "SaleAmountInMonth" + [String]month );
+ field.Set( mappingCapacityAndSaleBudge, Real::Random( 20000.0, 30000.0 ) );
+ }
+ mappingCapacityAndSaleBudge.CapacityInPCSTotal( mappingCapacityAndSaleBudge.GetCapacityInPCSInYear() );
+ mappingCapacityAndSaleBudge.CapacityInSheetTotal( mappingCapacityAndSaleBudge.GetCapacityInSheetInYear() );
+ mappingCapacityAndSaleBudge.SaleAmountTotal( mappingCapacityAndSaleBudge.GetSaleAmountInYear() );
}
- mappingCapacityAndSaleBudge.CapacityInPCSTotal( mappingCapacityAndSaleBudge.GetCapacityInPCSInYear() );
- mappingCapacityAndSaleBudge.CapacityInSheetTotal( mappingCapacityAndSaleBudge.GetCapacityInSheetInYear() );
- mappingCapacityAndSaleBudge.SaleAmountTotal( mappingCapacityAndSaleBudge.GetSaleAmountInYear() );
}
+ result1 := selectset( mpSync, MappingCapacityAndSaleBudge, item, true );
+ info( "test MappingCapacityAndSaleBudge size : " + [String]result1.Size() );
- result := selectset( mpSync, MappingCapacityAndSaleBudge, item, true );
-
- info( "MappingCapacityAndSaleBudge size : " + [String]result.Size() );
+ mpSync.MappingAnnualBudget( relflush );
+ for( year := Date::ActualDate().Year() - 10; year <= Date::ActualDate().Year(); year := year + 1 ) {
+ for( i := 1; i <= productCodeList.Size(); i := i + 1 ) {
+ productCode := productCodeList.Element( i - 1 );
+ mappingAnnualBudget := mpSync.MappingAnnualBudget( relnew,
+ YearNo := year,
+ ProductId := productCode
+ );
+ for( month := 1; month <= 12; month := month + 1 ) {
+ field := Reflection::FindAttribute( "MappingAnnualBudget", "MonthlyModCapacity" + [String]month );
+ field.Set( mappingAnnualBudget, Real::Random( 20000.0, 30000.0 ) );
+ field := Reflection::FindAttribute( "MappingAnnualBudget", "MonthlySheetCapacity" + [String]month );
+ field.Set( mappingAnnualBudget, Real::Random( 20000.0, 30000.0 ) );
+ field := Reflection::FindAttribute( "MappingAnnualBudget", "MonthlySales" + [String]month );
+ field.Set( mappingAnnualBudget, Real::Random( 20000.0, 30000.0 ) );
+ }
+ }
+ }
+ result2 := selectset( mpSync, MappingAnnualBudget, item, true );
+ info( "test MappingAnnualBudget size : " + [String]result2.Size() );
*]
}
--
Gitblit v1.9.3