| | |
| | | //根据当前版本的装配上线计划 |
| | | interface.AssemblyOnlinePlanVersion( relflush ); |
| | | allunit := AssemblyOnlinePlanVersion::GetDefaultAllUnit(); |
| | | name := AssemblyOnlinePlanVersion::GetDefaultName();//search := |
| | | search := interface.AssemblyOnlinePlanVersionSearch( relnew, Product := allunit, ProductionLine := allunit, Unit := allunit, StartDate := Date::MinDate(), EndDate := Date::MaxDate() );//, TimeUnit := Translations::MP_GlobalParameters_Day() |
| | | name := AssemblyOnlinePlanVersion::GetDefaultName();//search := |
| | | interface.AssemblyOnlinePlanVersionSearch( relnew, Product := allunit, ProductionLine := allunit, Unit := allunit, StartDate := Date::MinDate(), EndDate := Date::MaxDate() );//, TimeUnit := Translations::MP_GlobalParameters_Day() |
| | | 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( showtable ) ){ |
| | | showtable := interface.AssemblyOnlinePlanVersion( relnew, ID := name, Name := name, IsShow := true ); |
| | | } |
| | | //showtable := selectobject( interface, AssemblyOnlinePlanVersion, version, version.IsShow() ); |
| | | //if( isnull( showtable ) ){ |
| | | // showtable := interface.AssemblyOnlinePlanVersion( relnew, ID := name, Name := name, IsShow := true ); |
| | | //} |
| | | aopcolumns := selectuniquevalues( macroPlan, NewAssemblyOnlinePlanColumn, aopcolumn, not exists( table, Column, column, column.StartDate() = aopcolumn.StartDate() ), aopcolumn.StartDate() );//, column.TimeUnit() = Translations::MP_GlobalParameters_Day() |
| | | if( aopcolumns.Size() > 0 ){ |
| | | table.GenerateColumn( aopcolumns, false ); |
| | |
| | | cell.Quantity( qty ); |
| | | } |
| | | } |
| | | productids := selectuniquevalues( table, Row, row, row.Name() ); |
| | | productlines := selectuniquevalues( table, Row, row, row.ProductionLine() ); |
| | | showtable.Generate( search, productids, productlines ); |
| | | //productids := selectuniquevalues( table, Row, row, row.Name() ); |
| | | //productlines := selectuniquevalues( table, Row, row, row.ProductionLine() ); |
| | | //showtable.Generate( search, productids, productlines ); |
| | | *] |
| | | } |