Really slow processing

[Bob]

I've got a client that has recently upgraded from windows server 2003 to server 2008.  The workstations have been upgrade as well from xp to win7.

What they have found is that when a selection routine is running (-v) it's taking substantially longer to select records.
........there's over 1M records to select from.

Here's the code:
::gosub setvar:
::logtext "fl="{fl:
:fl eq "":gosub enter:
::gosub getmst; gosub sel:
::a=inkey:
:a ne "":exit:
::end:
setvar:::
::xa(4,*,g); fl(1,*,g); rn(1,.0)="1":
::return:
enter:::
::input ("5","10") yn(1,yesno) "Post Agent Balances(Y/N)":
:yn eq "":goto enter:
:yn eq "N":exit:
::fl="x":
::return:
getmst:::
::lookup master r=rn -n:
::xd=master(14);xe=master(15):
::master(14)="";master(15)="":
::'close master:
::return:
sel:::
: 3 lt xd or 3 gt xe:return:
:5 eq "C" or 5 eq "O":select:
::return:

Notice the "close" statemnet in the lookup subroutine.  I commented this out to see the effect.  It made the process considerably faster but still much slower than the old system.  On the old system this would take maybe 3 or 4 minutes and now it's taking at least 10X that much.

Any suggestion on speeding the process?

Oh, they are running fp 5.0.9 I believe.


Bob
"The nonGeek Geek"
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mailman.celestial.com/pipermail/filepro-list/attachments/20110826/503cdbdb/attachment.html