From aa42b48fd2d23e75b64a0aec05d5be4b9ebf0465 Mon Sep 17 00:00:00 2001 From: lazhen <17772815105@139.com> Date: 星期二, 05 十一月 2024 18:20:19 +0800 Subject: [PATCH] 计划库存后端类 --- _Main/BL/Type_AssemblyOnlinePlanVersion/StaticMethod_RefreshData.qbl | 32 ++++++++++++++++---------------- 1 files changed, 16 insertions(+), 16 deletions(-) diff --git a/_Main/BL/Type_AssemblyOnlinePlanVersion/StaticMethod_RefreshData.qbl b/_Main/BL/Type_AssemblyOnlinePlanVersion/StaticMethod_RefreshData.qbl index 559e5c3..82afd96 100644 --- a/_Main/BL/Type_AssemblyOnlinePlanVersion/StaticMethod_RefreshData.qbl +++ b/_Main/BL/Type_AssemblyOnlinePlanVersion/StaticMethod_RefreshData.qbl @@ -8,31 +8,31 @@ TextBody: [* //鏍规嵁褰撳墠鐗堟湰鐨勮閰嶄笂绾胯鍒� - //interface.AssemblyOnlinePlanVersion( relflush ); + interface.AssemblyOnlinePlanVersion( relflush ); allunit := AssemblyOnlinePlanVersion::GetDefaultAllUnit(); - name := AssemblyOnlinePlanVersion::GetDefaultName(); - search := interface.AssemblyOnlinePlanVersionSearch( relnew, Product := allunit, ProductionLine := allunit, TimeUnit := Translations::MP_GlobalParameters_Day(), Unit := allunit, StartDate := Date::MinDate(), EndDate := Date::MaxDate() ); + name := AssemblyOnlinePlanVersion::GetDefaultName();//search := + interface.AssemblyOnlinePlanVersionSearch( relnew, Product := allunit, ProductionLine := allunit, TimeUnit := Translations::MP_GlobalParameters_Day(), Unit := allunit, StartDate := Date::MinDate(), EndDate := Date::MaxDate() ); table := selectobject( interface, AssemblyOnlinePlanVersion, version, not version.IsShow() ); if( isnull( table ) ){ table := interface.AssemblyOnlinePlanVersion( relnew, ID := name, Name := name ); } - showtable := selectobject( interface, AssemblyOnlinePlanVersion, version, version.IsShow() ); - if( isnull( table ) ){ - showtable := interface.AssemblyOnlinePlanVersion( relnew, ID := name, Name := name, IsShow := true ); - } - aopcolumns := selectuniquevalues( macroPlan, AssemblyOnlinePlanColumn, aopcolumn, aopcolumn.ColumnIndex() > 1 and not exists( table, Column, column, column.TimeUnit() = Translations::MP_GlobalParameters_Day() and column.StartDate() = aopcolumn.ColumnDate() ), aopcolumn.ColumnDate() ); - table.GenerateColumn( aopcolumns, search.TimeUnit(), search.StartDate(), search.EndDate() ); - traverse( macroPlan, AssemblyOnlinePlanRow, aoprow, aoprow.Type() = '1' ){ + //showtable := selectobject( interface, AssemblyOnlinePlanVersion, version, version.IsShow() ); + //if( isnull( table ) ){ + // showtable := interface.AssemblyOnlinePlanVersion( relnew, ID := name, Name := name, IsShow := true ); + //} + aopcolumns := selectuniquevalues( macroPlan, NewAssemblyOnlinePlanColumn, aopcolumn, not exists( table, Column, column, column.TimeUnit() = Translations::MP_GlobalParameters_Day() and column.StartDate() = aopcolumn.StartDate() ), aopcolumn.StartDate() ); + table.GenerateColumn( aopcolumns ); + traverse( macroPlan, NewAssemblyOnlinePlanRow, aoprow, aoprow.Type() = '1' ){ row := table.GetRow( aoprow ); - info( '---------------------', row.Type() ); - traverse( aoprow, AssemblyOnlinePlanCell, aopcell, aopcell.AssemblyOnlinePlanColumn().ColumnIndex() > 1 ){ - column := selectobject( table, Column, column, column.TimeUnit() = Translations::MP_GlobalParameters_Day() and column.StartDate() = aopcell.AssemblyOnlinePlanColumn().ColumnDate() ); + info( '------------------------', row.Type() ); + traverse( aoprow, NewAssemblyOnlinePlanCell, aopcell ){ + column := selectobject( table, Column, column, column.TimeUnit() = Translations::MP_GlobalParameters_Day() and column.StartDate() = aopcell.NewAssemblyOnlinePlanColumn().StartDate() ); cell := selectobject( row, Cell, cell, cell.Column() = column ); cell.InventoryWeight( aopcell.InventoryWeight() ); - cell.ProductionSerialNumber( aopcell.ProductionSerialNumber() ); + // cell.ProductionSerialNumber( aopcell.ProductionSerialNumber() ); cell.Quantity( aopcell.Quantity() ); - cell.Shift( aopcell.Shift() ); - cell.Value( aopcell.Value() ); + // cell.Shift( aopcell.Shift() ); + // cell.Value( aopcell.Value() ); } } //showtable.Generate( search, products ); -- Gitblit v1.9.3