File Naming

[David Thompson]

>The problem is that I want a longer file name than Panorama allows, 
>(even though OS X allows it). My user finds it very helpful to 
>include certain info such as version number in the actual file name. 
>I don't care at all if it displays in the window but I don't want to 
>have to trigger a procedure for each menu opened window simply to 
>change the window name. The user is free to create more windows 
>which can create a programming nightmare.

It's not a perfect solution, but it does cover all the points above. 
You can have the .Initialize procedure test to see if the file opened 
with a long name containing a # symbol. If so, it would close the 
file and open it again, using OpenAs to give it a short name in RAM. 
That would be the name used in all the window names. The drawback is 
that the file will have to open twice, unless it is being opened by 
another database that uses OpenAs to name it with the short name.

The .Initialize would begin like this.

If  info("DatabaseName") contains "#"
Local FilePath, FileName
     FilePath =  folderpath(folder(""))
     FileName =  info("DatabaseName")
     CloseFile
     OpenAs "Your Short Name"
     OpenFile FilePath + FileName
     Rtn
Endif

/* The rest of the .Initialize goes here */

The first time the file opens, it will have the long name, so the 
code above will close it and reopen it with the short one. The second 
time it opens, it will have the short name, so it will skip that 
part, and just do the normal initialization.

Dave