From 4534d2c0921049d9d150ba0c31f76cb445bdd365 Mon Sep 17 00:00:00 2001 From: lazhen <17772815105@139.com> Date: 星期四, 21 十一月 2024 17:41:25 +0800 Subject: [PATCH] 存档报表界面去掉日期区分列 --- _Main/BL/Type_AssemblyOnlinePlanVersion/Method_Generate.qbl | 44 ++++++++++++++++++++++---------------------- 1 files changed, 22 insertions(+), 22 deletions(-) diff --git a/_Main/BL/Type_AssemblyOnlinePlanVersion/Method_Generate.qbl b/_Main/BL/Type_AssemblyOnlinePlanVersion/Method_Generate.qbl index 56fd503..d453edb 100644 --- a/_Main/BL/Type_AssemblyOnlinePlanVersion/Method_Generate.qbl +++ b/_Main/BL/Type_AssemblyOnlinePlanVersion/Method_Generate.qbl @@ -10,28 +10,28 @@ [* // 鐢勫叞楦� Jun-25-2024 (created) info( '-----------Search start-------' ); - table := selectobject( this,InterfaceDataset.AssemblyOnlinePlanVersion, report, not report.IsShow() ); - //娓呯┖涔嬪墠瀛樺偍鐨勬樉绀烘暟鎹� - aopcolumns := selectuniquevalues( table, Column, aopcolumn, aopcolumn.TimeUnit() = search.TimeUnit() and aopcolumn.StartDate() >= search.StartDate() and aopcolumn.StartDate() <= search.EndDate(), aopcolumn.StartDate() ); - this.Clear( aopcolumns ); - traverse( table, Row, row, ( units.Size() = 0 or units.Find( row.ProductionLine() ) > -1 ) and ( products.Size() = 0 or products.Find( row.Name() ) > -1 ) ){ - - showrow := selectobject( this, Row, showrow, showrow.Name() = row.Name() and showrow.Unit() = search.Unit() ); - if( isnull( showrow ) ){ - showrow := this.Row( relnew, Name := row.Name(), ProductID := row.ProductID(), ProductionLine := row.ProductionLine(), Type := row.Type(), Unit := search.Unit() ); - } - traverse( row, Cell, cell, cell.Column().TimeUnit() = search.TimeUnit() ){ - column := selectobject( this, Column, column, column.ColumnName() = cell.Column().ColumnName() ); - if( not isnull( column ) ){ - showcell := selectobject( showrow, Cell, showcell, showcell.Column() = column ); - if( isnull( showcell ) ){ - showcell := column.Cell( relnew, Quantity := 0 ); - showrow.Cell( relinsert, showcell ); - } - showcell.Quantity( cell.Quantity() + showcell.Quantity() ); - } - } - } + //table := selectobject( this,InterfaceDataset.AssemblyOnlinePlanVersion, report, not report.IsShow() ); + ////娓呯┖涔嬪墠瀛樺偍鐨勬樉绀烘暟鎹� + //aopcolumns := selectuniquevalues( table, Column, aopcolumn, aopcolumn.TimeUnit() = search.TimeUnit() and aopcolumn.StartDate() >= search.StartDate() and aopcolumn.StartDate() <= search.EndDate(), aopcolumn.StartDate() ); + //this.Clear( aopcolumns ); + //traverse( table, Row, row, ( units.Size() = 0 or units.Find( row.ProductionLine() ) > -1 ) and ( products.Size() = 0 or products.Find( row.Name() ) > -1 ) ){ + // + // showrow := selectobject( this, Row, showrow, showrow.Name() = row.Name() and showrow.Unit() = search.Unit() ); + // if( isnull( showrow ) ){ + // showrow := this.Row( relnew, Name := row.Name(), ProductID := row.ProductID(), ProductionLine := row.ProductionLine(), Type := row.Type(), Unit := search.Unit() ); + // } + // traverse( row, Cell, cell, cell.Column().TimeUnit() = search.TimeUnit() ){ + // column := selectobject( this, Column, column, column.ColumnName() = cell.Column().ColumnName() ); + // if( not isnull( column ) ){ + // showcell := selectobject( showrow, Cell, showcell, showcell.Column() = column ); + // if( isnull( showcell ) ){ + // showcell := column.Cell( relnew, Quantity := 0 ); + // showrow.Cell( relinsert, showcell ); + // } + // showcell.Quantity( cell.Quantity() + showcell.Quantity() ); + // } + // } + //} info( '-----------Search end-------' ); *] } -- Gitblit v1.9.3