Forum Discussion

MarkHoughton's avatar
MarkHoughton
Contributor
4 years ago

How do I delete redundant files from system/file explorer/file share as DELETE Option is Grey ?

Hi, I have a number of files in my export folder that were created using a Data-Management step. However, even though I have system admin rights , the option to delete any or all files is 'greyed o...
Data Management
Gidon_Albert's avatar
Gidon_Albert
Contributor II
3 years ago

You can create a "File Explorer" button on a Dashboard that opens the file share dialog box:

After the dialog opens, you can navigate to the folder where your file is and select a file you want to delete. When you hit the "Select File" button in the dialog, the file name passes to the bound parameter, which passes as an args.NameValueParis to the BR, which deletes the file:

Public Function Delete_Selected_File(ByVal si As SessionInfo, ByVal globals As BRGlobals, ByVal api As Object, ByVal args As DashboardExtenderArgs) As Object
'------------------------------------------------------------------------------------------------------------
'Reference Code: DeleteFile
'
'Description: Select and delete a file
'
'
'Created By: Gidon Albert
'Date Created: 09-23-2021
'------------------------------------------------------------------------------------------------------------
Try

Dim configSettings As AppServerConfigSettings = AppServerConfig.GetSettings(si)
Dim archiveFolder As String = FileShareFolderHelper.GetApplicationFolderForApp(si, True, configSettings.FileShareRootFolder, si.AppToken.AppName)
Dim archiveFolderFields As List(Of String) = StringHelper.SplitString(archiveFolder, "\", StageConstants.ParserDefaults.DefaultQuoteCharacter)

Dim targetFile As String = args.NameValuePairs.XFGetValue("Selected File", "")
'********* debug info *********
If debugSwitch = True Then brapi.ErrorLog.LogMessage(si,"Delete Selected File: " & vbCrLf &
"archiveFolder: " & archiveFolder & vbCrLf &
"targetFile: " & targetFile)
'******************************

Dim TFF As List(Of String) = StringHelper.SplitString(targetFile, "/", StageConstants.ParserDefaults.DefaultQuoteCharacter)
targetFile = archiveFolder & "\" & TFF.Item(2) & "\" & TFF.Item(3) & "\" & TFF.Item(4) & "\" & TFF.Item(5) & "\" & TFF.Item(6)

'Delete the file
'Verify if file exists prior to deletion
If system.IO.File.Exists(targetFile) Then
'********* debug info *********
If debugSwitch = True Then brapi.ErrorLog.LogMessage(si,"Delete Selected File: " & vbCrLf &
"targetFile: " & targetFile)
'******************************
System.IO.File.Delete(targetFile)
End If

Return Nothing
Catch ex As Exception
Throw ErrorHandler.LogWrite(si, New XFException(si, ex))
End Try
End Function

 

  • WernerN's avatar
    WernerN
    Contributor
    3 years ago

    Thank you for the 'File Explorer Button' idea. Love it as I can nicely integrate it into an admin dashboard.
    Now i just wish that OneStream would introduce the capability for multiple selection. Not only for deleting a file.

    • NickKroppe's avatar
      NickKroppe
      Contributor
      3 years ago

      Give the MarketPlace solution "File Explorer Manager" a try. It's a recent solution that mirrors the platform file explorer and adds some ease of use functionality such as multiselecting files for download, delete, copy, move, as well as presenting timestamps in the user's time zone.

      • WernerN's avatar
        WernerN
        Contributor
        3 years ago

        Thank you Nick, 
        Did not even know that we have this new MarketPlace solution.  Already downloaded and in one of my Dev apps.