PDA

View Full Version : vdfquery 2.4b bug



Paolo Bruno
20-Mar-2009, 07:49 AM
Sture

You may want to change this on your next release. It is a piece of code that interestingly worked - although it should not. Anyway, its in the openstat.pkg which I use to start dbexplor. Suddenly this stopped working as we installed our product in a way that required no setup (no HKLM entries etc.). Here the corrected version:


procedure OpenStat.Chain_Wait global string program# string parameters# integer lbDontWait
string path# prg_fn#
move (program#+"."+OpenStat.PrgExt) to prg_fn#
get SEQ_FindFileAlongDFPath prg_fn# to path#
if path# ne "" begin
Move (SEQ_ComposeAbsoluteFileName(path#,prg_fn#)) to program# // BUG: switched path# and prg_fn#
send OpenStat_RegisterFiles
send OpenStat_CloseAllFiles

runprogram background (trim(prg_fn#*parameters#))
send OpenStat_RestoreFiles
end
else send obs (replace("#",t.OpenStat.PrgNotFound,prg_fn#))
end_procedure
And an improvement here in the same package


Procedure OpenStat.Chain_DbExplor Global
Send OpenStat.Chain_Wait "DbExplor" (If(OpenStat.PrgExt="exe","-x","")+"noworkspace") DFFALSE
End_Procedure
Regards, Paolo

Sture
8-Jun-2009, 08:00 AM
Hi Paolo,

Thanks a lot. To think I never checked that. I was wondering over the years why this functionality seemed unreliable.

Your changes will be added to the next VDFQuery.

(I'm sorry I didn't see this post before now)

-Sture