FoxPro/Visual FoxPro - Problema al salir de un Exe

_SCREEN.visible = .F.

SET SYSMENU OFF

CLEAR

CLOSE DATABASES ALL

SET CENTURY ON

SET SYSFORMATS ON

SET TALK OFF

SET EXCLUSIVE OFF

SET SAFETY OFF

SET REPROCESS TO AUTOMATIC

SET REFRESH TO 60, 60

SET DATE DMY

SET DELETED ON

SET EXACT OFF

SET FIXED OFF

SET MULTILOCKS ON

SET ESCAPE OFF

SET DECIMALS TO 18

SET CENTURY TO 19 ROLLOVER 91

SET HELP ON

SET STATUS BAR ON

SET ENGINEBEHAVIOR 70

SET PATH TO \sistemas\graficos;progs;Menus;sistema;base;conta;general

SET PROCEDURE TO cLibreria

SET TABLEVALIDATE TO 0

_SCREEN.caption = "Módulo de Contabilidad"

_SCREEN.closable = .F.

_SCREEN.windowstate = 2

_SCREEN.maxwidth = _SCREEN.width

_SCREEN.maxheight = _SCREEN.height

_SCREEN.autocenter = .T.

_SCREEN.fontname = 'Arial'

_SCREEN.fontsize = 9

_SCREEN.windowstate = 2

_SCREEN.icon = "\Sistemas\Conta.ico"

_SCREEN.picture = "\Sistemas\Graficos\fondo04.gif"

_SCREEN.visible = .T.

PUBLIC xempresa, directorio, tipollave,

DO .\menus\MenuConta.mpr

DO FORM MainForm2

SET SYSMENU ON

READ EVENTS

CLEAR DLLS

SET SYSMENU ON

CLEAR

RETURN

ENDPROC