FoxPro/Visual FoxPro - Codigo en el _screen

Hola a todos!
Como puedo inserta código en el _screen de la ventana de foxpro?

Mi idea seria algo asi?

Procedure _screen.gotfocus

Código

Endproc

Esto metiéndolo en el prg principal del proyecto. Como tendría q hacerlo?

Podrias jugar con BINDEVENT(), por ejemplo yo cree un formulario que tiene un boton, el el click del boton le puse esto
BINDEVENT(_SCREEN,"GotFocus",Thisform.command1,"gotfocus")

y en el gotfocus del boton le puse
=messagebox('Hola')