Não está dando certo porque 
User Function FT300ORC()
Local oModAtv := Paramixb[1]
Local __nOpc := Paramixb[2]
Local lRet := .T.

    If oModAtv <> Nil

        If __nOpc == 4
        lRet := .F. // inibe a exibição na alteração
        Agrhelp("Funcionou!")
        EndIf


    EndIf
Return lRet