修复一些问题

xiaoding721

2024-09-10 bee3b97ebd80eb0a96702823d5d142bcb4cb5fac

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
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
Quintiq file version 2.0
#parent: #root
StaticMethod ImportExcel (KpiTracker owner, BinaryValue excel)
{
  TextBody:
  [*
    tbgh    := TableGroupHandle::Create( 'tablegroup' );
    tbgh     := XLS::LoadTableGroupFromBinaryData( excel.AsBinaryData(), tbgh, true, true );
    
    for( n := 0; n < tbgh.TableNames().Size(); n++ )
    {
      tablename := tbgh.TableNames().Element( n );
      tbh       := tbgh.Table( tablename );
      
      xml       := TableHandle::ExportXML( tbh );
      impl      := XMLDOMImplementation::Create();
      xmlDoc    := impl.CreateDocumentFromString( xml );
      
      xmlTable  := xmlDoc.GetElementByTagName( 'table', 0 );
      xmlColumns:= xmlTable.GetElementsByTagName( 'column' );
      
      if( xmlColumns.Size() > 0 )
      {
        rowsize := xmlColumns.Element( 0 ).GetElementsByTagName( 'cell' ).Size();
        
        for( i := 0; i < rowsize; i++ )
        {
          snapshot := construct( KpiSnapshotData );    
          toString := StringToDateTime::ISOConverter(); 
          toReal   := StringToReal::ISOConverter();
          traverse( xmlColumns, Elements, xcol )
          {
            if(  xcol.GetElementByTagName( 'cell', i ).HasAttribute( 'value' ) )
            {
              name  := xcol.GetElementByTagName( 'name', 0 ).TextContent().TrimBoth();
              value := xcol.GetElementByTagName( 'cell', i ).GetAttribute( 'value' ).TextContent().TrimBoth();
              
              if( name.StartsWith( "PlanDateTime" ) )
              {
                snapshot.PlanDateTime( toString.Convert( value ) );
              }
              else if( name.StartsWith ( "ServerDateTime" )   )
              {
                snapshot.ServerDateTime( toString.Convert( value ) );
              }
              else if( name.StartsWith( "RetentionPolicyID" ) )
              {
                snapshot.RetentionPolicyIdentification( value );
              }
              else if( name.StartsWith( "label" ) )
              {
                name := name.ReplaceAll( "label_", "" );
                snapshot.CreateLabel( name, value );
              }
              else if( name.StartsWith( "kpi" ) )
              {
                name := name.ReplaceAll( "kpi_", "" );
                snapshot.CreateValue( name, toReal.Convert( value ) );
              }
            }
          }
          owner.SnapshotStorage().StoreSnapshot( snapshot );
        }
      }
    }
  *]
}