Предметы раздела

ИВТ [13]
Химия [2]
Философия [1]

Лабораторная работа N7 (отчет) - 3 вариант


Преподаватель: Соболева В. П.

Скачать Лабораторная работа N7 (отчет) - 3 вариант Скачать (13.8Kb)

Цели и задачи лабораторной работы

 

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

         Для выполнения работы студент располагает аудиторным временем в объеме 8 часов и самостоятельной работой в объеме 4 часов.

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

 

Самостоятельная работа

 

1.     Изучить возможности СУБД Visual FoxPro:

- для конструирования отчета по заданной форме (команды Create  Report, Modify Report);

- для поиска нужных записей (команды Locate, Seek);

- для вывода созданной формы отчета (команда Report format).

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

INDEX ON time TO bd1

LOCATE FOR station=stan

IF FOUND()

repo form report_only for station=stan

ELSE

CLEAR

@ 9,10 Say 'Станций на букву "'+stan+'" не найдено'

ENDIF

USE

 

Результат работы программы, при вводе буквы “М”: (внутри отчета есть)

 



Просмотров: 435|Загрузок: 130| Добавил: Ultra | Рейтинг: [0.0]/0 |
Всего комментариев: 0
Имя *:
Email:
Код *:
Студенты Ижевска, студенческий сайт - «IzhStud.ru»

Логин:
Пароль:
Темы форума
  • Партнерка от Казино Рулетка.


  • Можно ли заработать в интернете?


  • Иностранные языки


  • Ваши пожелания по работе с сайтом и форумом


  • Неужели у нас так мало людей которые пишут...


  • Последние добавления
    (20.07.2010) [Региональная экономика]
    Инженерно -геодезические изыскания
    (08.02.2010) [Статистика]
    Статистическая оценка динамики (2-ая работа по статистике)
    (08.02.2010) [Статистика]
    Статистическая оценка совокупности (1-ая работа по статистике)
    (26.01.2010) [Основы предпринимательской деятельности]
    Итоговая работа
    (25.01.2010) [Математика]
    Типовой расчет N2
    (19.01.2010) [Математика]
    ТИПОВОЙ РАСЧЕТ №3 ПРЕДЕЛЫ страница 5
    Последние записи
    (01.11.2009) [SEO]
    SEO или поисковая оптимизация сайтов
    (29.10.2009) [Прочие способы заработка]
    Как зарабатывать на файлообменниках?
    (18.10.2009) [Копирайтинг/Постинг]
    Постинг на форумах
    (18.10.2009) [Электронные деньги]
    Как создать кошелек на webmoney?
    Программы
    (04.11.2009) [Полезные программы]
    Офис 2007
    (22.10.2009) [Программы для учебы]
    Visual FoxPro 7
    (16.10.2009) [Полезные программы]
    NOD32 с кряком
    Поиск по сайту
    На правах рекламы
    Рекламные ссылки:
    WebVisor: анализ посетителей сайта Рейтинг@Mail.ru Rambler's Top100