limj
2023-10-24 93652435728de839582440eefd5122c281181d35
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
Quintiq file version 2.0
#parent: DataHolderFileProvider_812
Response OnCreated () id:Response_DialogImport_DataHolderFileProvider_OnCreated_529
{
  #keys: '[136682.0.2054553938]'
  CanBindMultiple: false
  DefinitionID: 'Responsedef_WebComponent_OnCreated'
  GroupServerCalls: true
  QuillAction
  {
    Body:
    [*
      /* Set DataHolderDirectoryFileItem
      Workaround for fileItems not being filled in above call*/
      
      providerslist := FileProvider::ListFileProviders();
      providers := providerslist.Tokenize( ';' );
      
      fp := FileProvider::Create( providers.Element( 0 ) ); // 3DDrive is the only one
      DataHolderFileProvider.Data( &fp );
      
      fileprovider := DataHolderFileProvider.Data();
      folder := fileprovider.CreateFileItemFromURL( "" );
      DataHolderDirectoryFileItem.Data(&folder);
      fileItems := fileprovider.List( DataHolderDirectoryFileItem.Data() );
      try 
      {                           
            
        DataHolderFileItems.Data( &fileItems );
      }
      onerror
      {
        // Reset the last used drive
        
      }
    *]
  }
}