Click Method
Object:tstoolbar.cmdFirst
Expand/Collapse source code of procedure cmdFirst.Click Source Code
LOCAL lnResult
lnResult = _screen.ActiveForm.First()
DO CASE
  CASE lnResult = FILE_BOF
    this.Parent.Refresh("BOF")
ENDCASE