大连料架优化

admin

2024-10-11 7d4e3f0a4cee1c7373c645ae80a89eb64d01d9c4

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 );
      }
    }
  *]
}