Do FORM Login
READ EVENTS>

>I have a program that executes a login form. If I run the form it works as expected. If I run the form form for the program "DO FORM login" it stops at the init method which has the following code in it
>

>PUBLIC gnuseridcnt , gnpasswordcnt , lcweekday
>LOCAL x
>
>gnuseridcnt		= 0
>gnpasswordcnt	= 0
>gnUserLev		= 0
>m.glValid		= .F.
>
>Thisform.lblErrorMsg.Caption	= ''
>Thisform.lbltoday.Caption		= 'Today is ' + CDOW(DATE()) + ', ' + ;
>		CMONTH(DATE()) + ' ' + STR(DAY(DATE()),2) + ', ' + STR(YEAR(DATE()),4)
>Thisform.lblPC.Caption			= 'You are using a ' + SYS(17) + ' PC'
>
>IF ! USED('sysuse')
>	USE (gcDATA) + '\sysuse' ORDER TAG cid ALIAS sysuse
>	SELECT sysuse
>ELSE
>	SELECT sysuse
>	SET ORDER TO TAG cid
>ENDIF
>
>x = 1
>

>I can add the "DODEFAUL()" command with out any change in behavior. The x = 1 is there so I could have a place to stop in the debugger.
>
>I am stumped. Any help appreciated.