Лабораторная
работа предназначена для получения навыков работы с конструктором отчетов и
программирования вывода отчета по созданной форме.
Для выполнения
работы студент располагает аудиторным временем в объеме 8 часов и
самостоятельной работой в объеме 4 часов.
Освоение
лекционного материала, необходимого для выполнения лабораторной работы,
приобретенные навыки проверяются преподавателем путем проверки задания и
контрольных вопросов.
Самостоятельная
работа
1.Изучить
возможности СУБД VisualFoxPro:
- для конструирования отчета по
заданной форме (команды CreateReport, ModifyReport);
- для поиска нужных записей
(команды Locate, Seek);
- для вывода созданной формы
отчета (команда Reportformat).
2.Составить
программу для организации вывода отчета по cозданной форме.
Содержание и указания
по выполнению лабораторной работы
Задание:
Получить
перечень поездов, следующих до задаваемой станции назначения, упорядоченный по
времени отправления, по форме:
Список поездов
Станция назначения …
№ поезда
Время отправления
Наличие билетов
.
.
.
Всего
поездов
S
При отсутствии поездов – выдать
сообщение.
Алгоритм выполнения
программы:
1)Открыть БД – bd.dbf
2)Организовать
ввод первой буквы необходимой(-ых) станций
3)Упорядочить
БД по времени отправления
4)Произвести
последовательный поиск по БД всех станций, начинающихся на введенную букву
5)Если
хотя бы одна станция найдена, вывести отчет, форма, которого создана в файле report_only.frx
6)Иначе
вывести сообщение о том, что станций на введенную букву не было найдено.
7)Закрыть
БД bd.dbf
Текстпрограммы:
CLEAR
USE bd
stan=SPACE(1)
@ 8, 10 Say
'Введитепервуюбукву' get stan pict'x'
READ
INDEXON time TO bd1
LOCATE FOR
station=stan
IF FOUND()
repo form
report_only for station=stan
ELSE
CLEAR
@ 9,10 Say'Станций на букву "'+stan+'" не найдено'
ENDIF
USE
Результат работы
программы, при вводе буквы “М”: (внутри отчета есть)