| | |
| | | //this.MatAttrSettingAndPlanStrategy( relflush ); |
| | | |
| | | // yypsybs Sep-8-2023 (created) |
| | | debuginfo( "CapacityAndSaleBudge::InitTestData" ) |
| | | mat1 := MatAttrSettingAndPlanStrategy::CreateIfNotExist( this, 1, "ææºäºä¸é¨", "MAT_1", "MAT_1", "TYPE_1", 233.0, "éç¨", "é¿å¨æ" ); |
| | | MatAttrSettingAndPlanStrategyDetail::CreateIfNotExist( mat1, "PROD_1", 666.0, "PROD_1_DESC" ); |
| | | MatAttrSettingAndPlanStrategyDetail::CreateIfNotExist( mat1, "PROD_2", 777.0, "PROD_2_DESC" ); |
| | | mat2 := MatAttrSettingAndPlanStrategy::CreateIfNotExist( this, 2, "ææºäºä¸é¨", "MAT_2", "MAT_2", "TYPE_2", 233.0, "ä¸ç¨", "é¿å¨æ" ); |
| | | MatAttrSettingAndPlanStrategyDetail::CreateIfNotExist( mat2, "PROD_1", 1666.0, "PROD_1_DESC" ); |
| | | MatAttrSettingAndPlanStrategyDetail::CreateIfNotExist( mat2, "PROD_2", 1777.0, "PROD_2_DESC" ); |
| | | MatAttrSettingAndPlanStrategy::CreateIfNotExist( this, 3, "ææºäºä¸é¨", "MAT_3", "MAT_3", "TYPE_1", 233.0, "éç¨", "ç卿" ); |
| | | MatAttrSettingAndPlanStrategy::CreateIfNotExist( this, 4, "ææºäºä¸é¨", "MAT_4", "MAT_4", "TYPE_2", 233.0, "ä¸ç¨", "ç卿" ); |
| | | //debuginfo( "CapacityAndSaleBudge::InitTestData" ) |
| | | //mat1 := MatAttrSettingAndPlanStrategy::CreateIfNotExist( this, 1, "ææºäºä¸é¨", "MAT_1", "MAT_1", "TYPE_1", 233.0, "éç¨", "é¿å¨æ" ); |
| | | //MatAttrSettingAndPlanStrategyDetail::CreateIfNotExist( mat1, "PROD_1", 666.0, "PROD_1_DESC" ); |
| | | //MatAttrSettingAndPlanStrategyDetail::CreateIfNotExist( mat1, "PROD_2", 777.0, "PROD_2_DESC" ); |
| | | //mat2 := MatAttrSettingAndPlanStrategy::CreateIfNotExist( this, 2, "ææºäºä¸é¨", "MAT_2", "MAT_2", "TYPE_2", 233.0, "ä¸ç¨", "é¿å¨æ" ); |
| | | //MatAttrSettingAndPlanStrategyDetail::CreateIfNotExist( mat2, "PROD_1", 1666.0, "PROD_1_DESC" ); |
| | | //MatAttrSettingAndPlanStrategyDetail::CreateIfNotExist( mat2, "PROD_2", 1777.0, "PROD_2_DESC" ); |
| | | //MatAttrSettingAndPlanStrategy::CreateIfNotExist( this, 3, "ææºäºä¸é¨", "MAT_3", "MAT_3", "TYPE_1", 233.0, "éç¨", "ç卿" ); |
| | | //MatAttrSettingAndPlanStrategy::CreateIfNotExist( this, 4, "ææºäºä¸é¨", "MAT_4", "MAT_4", "TYPE_2", 233.0, "ä¸ç¨", "ç卿" ); |
| | | *] |
| | | } |
| | |
| | | { |
| | | TextBody: |
| | | [* |
| | | // yypsybs Sep-20-2023 (created) |
| | | |
| | | debuginfo( "MPSync::TestData" ); |
| | | |
| | | productCodeList := selectuniquevalues( macroPlan, Product_MP, item, item.ID() ); |
| | | debuginfo( "productCodeList : " + [String]productCodeList.Size() ); |
| | | |
| | | mpSync.MappingCapacityAndSaleBudge( relflush ); |
| | | for( year := Date::ActualDate().Year() - 10; year <= Date::ActualDate().Year() + 5; 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() ); |
| | | } |
| | | } |
| | | result1 := selectset( mpSync, MappingCapacityAndSaleBudge, item, true ); |
| | | debuginfo( "test MappingCapacityAndSaleBudge size : " + [String]result1.Size() ); |
| | | //// yypsybs Sep-20-2023 (created) |
| | | // |
| | | //debuginfo( "MPSync::TestData" ); |
| | | // |
| | | //productCodeList := selectuniquevalues( macroPlan, Product_MP, item, item.ID() ); |
| | | //debuginfo( "productCodeList : " + [String]productCodeList.Size() ); |
| | | // |
| | | //mpSync.MappingCapacityAndSaleBudge( relflush ); |
| | | //for( year := Date::ActualDate().Year() - 10; year <= Date::ActualDate().Year() + 5; 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() ); |
| | | // } |
| | | //} |
| | | //result1 := selectset( mpSync, MappingCapacityAndSaleBudge, item, true ); |
| | | //debuginfo( "test MappingCapacityAndSaleBudge size : " + [String]result1.Size() ); |
| | | *] |
| | | } |
| | |
| | | [* |
| | | GlobalOTDTable.InitTestDataByYear( MacroPlan, DataHolderCapacityAndSaleBudgeFilterYear.Data() ); |
| | | Global_MappingAnnualBudgetData::SetOrgCodeFromForecast( GlobalOTDTable ); |
| | | GlobalOTDTable.RefreshCapacityAndSaleBudgeFilter( true ); |
| | | CapacityAndSaleBudgeFilterItem::Initial( GlobalOTDTable ); |
| | | CapacityAndSaleBudgeFilterYear::Initial( GlobalOTDTable ); |
| | | CapacityAndSaleBudgeFilterMonth::Initial( GlobalOTDTable ); |
| | | *] |
| | | GroupServerCalls: false |
| | | } |