Below is a .Initialize procedure for a file that allows importing of another file. If the users doesn’t select a file to import (i.e. pushes Cancel), this file closes.
Occasionally, when double clicking this file to both launch Panorama6 and the file itself, I get a message saying there is a procedure error. In those cases, the OpenFile window never comes up. I can see the error message once, then close and reopen the file 10 times and never get that error message again.
Whats going in is there is a Master file and this ViewOnly file. The Initialize routine is in the ViewOnly so it imports the master for viewing. It’s been reported that when the Procedure Error message appears, the master is flagged Open so it cannot be opened by another user with another Panorama until the ViewOnly closes. That is, it’s reported that when the Procedure error occurs, the Master File (selected previously because the OpenFile window never appears) is held hostage.
I haven’t seen that happen, a user report and maybe they are opening the Master instead of the ViewOnly and importing. But I have seen that procedure error. But it doesn’t appear every time. Strange, very strange.
.Initialize procedure:
fileglobal srchstockno, srchmaker, srchmodel, srchcomments, srchstatus
fileglobal orand
fileglobal photopath
//name of folder that holds photos
photopath = “photo”
//add path from current folder to jpgs
photopath = “:” + photopath + “:”
orand = "OR"
srchstockno = ""
srchmaker = ""
srchmodel = ""
srchcomments = ""
srchstatus = “”
//Form needs this or flash art sometimes displays error
showvariables photopath
local folder, file, type
OpenFileDialog folder, file, type, ""
IF file = ""
closefile
nop
stop
ENDIF
Openfile “&&” + folderpath(folder) + file