Andy,

It is possible that there is no activecontrol, so you must check that before you use it. My preference for doing this is;

IF TYPE("_screen.ActiveForm.ActiveControl.Name") = "C"
   * We have an active control

ELSE
   * We do not have an active control

ENDIF