Нужен код стандартной навигации в формах. Как его посмотреть?

Да спасибо всем, вставил вот эти коды.
Кнопка «В начало»
go top
thisform.refresh()

Кнопка «В конец»
go bottom
thisform.refresh()

Кнопка «Следующий»
skip
thisform.refresh()

Кнопка «Предыдущий»
Skip -1
thisform.refresh()



Кнопка «Удалить»
delete
ThisForm.Refresh()

Кнопка «Выход»
ThisForm.Release()

Кнопка «Добавить»
GO bottom
append BLANK
ThisForm.Refresh()








Кнопка «Редактировать»
#DEFINE C_NOUPDATE_LOC
LOCAL lNoSendParentUpdates,lNoSendChildUpdates
LOCAL aTablesUsed,nTablesUsed,i

IF EMPTY(ALIAS())
RETURN
ENDIF

** Возвращение записи
IF THIS.Parent.EditMode

IF THIS.Parent.UseDataEnv
SELECT (THIS.Parent.OldAlias)
IF CURSORGETPROP("Buffering")>1
=TableRevert(.T.)
ENDIF
IF !EMPTY(THIS.Parent.GridAlias)
SELECT (THIS.Parent.GridAlias)
IF CURSORGETPROP("Buffering")>1
=TableRevert(.T.)
ENDIF
ENDIF
ELSE
DIMENSION aTablesUsed[1]
m.nTablesUsed = AUSED(aTablesUsed)
FOR i = 1 TO m.nTablesUsed
IF CURSORGETPROP("Buffering",aTablesUsed[m.i,1])>1
=TableRevert(.T.,aTablesUsed[m.i,1])
ENDIF
ENDFOR
ENDIF

* Вернитесь в первоначальное место
SELECT (THIS.Parent.OldAlias)
IF RECCOUNT() < THIS.Parent.OldRec &&added record at EOF()
GO TOP
ELSE
GO THIS.Parent.OldRec
ENDIF
ELSE

* Проверьте позволяется ли обновление
IF CURSORGETPROP("SourceType")#3 AND !CURSORGETPROP("offline") AND;
!CURSORGETPROP("SendUpdates")
lNoSendParentUpdates = .T.
ENDIF
IF !EMPTY(THIS.Parent.GridAlias) AND ;
CURSORGETPROP("SourceType",THIS.Parent.GridAlias)#3 AND ;
!CURSORGETPROP("offline",THIS.Parent.GridAlias) AND ;
!CURSORGETPROP("SendUpdates",THIS.Parent.GridAlias)
lNoSendChildUpdates= .T.
ENDIF

IF (m.lNoSendChildUpdates AND m.lNoSendParentUpdates) OR;
(EMPTY(THIS.Parent.GridAlias) AND m.lNoSendParentUpdates)
=MESSAGEBOX(C_NOUPDATE_LOC)
RETURN
ENDIF

THIS.Parent.OldAlias = ALIAS() &&сохранение псевдонима в случае возврата
THIS.Parent.OldRec = RECNO() &&сохранение записи в случае возврата
ENDIF

** Редактирование записей
THIS.Parent.EditMode = !THIS.Parent.EditMode
THIS.Parent.AddMode = .F.
THIS.Parent.ButtonRefresh()
THIS.Parent.NavRefresh()