chenqinghong
2024-05-07 3ec06a830367465068963156dcc1d8e522571c13
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
Quintiq file version 2.0
#parent: Toolbar/DataHolderDirectoryFileItem
Response OnCreated () inherited id:Response_Toolbar_DataHolderDirectoryFileItem_OnCreated_87
{
  #keys: '[108684.0.1769381998]'
  BaseType => //DialogEDIImportExport/Response_Toolbar_DataHolderDirectoryFileItem_OnCreated
  Body:
  [*
    // Set last used directory
    lastUsed3DDriveDirectory := guard( DataHolderLastSelected3DDriveDirectory.Data().Copy(), null( FileItem, owning ) );
    
    // Need to validate that the directory still exists with same name as the fileitem is mapped by Key and object does not support checking if it exists
    if( not isnull( lastUsed3DDriveDirectory ) )
    {
      try 
      {                           
        url := lastUsed3DDriveDirectory.URL();
        fileProvider := FileProvider::CreateFromURL( lastUsed3DDriveDirectory.URL() );
        lastUsed3DDriveDirectory := fileProvider.CreateFileItemFromURL( url );
                                                   
        this.Data( &lastUsed3DDriveDirectory );
        
        fileItems := fileProvider.List( this.Data() );
        DataHolderFileItems.Data( &fileItems );
      }
      onerror
      {
        // Reset the last used drive
        this.ClearData();
      }
    }
  *]
  DefinitionID: 'Responsedef_GUIComponent_OnCreated'
}