Merge branch 'master' of http://47.101.211.7:10101/r/VWED into dev

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
Quintiq file version 2.0
#parent: #root
StaticMethod UpdateCell (
  GeneralExcelImportAndExportDataTable table,
  GeneralExcelImportAndExportDataRow row,
  OfflinePlanTable opt,
  OfflinePlanRow opr
)
{
  TextBody:
  [*
    traverse ( table, GeneralExcelImportAndExportDataColumn, column ) {
      if ( column.ColumnIndex() = 0 ) {
        cell := select( column, GeneralExcelImportAndExportDataCell, tempColumn, tempColumn.GeneralExcelImportAndExportDataRow() = row );
        opc  := select( opt, OfflinePlanColumn, tempOPC, tempOPC.ColumnIndex() = 0 );
        opcell := opr.OfflinePlanCell( relnew, Value := cell.Value() );
        opcell.OfflinePlanColumn( relset, opc );
      } else if ( column.ColumnIndex() = 1 ) {
        cell := select( column, GeneralExcelImportAndExportDataCell, tempColumn, tempColumn.GeneralExcelImportAndExportDataRow() = row );
        opc  := select( opt, OfflinePlanColumn, tempOPC, tempOPC.ColumnIndex() = 1 );
        opcell := opr.OfflinePlanCell( relnew, Value := cell.Value() );
        opcell.OfflinePlanColumn( relset, opc );
      } else {
        cell   := select( column, GeneralExcelImportAndExportDataCell, tempColumn, tempColumn.GeneralExcelImportAndExportDataRow() = row );
        opc    := select( opt, OfflinePlanColumn, tempOPC, tempOPC.ColumnName() = column.Name() );
        opcell := opr.OfflinePlanCell( relnew, Value := cell.Value() );
        opcell.OfflinePlanColumn( relset, opc );
      }
    }
  *]
}