FUNCTION e_example()
       if ::oLocate:show(@::cLocate, @::cSubst, @::lSensitive, ::oMLe:editable, @::nOption)
          ::cLocate += ::cSubst
       endif

       do while ::oLocate:show(@::cLocate, @::cSubst, @::lSensitive, ::oMLe:editable, @::nOption)
          exit
       enddo
RETURN nil