Предыдущая страница реферата | 1  2  3  4  5  6  7  8  9  10  11 | Следующая страница реферата

В среде СУБД типа Fox каждая подзадача может оформляться в виде отдельного командного файла с расширением .prg и заканчиваться оператором возврата в вызывающий командный файл.

В данном случае основным командным файлом является файл MainMenu.prg, который формирует полное экранное меню и осуществляет вызов других командных файлов, в зависимости от выбранного пункта меню:
|CreateFd.prg |– создание файла данных; |
|ReadFd.prg |– чтение созданного файла данных; |
|AddFd.prg |– добавление данных в созданный файл данных; |
|Zad1.prg |– выдача сведений о суммарной стоимости продукции|
| |заданного вида по каждому предприятию и о среднем|
| |выпуске этой продукции одним предприятием; |
|Zad2.prg |– выдача сведений о суммарной стоимости и |
| |суммарном выпуске каждой продукции; |
|Zad3.prg |– выдача на печать продукции пяти видов в порядке|
| |возрастания ее суммарной стоимости. |

Кроме того, необходимо предоставить пользователю возможность облегчить процесс создания файла данных, т.е. предусмотреть создание файла данных со структурой заданной в программе, а не выбираемой самим пользователем, что полностью исключит возможные ошибки пользователя в задании имен полей файла данных, что в сою очередь может сказаться на корректной работе всей программы.

Алгоритмы

1 Создание двухуровневого светового меню

2 Создание файла данных

3 Чтение файла данных

4 Добавление данных в файл данных

5 Печать сведений о суммарной стоимости продукции заданного вида по каждому предприятию и о среднем выпуске этой продукции одним предприятием.

6 Печать сведений о суммарной стоимости и суммарном выпуске каждой продукции.

7 Печать упорядоченного по суммарной стоимости списка продукции пяти видов

Программы

1 Создание двухуровневого светового меню

* Командный файл иерархического меню MainMenu set Talk off set Color to n/W* && Выбор цвета экрана
Clear

* Описание массивов данных меню
Declare GenMenu(3,2), menuFile(3), menuZad(3), menuExit(2)

* Задание значений элементов массивов
GenMenu(1,1)=" Файл данных "
GenMenu(1,2)="Работа с файлом данных"
GenMenu(2,1)=" Задание "
GenMenu(2,2)="Задания на курсовой проект"
GenMenu(3,1)=" Выход "
GenMenu(3,2)="Выход из программы"

menuFile(1)="Создание" menuFile(2)="Чтение" menuFile(3)="Добавление"

menuZad(1)="Задание №1" menuZad(2)="Задание №2" menuZad(3)="Задание №3"

menuExit(1)="Выход в Fox" menuExit(2)="Выход из Fox"

* Формировние главного меню
Do While .T. set Color to gr+/g, gr+/b && Установка цвета меню

Menu Bar GenMenu, 3

Read Menu Bar to L1, L2 && Вывод главного меню на экран

Do While L1 > 0 && открыть подменю, если выбран

&& любой пункт главного меню

* Формирование подменю set Color to gr+/g, gr+/b && Установка цвета подменю

Рекомендуем скачать другие рефераты по теме: инновационный менеджмент, курсовая работа.





Предыдущая страница реферата | 1  2  3  4  5  6  7  8  9  10  11 | Следующая страница реферата