'No parameter statement is found' error with VFP3

Hi,

Recently, I was doing some enhancement for a VFP3 written old application.
When my menu call one of the form.
The form will check whether one of the table is open exclusive for packing,
if not, will prompt a message and return.

However, I keep getting this message 'No parameter statement is found' on my
return statment, with my messagebox not working.

My menu is calling this form using a procedure which I had added
a dummy parameter list, but it does not help as shown below

DoBackup procedure called by menu option
========================================

PARAMETERS pvAns

DO FORM frmBackup



------------------------------------------------
Part of FORM code that causing the above message
------------------------------------------------

SELECT backup
IF NOT ISEXCLUSIVE("backup")
=Messagebox("File not in exclusive mode")
RETURN
ENDIF


Please advise how do I solve this simple problem.
Thank you

Rick
Tue Sep 16 09:15:44 CDT 2003

Vladimir,
What Method is this code in? LOAD(), INIT()? If you don't want to =
continue the form in these two methods, you should RETURN .F.

Rick

"Vladimir Sim" <vsimsn@pacific.net.sg> wrote in message =
news:epZjmSAfDHA.2184@TK2MSFTNGP10.phx.gbl...
> Hi,
>=20
> Recently, I was doing some enhancement for a VFP3 written old =
application.
> When my menu call one of the form.
> The form will check whether one of the table is open exclusive for =
packing,
> if not, will prompt a message and return.
>=20
> However, I keep getting this message 'No parameter statement is found' =
on my
> return statment, with my messagebox not working.
>=20
> My menu is calling this form using a procedure which I had added
> a dummy parameter list, but it does not help as shown below
>=20
> DoBackup procedure called by menu option
> =
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
>=20
> PARAMETERS pvAns
>=20
> DO FORM frmBackup
>=20
>=20
>=20
> ------------------------------------------------
> Part of FORM code that causing the above message
> ------------------------------------------------
>=20
> SELECT backup
> IF NOT ISEXCLUSIVE("backup")
> =3DMessagebox("File not in exclusive mode")
> RETURN
> ENDIF
>=20
>=20
> Please advise how do I solve this simple problem.
> Thank you
>=20
>