Help on using ddsFileBrowseCB

Hi,

I was exploring the code below to add file browse option, which I got from a solution here in this forum.

procedure( fileBrowser()
  let( ( field browseBtn )
    field = hiCreateStringField( ?name 'filename)
    browseBtn = hiCreateFormButton(
      ?name 'browseBtn
      ?buttonText "Browse..."
      ?callback "ddsFileBrowseCB( hiGetCurrentForm() 'filename \"\" 'directory )"
    )

    hiCreateAppForm(
      ?name    'CCSfileBrowserForm
      ?formTitle "Example Form"
      ?callback    ""
      ?fields    list(field browseBtn)
    )
    hiDisplayForm(CCSfileBrowserForm)
  )
)

As per the documentation, the specific function has this option:

s_mode : The selection mode specified as a symbol with the following choices:
 'anyFile: selection is any file, whether it exists or not
 'existingFile: selection is a single file (default)
 'directory: selection must be a directory where both files and directories are displayed
 'directoryOnly: selection must be a directory where only directories are displayed
 'existingFiles: selection consists of zero or more existing files

But, none of these options are working for me. Irrespective of the option, the file browse window shows all the files and folders. Is there anything wrong with my approach? Is there anything wrong with the filer I'm using which is simply blank?

I'm using icfb 5.1.0.

Regds,
Leo