Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Why won't my error handler take over?
Message
De
17/01/2000 14:26:11
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Why won't my error handler take over?
Divers
Thread ID:
00319132
Message ID:
00319132
Vues:
46
I've got an error handling routine in my code. I know it's working because I've seen my very own errors with some other things that go wrong. But I'm getting the standard Fox error with the following (just skim through it now -- specific questions coming):
on error do err_hand with error(), " "	

select viewcostdist
num_steps = reccount()
for stepper = 1 to num_steps
	select viewcostdist
	goto record stepper
	the_eo = viewcostdist.eo					the_org = "55" + viewcostdist.org				the_obj = viewcostdist.obj					the_fin = viewcostdist.finjob					the_year = right(alltrim(viewcostdist.fy), 2)	
	the_acct = viewcostdist.acct_code			
	set talk off
	msg = "Checking Expansion Option File... please wait"
	wait window msg nowait
	select * from cne_data!viewexpop ;
		where org_code = the_org and eo = the_eo ;
		into cursor curexpop
	wait clear
When I running the above code by myself everything's fine. But when the lady across the hall and I try to save a record at the same time (and it's the same record if that matters) then I get the following error:
     SELECT viewcostdist
     Error:      1709
     Database object is being used by someone else.
     Method: correlate
     Line        62
Now, when I go into the correlate routine, and click on edit/goto line 62, the system places my cursor at the

"into cursor curexpop"


line. Which isn't having anything to do with the viewcostdist view.

I'm so confused. Mainly, I'm wondering why my own error routine isn't taking over. If it would, I could do a retry and I think everything would be okay. I know for a fact that it is not going into my error routine because that routine contains code:
    do case
        case errnum = 1709
        msg = "Are we getting to my routine?"
        wait window msg
    .....
Any help you can give would be GREATLY!!! appreciated.
~~~~~~~~~~
Denise
~~~~~~~~~~
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform