3.4. Используемые технические средства

Процессор – Intel 486 и выше.

Видеоадаптер – VGA.

Свободное место на жестком диске – не менее 1 Mb.

Оперативная память – 32 Mb.

3.5. Вызов и загрузка

Запуск программы осуществляется вызовом в командной строке файла

restoran.exe

3.6. Входные данные

Входной информацией являются:

Входная информация представляет собой ввод данных в следующую таблицу:

Наименование	Обозначение поля	Тип поля	Количество символов
Дата приема заказа	Data	Data	8
Номер официанта	Nomer_of	Numeric	2
Номер столика	Nomer_stola	Numeric	2
Номер заказа	Nomer_zak	Numeric	3
Закуски	Zakuski	Character	25
Горячие блюда	Goriachee	Character	25
Десерт	Desert	Character	25
Напитки	Napitki	Character	25
ФИО официанта	FIO_of	Character	30
Разряд	Razriad	Numeric	1

3.7. Выходные данные

Выходная информация будет получена в результате активизации пунктов меню «ПРОСМОТР», «ПЕЧАТЬ» и как результат поиска.

Она отображается на экране в виде таблицы:

Fio oficianta	Nomer oficianta	Razriad
Иванов	1	1
Петров	2	2
Сидоров	3	2
Соколов	4	1

4. ПРОГРАММА И МЕТОДИКА ИСПЫТАНИЙ

4.1. Объект испытаний

Наименование программы – «Ресторан»

Обозначение программы – restoran_prak.exe

Назначение разработки:

Предназначена для:

• для уменьшения возможности потери информации.

4.2. Цель испытаний

• автоматизации учета работы ресторана;

• для оперативного получения информации о имеющемся меню и работающих официантах;

4.3. Средства и порядок испытаний

Использованы следующие технические средства, необходимые для проведения испытаний: ПЭВМ Intel Pentium1, видео карта S3 2Mb, HDD – 2Gb, RAM – 32Mb.

Испытания были проведены путем нелогичной работы пользователя.

Текст программы

SET COLOR TO W+/N,N+,N,

DEACTIVATE MENU U

define menu u KEY ALT+Z

define pad A of u PROMPT 'БАЗА ДАННЫХ' AT 02,8

define pad B of u PROMPT 'КОРРЕКТИРОВКА' AT 02,24

define pad C of u PROMPT 'ПОИСК' AT 02,42

define pad D of u PROMPT 'ПЕЧАТЬ' AT 02,52

define pad G of u PROMPT 'ВЫХОД' AT 02,63

ON SELECTION PAD G OF U DO QU &&LEAR WINDOWS

DEFINE POPUP APOP FROM 3,7

DEFINE BAR 1 OF APOP PROMPT 'СОЗДАНИЕ ФАЙЛА ОФИЦИАНТ'

DEFINE BAR 2 OF APOP PROMPT 'СОЗДАНИЕ ФАЙЛА ЗАКУСКА'

DEFINE BAR 3 OF APOP PROMPT 'СОЗДАНИЕ ФАЙЛА МЕНЮ'

DEFINE BAR 4 OF APOP PROMPT 'ПРОСМОТР ФАЙЛА ОФИЦИАНТ'

DEFINE BAR 5 OF APOP PROMPT 'ПРОСМОТР ФАЙЛА ЗАКУСКА'

DEFINE BAR 6 OF APOP PROMPT 'ПРОСМОТР ФАЙЛА МЕНЮ'

ON SELECTION BAR 1 OF APOP DO СОЗДАНИЕ1

ON SELECTION BAR 2 OF APOP DO СОЗДАНИЕ2

ON SELECTION BAR 3 OF APOP DO СОЗДАНИЕ3

ON SELECTION BAR 4 OF APOP DO ПРОСМОТР1

ON SELECTION BAR 5 OF APOP DO ПРОСМОТР2

ON SELECTION BAR 6 OF APOP DO ПРОСМОТР3

DEFINE POPUP BPOP FROM 3,23

DEFINE BAR 1 OF BPOP PROMPT 'ДОБАВИТЬ ЗАПИСЬ'

DEFINE BAR 2 OF BPOP PROMPT 'ИЗМЕНИТЬ ЗАПИСЬ'

ON SELECTION BAR 1 OF BPOP DO ДОБАВЛЕНИЕ

ON SELECTION BAR 2 OF BPOP DO ИЗМЕНЕНИЕ

DEFINE POPUP CPOP FROM 3,41

DEFINE BAR 1 OF CPOP PROMPT 'ПО ФАЙЛУ 1'

DEFINE BAR 2 OF CPOP PROMPT 'ПО ФАЙЛУ 2'

DEFINE BAR 3 OF CPOP PROMPT 'ПО ФАЙЛУ 3'

ON SELECTION BAR 1 OF CPOP DO POISK

ON SELECTION BAR 2 OF CPOP DO POISKF

ON SELECTION BAR 3 OF CPOP DO POISKFAIL

DEFINE POPUP DPOP FROM 3,51

DEFINE BAR 1 OF DPOP PROMPT 'ФАЙЛА 1'

DEFINE BAR 2 OF DPOP PROMPT 'ФАЙЛА 2'

DEFINE BAR 3 OF DPOP PROMPT 'ФАЙЛА 3'

ON SELECTION BAR 1 OF DPOP DO PRI

ON SELECTION BAR 2 OF DPOP DO PRIN

ON SELECTION BAR 3 OF DPOP DO PRINT

ON PAD A OF U ACTIVATE POPUP APOP

ON PAD B OF U ACTIVATE POPUP BPOP

ON PAD C OF U ACTIVATE POPUP CPOP

ON PAD D OF U ACTIVATE POPUP DPOP

ACTIVATE MENU U

PROCEDURE СОЗДАНИЕ1

SET SAFETY OFF

USE ПРАКТИКА

ZAP

APPEND

CLOSE DATABASES

RETURN

PROCEDURE СОЗДАНИЕ2

SET SAFETY OFF

USE PRAKTIKA

ZAP

APPEND

CLOSE DATABASES

RETURN

PROCEDURE СОЗДАНИЕ3

SET SAFETY OFF

USE TRPO

ZAP

APPEND

CLOSE DATABASES

RETURN

PROCEDURE ПРОСМОТР1

USE ПРАКТИКА

BROWSE

CLOSE DATABASES

RETURN

PROCEDURE ПРОСМОТР2

USE PRAKTIKA

BROWSE

CLOSE DATABASES

RETURN

PROCEDURE ПРОСМОТР3

USE TRPO

BROWSE

CLOSE DATABASES

RETURN

PROCEDURE ДОБАВЛЕНИЕ

N=0

CLEAR

@ 1,1 SAY '№ ФАЙЛА'

@ 2,1 GET N

READ

CLEAR

IF N=1

USE ПРАКТИКА

ENDIF

IF N=2

USE PRAKTIKA

ENDIF

IF N=3

USE TRPO

ENDIF

APPEND

CLOSE DATABASES

RETURN

PROCEDURE ИЗМЕНЕНИЕ

N=0

CLEAR

@ 1,1 SAY '№ ФАЙЛА'

@ 2,1 GET N

READ

CLEAR

IF N=1

USE ПРАКТИКА

ENDIF

IF N=2

USE PRAKTIKA

ENDIF

IF N=3

USE TRPO

ENDIF

CHANGE

CLOSE DATABASES

RETURN

PROCEDURE PRI

USE ПРАКТИКА

SET CONSOLE OFF

SET PRINTER ON

DISPLAY ALL

SET PRINTER OFF

SET CONSOLE ON

RETURN

PROCEDURE PRIN

USE PRAKTIKA

SET CONSOLE OFF

SET PRINTER ON

DISPLAY ALL

SET PRINTER OFF

SET CONSOLE ON

RETURN

PROCEDURE PRINT

USE TRPO

SET CONSOLE OFF

SET PRINTER ON

DISPLAY ALL

SET PRINTER OFF

SET CONSOLE ON

RETURN

PROCEDURE POISK

CHIT=' '

@ 0,1 SAY 'ВВЕДИТЕ ФАМИЛИЮ ОФИЦИАНТА'

@ 1,1 GET CHIT

READ

SELECT * FROM ПРАКТИКА WHERE SPEC=CHIT

CLOSE DATABASES

RETURN

PROCEDURE POISKF

CHIT=' '

@ 0,1 SAY 'ВВЕДИТЕ НОМЕР СТОЛА'

@ 1,1 GET CHIT

READ

SELECT * FROM PRAKTIKA WHERE SPEC=CHIT

CLOSE DATABASES

RETURN

PROCEDURE POISKFAIL

CHIT=' '

@ 0,1 SAY 'ВВЕДИТЕ ЭЛЕМЕНТ МЕНЮ'

@ 1,1 GET CHIT

READ

SELECT * FROM TRPO WHERE SPEC=CHIT

CLOSE DATABASES

RETURN

PROCEDURE QU

CLEAR

DEACTIVATE MENU U

CLEAR

RETURN