I have always used the error variable to trap errors. Sorry for the confusion.
I did test your
code snippet using the following (xyz being a non existent column) and the
error message pop up
gave the correct error message, but 7.1.79.30214 gave me the "0 on ..." in the
variable.
> Albert
>
> Sorry if I was not very clear.
> I made those mistakes to test
> my error trapping code.
>
> My code traps the correct errors
> in 6.5 but in 7.1 it does not work.
>
> In 6.5 I get these error codes
> 2583 on C:\cms65\a at byte 153 03/01/2005 1:30 PM
> 2418 on C:\cms65\a at byte 111 03/01/2005 1:30 PM
> 2369 on C:\cms65\a at byte 64 03/01/2005 1:30 PM
>
> In 7.1 I get this
> the syntax error after closing the form then
> 0 on at byte 0 03/01/2005 1:33 PM
> 0 on at byte 0 03/01/2005 1:33 PM
> 0 on at byte 0 03/01/2005 1:33 PM
>
> I can't figure out why.
>
> Marc
>
> SET VAR v1err = (CVAL('error detail'))
> SET VAR v1errx = (.v1err & CTXT(.#DATE) & CTXT(.#TIME))
> INSERT INTO aerror (aerror) VALUES .v1errx
>
> SET VAR v2err = (CVAL('error detail'))
> SET VAR v2errx = (.v2err & CTXT(.#DATE) & CTXT(.#TIME))
> INSERT INTO aerror (aerror) VALUES .v2errx
>
> SET VAR v3err = (CVAL('error detail'))
> SET VAR v3errx = (.v3err & CTXT(.#DATE) & CTXT(.#TIME))
> INSERT INTO aerror (aerror) VALUES .v3errx
>
>
>
>
> Marc
>
> > Error Code 2045 = CHOOSE vx FROM #VALUES FOR ... FROM tran_hist
> > Error Code 2369 = is vxnamd supposed to be vxname?
> > Error Code 2418 = Are you sure CustNum is an alpha field?
> > Error Code 2583 = "Unable to open file" - you may have misspelled the file
> name
> >
> > --- "[EMAIL PROTECTED]" <[EMAIL PROTECTED]> wrote:
> >
> > >
> > > Charles
> > >
> > > You are right, I pasted some old code
> > > BUT I still get the same 0 error message with
> > > the corrected code.
> > >
> > > I am tracing this block of code
> > >
> > > ENTER USING ptinfo3 FOR 1 ROWS CAPTION 'Add a New Patient'
> > > edit using ptinfo3 where Vxnamd = 'smith'
> > > edit using ptinfo3 where custnum = 'aaa'
> > > choose vx from tran_hist
> > > then run the corrected error code below.
> > >
> > > I get 4 errors on trace 2045, 2369, 2418
> > > and 2583 but my code only gets
> > > 0 on at byte 0 03/01/2005 9:49 AM
> > > for an error
> > >
> > > Marc
> > >
> > >
> >
> >
> > =====
> > Albert Berry
> > Management Consultant
> > RR2 - 1252 Ponderosa Drive
> > Sparwood BC, V0B 2G2
> > Canada
> > (250) 425-5806
> > (250) 425-7259
> > (708) 575-3952 (fax)
> > [EMAIL PROTECTED]
> >
> >
>
>
=====
Albert Berry
Management Consultant
RR2 - 1252 Ponderosa Drive
Sparwood BC, V0B 2G2
Canada
(250) 425-5806
(250) 425-7259
(708) 575-3952 (fax)
[EMAIL PROTECTED]
