Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Why won't my error handler take over?
Message
 
À
17/01/2000 14:26:11
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00319132
Message ID:
00319135
Vues:
13
Denise,
You probably have an Error event in effect that is overriding your ON ERROR, possibly in your DBC.
Mark

>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.
"It hit an iceberg and it sank. Get over it."
Robert Ballard, dicoverer of the Titanic wreckage.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform