(GRX) Memory could not be read from

[Chris Sellitto]

All,

Win XP Pro (workstation)
Win 2003 server
Dell Machine
Intel Pentium
filePro 5.0.13D9

We have a report that has an output process, and a selection process.  It will run fine (to completion), on all but 2 machines in the building.  Until recently the report worked on these machines as well.  It will go through the selection process (selecting all necessary records), and right before it is ready to go to the generating output process we receive the following message.....

The instruction at 0046f22a referenced memory at 20202020.  The memory could not be read from.

After receiving this message the process locks up, and we must terminate it abnormally.   We have gone on Google to check for solutions, without any luck.  We tried different memory sticks, and that didn't work.  Again, like I mentioned, the same exact report works fine on other machines of varying configurations.


Thank you in advance for any help regarding this issue.

Christopher Sellitto
VP Computer Operations
Guaranteed Returns

P.S.  If any of you are curious as to what the (GRX) means in the subject area, it is my way of letting people I e-mail know that I actually sent the e-mail from my business, and that if they receive an e-mail from me that does not start with that in the subject line, then it was not actually sent from me.  I use my initials (CAS)when sending personal e-mails.  I believe if everyone employed this method, or some form of it, then it would greatly reduce the amount of viruses being sent and opened accidentally(even from people whom you trust).  Anyway that is just my little way of sticking it to the man :-)

Below is the selection process.....

::ct(8,.0,g)=ct+"1":
:ct ne "1":goto pickem:
getcust:::
::cls ("5","11"):
::input ("5","10") az "             Enter Customer Number ==>":
:az eq "":beep;goto getcust:
::lookup wht = gr_whtrn  k=az   i=a -nx:
:not wht:beep;show"@\rCUSTOMER NOT ON FILE...Please Re-enter\r";goto getcust:
::close wht:
getstor::input ("7","10") ax "Enter Store Number (Blank For All) ==>":
:ax eq "":goto getbat:
::ky=az&ax:
findsto::lookup wht = gr_whtrn  k=ky   i=d -nx:
:not wht:beep;show"@\rStore Not Of File...Please Re-enter\r";goto getstor:
::close wht:
getbat::input ("9","10") ay "                Enter Batch Number ==>":
:ay eq "":beep;goto getbat:
getvend::input ("11","10") ap " Enter Vendor Name (Blank For All) ==>":
:ap eq "":goto IndWhse:
::lookup ven = gr_vend  k=ap   i=b -ng b="(brw=12,8,10 pop=ven) [Vendor Name             City              State]*2:
::                     *5                  *6":
:not ven:ap="";goto IndWhse:
showit::ap=ven(2):
::show ("11","49") ap:
askok::beep;input("15","10") yn "Is This Correct Vendor (Y/N)    ==>":
:yn eq "Y":goto IndWhse:
::getnext ven:
:not ven:goto getvend:
::goto showit:
::show ("11","49") ap:
::goto askok:
::yn="":
::close ven:
IndWhse:'ask if independant or warehouse::
::input ("13","10") iw "Enter \r I \r for Independent or \r W \r for Wholesaler ===>":
:(iw ne "I") and (iw ne "W"):beep;goto IndWhse:
getdisp:::
::input ("14","10") aq "Enter 'Y' for Returnable 'N' for Non ==> ":
:'aq ne "N"                              'c#001:'cls ("15","1");goto disitem:
getdea:::
::input ("15","1") bq " Enter \r 2 \r-DEA 2, \r 3 \r-DEA 3-5, \r N \r-NON-RETS, \r A \r-ALL, \r C \r-CONTROLS (2-5) ":
:(bq ne "2") and (bq ne "3") and (bq ne "N") and (bq ne "N") and (bq ne "A") and (bq ne "C"):beep;msgbox "Please enter 2, 3, N, A, or C";goto getdea:
disitem:'display number of items?::
::input ("17","1") br "Do you want to show individual vendor total items (Y or N) ===> ":
tofile:::
::input popup kr "Send output to file (Y or N) ===> ":
:kr eq "Y":gosub getfnam:
getok::input ("20","10") yn "Are Above Options Correct (Y/N) ==>":
:yn ne "Y":goto getcust:
::cls:
::goto get1st:
pickem:::
:1&3 eq az&ay:goto chkmor:
:1&3 gt az&ay:goto endit:
get1st:                                'key whithout store:kp=az&ay:
:ax ne ""                        'key with store:kp=az&ay&ax:
::'lookup - k=kp   i=f -nx:
::lookup - k=kp   i=f -ng:
:not -:beep;errorbox"Could not find customer-store-batch\nMaybe it's Archived to History\nPlease Investigate";exit:
chkmor:::
:(ax ne "") and (1&3&2 ne az&ay&ax):goto endit:
:ap ne "" and ap ne 13   'check vendor:end:
:ax ne "" and ax ne 2    'check store:end:
:3 ne ay                 'check batch:end:
:10 ne "Y":gosub getitms:
:10 ne aq:end:
:(bq ne "2") and (12 eq "2")                     'c#001:end:
:(bq eq "2") and (12 eq "2")                     'c#001:goto keepit:
:(bq eq "2") and (12 ne "2")                     'c#001:end:
:(bq eq "3") and ((12 lt "3") or (12 gt "5")):end:
:(bq eq "N") and ((12 ge "3") or (12 le "5")):end:
:(bq eq "C") and ((12 lt "3") or (12 gt "5")):end:
keepit::select:
::end:
endit::ko(16,*)="9999999999999999":
::lookup - k=ko   i=f -nl:
::end:
getitms::fu(5,allup,g)=int(6);pa(4,allup,g)=frac(6):
:(fu ne "") and (fu gt "0"):ql=ql+fu:
:(pa ge ".001"):ql=ql+"1":
::return:
getfnam:'get the user defined file name::
:                'creates a directory called c:\e-mails:call "mkdir":
askfnam:::
::input popup ks "Enter the filename to use (up to 15 characters) ===> ":
:ks eq "":return:
::kx="c:"{chr("92"){"e-mails"{chr("92"){ks{".csv":
::kt=exists(kx):
:kt eq "1":beep;msgbox "File...\n"{ks{".csv\nalready exists\nDo you want to overwrite it (Y or N) ===> ","","YN":
:(@bk ne "Y") and (kt eq "1"):goto askfnam:
::return: