分支自 TIANMA_JITUAN
_Main/BL/Type_ScenarioManager/Method_CapacityAndSaleBudgeCompare.qbl
@@ -37,39 +37,34 @@ this.CapacityAndSaleBudgeCompareItemRow( relflush ); this.CapacityAndSaleBudgeCompareItemColumn( relflush ); // ====汇总所有出现的产品==== productCodeList := construct( Strings ); historyData := selectset( mpSync, MappingCapacityAndSaleBudge, item, true ); info( "historyData : " + [String]historyData.Size() ) traverse( historyData, Elements, one ) { productCodeList.Add( one.ProductCode() ); } traverse( macroPlans, Elements, macroPlan ) { traverse( macroPlan, Product_MP.ProductInStockingPoint_MP.ProductInStockingPointInPeriod, pispip ) { productCodeList.Add( pispip.ProductInStockingPoint_MP().Product_MP().ID() ); } } productCodeList := selectuniquevalues( productCodeList, Elements, item, item ); info( "product count : " + [String]productCodeList.Size() ) // ====根据产品查事业部和组织编码，然后按事业部和组织编码汇总==== traverse( productCodeList, Elements, productCode ) { bom := MappingBOM::CreateTestData( mappingParent, [String](productCode.Length() mod 3), [String](productCode.Length() mod 4) ); // bom := select( mappingParent, MappingBOM, bom, bom.ProductCode() = productCode ); if( not isnull( bom ) ) { productCode := one.ProductCode(); MappingBOM::CreateTestData( mappingParent, "事业部" + [String](productCode.Length() mod 3), [String](productCode.Length() mod 4), productCode ); boms := selectset( mappingParent, MappingBOM, bom, bom.ProductCode() = productCode ); if( boms.Size() > 0 ) { bom := boms.First(); businessType := bom.BusinessType(); orgCode := bom.OrganCode(); row := CapacityAndSaleBudgeCompareItemRow::CreateIfNotExist( this, businessType, orgCode ); placeOfProductionOfArray := one.PlaceOfProductionOfArray(); // 相同面板基地和事业部的放一行 row := CapacityAndSaleBudgeCompareItemRow::CreateIfNotExist( this, businessType, placeOfProductionOfArray ); // 记录每行包含哪些product CapacityAndSaleBudgeCompareItemRowProduct::CreateIfNotExist( row, productCode ); } else { // info( "111111" ); } } info( "CapacityAndSaleBudgeCompareItemRow : " + [String]selectset( this, CapacityAndSaleBudgeCompareItemRow, item, true ).Size() ); // ====从左向右生成列头与内容==== // 事业部，组织 info( "dealing businessType and orgCode" ) info( "dealing businessType and placeOfProductionOfArray" ) columnBusinessType := CapacityAndSaleBudgeCompareItemColumn::CreateIfNotExist( this, "事业部" ); columnOrgCode := CapacityAndSaleBudgeCompareItemColumn::CreateIfNotExist( this, "组织编码" ); columnPlaceOfProductionOfArray := CapacityAndSaleBudgeCompareItemColumn::CreateIfNotExist( this, "面板基地" ); traverse( this, CapacityAndSaleBudgeCompareItemRow, row ) { cell := columnBusinessType.CapacityAndSaleBudgeCompareItemCell( relnew, CellContent := row.BusinessType() ); cell.CapacityAndSaleBudgeCompareItemRow( relset, row ); cell := columnOrgCode.CapacityAndSaleBudgeCompareItemCell( relnew, CellContent := row.OrgCode() ); cell := columnPlaceOfProductionOfArray.CapacityAndSaleBudgeCompareItemCell( relnew, CellContent := row.PlaceOfProductionOfArray() ); cell.CapacityAndSaleBudgeCompareItemRow( relset, row ); } // 面板分配量 - 年度预算 (sheets) @@ -78,18 +73,18 @@ if( CapacityAndSaleBudgeFilterItem::Contains( items, "面板分配量" ) ) { // 历史数据 traverse( months, Elements, month ) { columnMonth := CapacityAndSaleBudgeCompareItemColumn::CreateIfNotExist( this, "面板分配量-" + "-" + [String]month.MonthNo() + "月-年度预算" ); columnMonth := CapacityAndSaleBudgeCompareItemColumn::CreateIfNotExist( this, "面板分配量-" + [String]month.MonthNo() + "月-年度预算" ); traverse( this, CapacityAndSaleBudgeCompareItemRow, row ) { cellReal := CapacityAndSaleBudge::GetSheetByMonth( row.GetProductCodes(), otdTable, DateTime::Now().Year(), month.MonthNo() ); cellReal := Real::Random( 1.0, 999.0 ); cellReal := MappingCapacityAndSaleBudge::GetSheetByMonth( row.GetProductCodes(), mpSync, DateTime::Now().Year(), month.MonthNo() ); // cellReal := Real::Random( 1.0, 999.0 ); cell := columnMonth.CapacityAndSaleBudgeCompareItemCell( relnew, CellContent := [String]cellReal ); cell.CapacityAndSaleBudgeCompareItemRow( relset, row ); } } columnYear := CapacityAndSaleBudgeCompareItemColumn::CreateIfNotExist( this, "面板分配量-total-年度预算" ); traverse( this, CapacityAndSaleBudgeCompareItemRow, row ) { cellReal := CapacityAndSaleBudge::GetSheetByYear( row.GetProductCodes(), otdTable, DateTime::Now().Year() ); cellReal := Real::Random( 1.0, 999.0 ); cellReal := MappingCapacityAndSaleBudge::GetSheetByYear( row.GetProductCodes(), mpSync, DateTime::Now().Year() ); // cellReal := Real::Random( 1.0, 999.0 ); cell := columnYear.CapacityAndSaleBudgeCompareItemCell( relnew, CellContent := [String]cellReal ); cell.CapacityAndSaleBudgeCompareItemRow( relset, row ); } @@ -101,7 +96,7 @@ "面板分配量-" + [String]year.YearNo() + "年-" + [String]month.MonthNo() + "月-" + macroPlan.ScenarioName() ); traverse( this, CapacityAndSaleBudgeCompareItemRow, row ) { cellReal := Product_MP::GetNewSupplyByMonth( row.GetProductCodes(), macroPlan, year.YearNo(), month.MonthNo() ); cellReal := Real::Random( 1.0, 999.0 ); // cellReal := Real::Random( 1.0, 999.0 ); cell := columnMonth.CapacityAndSaleBudgeCompareItemCell( relnew, CellContent := [String]cellReal ); cell.CapacityAndSaleBudgeCompareItemRow( relset, row ); } @@ -110,7 +105,7 @@ "面板分配量-" + [String]year.YearNo() + "年-total-" + macroPlan.ScenarioName() ); traverse( this, CapacityAndSaleBudgeCompareItemRow, row ) { cellReal := Product_MP::GetNewSupplyByYear( row.GetProductCodes(), macroPlan, year.YearNo() ); cellReal := Real::Random( 1.0, 999.0 ); // cellReal := Real::Random( 1.0, 999.0 ); cell := columnYear.CapacityAndSaleBudgeCompareItemCell( relnew, CellContent := [String]cellReal ); cell.CapacityAndSaleBudgeCompareItemRow( relset, row ); } @@ -124,16 +119,16 @@ traverse( months, Elements, month ) { columnMonth := CapacityAndSaleBudgeCompareItemColumn::CreateIfNotExist( this, "对外销售额-" + "-" + [String]month.MonthNo() + "月-年度预算" ); traverse( this, CapacityAndSaleBudgeCompareItemRow, row ) { cellReal := CapacityAndSaleBudge::GetSaleByMonth( row.GetProductCodes(), otdTable, DateTime::Now().Year(), month.MonthNo() ); cellReal := Real::Random( 1.0, 999.0 ); cellReal := MappingCapacityAndSaleBudge::GetSaleByMonth( row.GetProductCodes(), mpSync, DateTime::Now().Year(), month.MonthNo() ); // cellReal := Real::Random( 1.0, 999.0 ); cell := columnMonth.CapacityAndSaleBudgeCompareItemCell( relnew, CellContent := [String]cellReal ); cell.CapacityAndSaleBudgeCompareItemRow( relset, row ); } } columnYear := CapacityAndSaleBudgeCompareItemColumn::CreateIfNotExist( this, "对外销售额-total-年度预算" ); traverse( this, CapacityAndSaleBudgeCompareItemRow, row ) { cellReal := CapacityAndSaleBudge::GetSaleByYear( row.GetProductCodes(), otdTable, DateTime::Now().Year() ); cellReal := Real::Random( 1.0, 999.0 ); cellReal := MappingCapacityAndSaleBudge::GetSaleByYear( row.GetProductCodes(), mpSync, DateTime::Now().Year() ); // cellReal := Real::Random( 1.0, 999.0 ); cell := columnYear.CapacityAndSaleBudgeCompareItemCell( relnew, CellContent := [String]cellReal ); cell.CapacityAndSaleBudgeCompareItemRow( relset, row ); } @@ -163,6 +158,7 @@ // 历史数据 columnYear := CapacityAndSaleBudgeCompareItemColumn::CreateIfNotExist( this, "大张盈利额-年度预算" ); traverse( this, CapacityAndSaleBudgeCompareItemRow, row ) { // todo cell := columnYear.CapacityAndSaleBudgeCompareItemCell( relnew, CellContent := [String]Number::Random( 0, 0 ) ); cell.CapacityAndSaleBudgeCompareItemRow( relset, row ); } @@ -181,6 +177,7 @@ // 历史数据 columnYear := CapacityAndSaleBudgeCompareItemColumn::CreateIfNotExist( this, "产品盈利额-年度预算" ); traverse( this, CapacityAndSaleBudgeCompareItemRow, row ) { // todo cell := columnYear.CapacityAndSaleBudgeCompareItemCell( relnew, CellContent := [String]Number::Random( 0, 0 ) ); cell.CapacityAndSaleBudgeCompareItemRow( relset, row ); } @@ -188,6 +185,7 @@ traverse( macroPlans, Elements, macroPlan ) { columnYear := CapacityAndSaleBudgeCompareItemColumn::CreateIfNotExist( this, "产品盈利额-" + [String]year.YearNo() + "年" ); traverse( this, CapacityAndSaleBudgeCompareItemRow, row ) { // todo cell := columnYear.CapacityAndSaleBudgeCompareItemCell( relnew, CellContent := [String]Number::Random( 0, 0 ) ); cell.CapacityAndSaleBudgeCompareItemRow( relset, row ); } @@ -197,7 +195,7 @@ // 设置rowNo和columnNo info( "set rowNo and columnNo" ); rowNo := 1; rowSorted := selectsortedset( this, CapacityAndSaleBudgeCompareItemRow, item, item.BusinessType() + "_" + item.OrgCode() ); rowSorted := selectsortedset( this, CapacityAndSaleBudgeCompareItemRow, item, item.PlaceOfProductionOfArray() + "_" + item.BusinessType() ); traverse( rowSorted, Elements, item ) { item.RowNo( rowNo ); rowNo := rowNo + 1;
