POP KEY

RETURN CHRTRAN(p,s,z)

ENDIF

POP KEY

RETURN

PROCEDURE EndProc

PARAMETER y

DO CASE

CASE BAR() =1. OR. y=1

ON KEY

SET HELP ON

SET RELATION TO

SET FILTER TO

DEACTIVATE WINDOW ALL

DEACTIVATE MENU

DEACTIVATE POPUP

CLEAR ALL

CANCEL

CASE BAR() =2. OR. y=2

QUIT

ENDCASE

POP KEY

CLOSE DATABASES

RETURN

Список использованной литературы

1. Четвериков В.Н, Ревунков Г.И., Самохволов Э.Н. Базы и банки данных.