FoxPro/Visual FoxPro - Cerrar Sesion de Windows desde vfp

Hola, quisiera saber si alguien conoce de una rutina o funcion que me permita cerrar la sesion de windows o apagar el sistema desde foxpro, agradezco cualquier ayuda, gracias....

Espero que te sirva, de hecho lo encontre en esta misma pagina

*******************************************************************
*
** FUNCTION ApagarEquipo(tnEquipo)
** Funcion para Apagar o Reiniciar Windows
*
** Parametros
** tnEquipo = (VALOR NUMERICO)
** 0 = Reiniciar Windows
** 1 = Apaga el Sistema
** 2 = Reiniciar el Sistema
*
*** Rutina suministrada por: ROD - [email protected]
*** Ultima Modificacion: Foxperto - [email protected]
*** Marzo 01 2002
*
*******************************************************************
*
FUNCTION ApagarEquipo(tnEquipo)
Declare Integer ExitWindowsEx in "user32.dll" Integer uFlags, Integer dwReserved
ExitWindowsEx(tnEquipo, 0)
ENDFUNC
*
** Fin ApagarEquipo()
*