Is your Logo form Visible property set to .T.? What it's ShowWindow set to? BorderStyle?

After your logo is displayed, what your application is supposed to show? There is nothing after you call Logo:

IF oVar.LoginOk = .T.
   DO FORM Logo   && Don't need a READ EVENTS since it will go away

   *-- What the application supposed to show here?

   READ events
ELSE
   **notify user
ENDIF

>Here it is in it's entirity:
>
>*********************
>*** Program: UlasMain.Prg
>*** Main Program for Unit Level Access System
>**********************
>SET SYSMENU OFF
>SET MULTILOCKS ON
>
>** CLEAR ALL PREVIOUS ACTIVITIES **
>RELEASE ALL
>RELEASE MENU
>RELEASE POPUPS
>RELEASE WINDOWS
>CLEAR
>DEACTIVATE WINDOW "Project Manager"
>
>_SCREEN.WINDOWSTATE = 2
>_screen.closable = .F.
>_screen.caption = 'ULAS Version 1.0b'
>
>close databases all
>
>* declare public varables for objects to be created below
>public oPro, oVar
>
>* Defines array that is not created and causes the project manager to issue error --
>* External command keeps that from happening
>* set Talk status
>Local m.cOldTalk
>m.cOldTalk = (set("Talk") = "ON")
>set Talk off
>
>* Define Window for ShutDown Message (Activated ONLY in DownShut.prg)
>* This window must have "ShutDown" as it's title, Case Sensitive!
>Define Window UlasShut ;
> At 1,1 Size 10,61 ;
> Font "Arial",16 Style "B" ;
> Title "ShutDown" ;
> Panel NoFloat NoGrow ;
> Color w+/r
>
>* Set Paths
>Store sys(5) to drvid1 && drive ID from executing program (you ran it from program group)
>Store curdir() to thisdir1 && current directory from execution program
>
>gcDataPath = ADDBS(gcAppPath+"Data\")
>gcOldDataPath = SET("PATH")
>SET PATH TO gcAppPath+;"GCdATApATH+";"+GCoLDpATH
>
>**set path to &drvid1.&thisdir1
>
>SET CLASSLIB TO TARAfrm.VCX
>SET CLASSLIB TO ULAS.VCX ADDITIVE
>
>******************************* End Production Settings Section *******************************
>
>* Set status bar
>Set Status Bar Off
>
>* Create application object to contain application methods
>oPro = createobject("PRO")
>
>* Create object to contain application wide properties
>oVar = createobject("VAR")
>
>* Set Main Screen - application title, font for wait window positioning
>Modify Window Screen Title "Unit Level Access System, Version 1.0b" Font "Arial",10 Style "B"
>
>On Error oPro.Erhandler(Error(), Message(), Message(1), LineNo(), Sys(16), LastKey(), Alias(), Sys(5), Sys(2003))
>
>* Setup ShutDown routine for external interrupt
>On Shutdown Do Downshut
>
>* Setup running environment and key assignments
>oPro.DoSets()
>
>SET CENTURY on
>SET TALK OFF
>SET ECHO OFF
>
>oVar.SysDataPath = ALLTRIM(gcDataPath)
>
>* Application menu
>do form login.scx
>Read Events
>
>IF oVar.LoginOk = .T.
> DO FORM logo.SCX
> READ events
>ELSE
> **notify user
>ENDIF
>
>
>* Close tables to avoid Set Multilocks error in oEnv.RestoreSets
>Close Databases
>
>* remove shutdown setting and window
>On Shutdown
>Release Windows UlasShut
>
>* close remaining libraries
>
>* EOF - Sys1Main.prg
>************************************