admin
2025-01-22 7e31442f0e9b07764e9c6a9680d3d4aeba5fe1de
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
Quintiq file version 2.0
#parent: #root
Method SyncRows
{
  TextBody:
  [*
    totalRows := 0;
    totalColumns := this.FinancialSalesColumn( relsize );
    
    if ( totalColumns > 0 ) {
      randomCol := select( this, FinancialSalesColumn, tempFPC, true );
      totalRows := randomCol.FinancialSalesCell( relsize );
      
      this.FinancialSalesRow( relflush );
      
      cells := construct( FinancialSalesCells );
      traverse ( this, FinancialSalesColumn, fpc ) {
        cells.Add( fpc.FirstCellInColumn() );
      }
      
      for ( i := 0; i < totalRows; i++ ) {
        assert( selectvalues( cells, Elements, c, true, c.FinancialSalesColumn().Index() ).ToString( "" ) = 
                selectvalues( selectsortedset( cells, Elements, c, true, c.FinancialSalesColumn().Index() ), Elements, c, true, c.FinancialSalesColumn().Index() ).ToString( "" ),
                "Assertion error in FrockDataTable::syncRows: Cells not sorted by column index" );
        row := this.FinancialSalesRow( relnew, RowNr := i );
        
        newCells := construct( FinancialSalesCells );
        
        traverse ( cells, Elements, c ) {
          row.FinancialSalesCell( relinsert, c );
          
          newCells.Add( c.NextCellInColumn() );
        }
        
        cells := &newCells;
      }
    }
  *]
}