| | |
|---|
| | | } |
|---|
| | | traverse( macroPlan, NewAssemblyOnlinePlanRow, aoprow, aoprow.Type() = '1' ){ |
|---|
| | | row := table.GetRow( aoprow ); |
|---|
| | | traverse( table, Column, column, exists( aopcolumns, Elements, e, e = column.StartDate() ) ){//, aopcolumns.Find( column.StartDate() ) > -1 |
|---|
| | | qty := sum( aoprow, NewAssemblyOnlinePlanCell, aopcell, column.StartDate() <= aopcell.NewAssemblyOnlinePlanColumn().StartDate() |
|---|
| | | and column.EndDate() >= aopcell.NewAssemblyOnlinePlanColumn().StartDate(), aopcell.Quantity() ); |
|---|
| | | traverse( aoprow, NewAssemblyOnlinePlanCell, aopcell ){ |
|---|
| | | column := selectobject( table, Column, column, column.StartDate() = aopcell.NewAssemblyOnlinePlanColumn().StartDate() ); |
|---|
| | | |
|---|
| | | // traverse( table, Column, column, exists( aopcolumns, Elements, e, e = column.StartDate() ) ){//, aopcolumns.Find( column.StartDate() ) > -1 |
|---|
| | | // qty := se( aoprow, NewAssemblyOnlinePlanCell, aopcell, column.StartDate() <= aopcell.NewAssemblyOnlinePlanColumn().StartDate() |
|---|
| | | // and column.EndDate() >= aopcell.NewAssemblyOnlinePlanColumn().StartDate(), aopcell.Quantity() ); |
|---|
| | | |
|---|
| | | cell := selectobject( row, Cell, cell, cell.Column() = column ); |
|---|
| | | if( isnull( cell ) ){ |
|---|
| | | cell := column.Cell( relnew, InventoryWeight := 0, ProductionSerialNumber := 0, Quantity := 0, Shift := '', Value := '' ); |
|---|
| | | row.Cell( relinsert, cell ); |
|---|
| | | } |
|---|
| | | cell.Quantity( qty ); |
|---|
| | | cell.Order( aopcell.Order() ); |
|---|
| | | cell.OrderNr( aopcell.OrderNr() ); |
|---|
| | | cell.Quantity( aopcell.Quantity() ); |
|---|
| | | } |
|---|
| | | } |
|---|
| | | //productids := selectuniquevalues( table, Row, row, row.Name() ); |
|---|
