| | |
| | | Description: '生成计划库存存档数据' |
| | | TextBody: |
| | | [* |
| | | interfaceDataset.InventoryPlanArchiveVersion( relflush ); |
| | | //interfaceDataset.InventoryPlanArchiveVersion( relflush ); |
| | | info( '-------------------------Start---------------------'); |
| | | machineproductparent := MachiningPipelineReport::GetDefaultProductParent(); |
| | | engineproductparent := EnginePipelineReport::GetDefaultProductParent(); |
| | | allunit := AssemblyOnlinePlanVersion::GetDefaultAllUnit(); |
| | | name := InventoryPlanArchiveVersion::GetDefaultName(); |
| | | search := interfaceDataset.InventoryPlanArchiveVersionSearch( relnew, Product := allunit, TimeUnit := Translations::MP_GlobalParameters_Day(), Unit := allunit, StartDate := Date::MinDate(), EndDate := Date::MaxDate() ); |
| | | search := interfaceDataset.InventoryPlanArchiveVersionSearch( relnew, Product := allunit, Unit := allunit, StartDate := Date::MinDate(), EndDate := Date::MaxDate() );//, TimeUnit := Translations::MP_GlobalParameters_Day() |
| | | table := selectobject( interfaceDataset, InventoryPlanArchiveVersion, version, not version.IsShow() ); |
| | | if( isnull( table ) ){ |
| | | table := interfaceDataset.InventoryPlanArchiveVersion( relnew, ID := name, Name := name ); |
| | |
| | | showtable := interfaceDataset.InventoryPlanArchiveVersion( relnew, ID := name, Name := name, IsShow := true ); |
| | | } |
| | | periods := selectuniquevalues( macroPlan, Period_MP, period, not period.IsHistorical() and period.TimeUnit() = Translations::MP_GlobalParameters_Day() |
| | | and not exists( table, Column, column, column.TimeUnit() = Translations::MP_GlobalParameters_Day() and column.StartDate() = period.StartDate() ), period.StartDate() ); |
| | | and not exists( table, Column, column, column.StartDate() = period.StartDate() ), period.StartDate() );//column.TimeUnit() = Translations::MP_GlobalParameters_Day() and |
| | | if( periods.Size() > 0 ){ |
| | | table.GenerateColumn( periods, false ); |
| | | } |