haorenhui
2023-10-30 6d6cc10d9e8e242661da7fd655dec155a09d676c
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
Quintiq file version 2.0
#parent: #root
Method UpdateColumns (ColumnTitles columnTitle_i, String imgAttrName_i, String title) id:Method_SCK_DialogSanityCheckBase_UpdateColumns
{
  #keys: '[118950.5.1123117405]'
  Body:
  [*
    // Update image attribute
    column := columnTitle_i.DataSetLevel().Columns();
    c := null( DataSetColumn );
    imgAttr := imgAttrName_i;
    
    c := select( column, Columns.astype( DataSetImageColumn ), col, col.DataMember() = imgAttr );
    if( isnull( c ) )
    {
      c := select( column, Columns.astype( DataSetConfigurableColumn ), col, col.Text() = "VALUE( object." + imgAttr + "() )" );
    }
    
    if( isnull( c ) )
    {
      newc := DataSetConfigurableColumn::Create( column );
      newc.Name( title );
      newc.SetText( "VALUE( object." + imgAttr + "() )" );
      column.StoreColumn( &newc ).astype( DataSetConfigurableColumn );
    }
    
    columnTitle_i.AutoSizeColumns();
  *]
}