Распечатка текстов программ и «твердые копии» форм документа

Русский Муниципальный Открытый

Технический Институт Путей Сообщения

факультет

Управление процессами перевозок

кафедра

Вычислительная техника

Контрольная работа

По дисциплине

Базы данных

Выполнил: студент 5 курса Ермолина Н.М. шифр 0445-п/ИСЖ-1072 Дата ____________ Подпись _________
Проверил:Канд.тех.наук доцент Коптева Л.Г. оценка __________ Дата ____________ Подпись _________


Москва 2008

Задание на курсовую работу

В курсовой работе нужно:

1. Сделать БД:

- сделать таблицу;

- заполнить ее данными по Распечатка текстов программ и «твердые копии» форм документа собственному усмотрению (число записей должно быть 20:25).

2. Составить главный форму, в какой предугадать задание головного меню системы.

3. Составить нужные формы по обработке данных.

4. Сделать формы по формированию и выводу документов на принтер.

5. Сделать аннотацию юзера по работе с разработанным приложением.

Объяснительная записка к курсовой работе должна содержать:

· задание и начальные Распечатка текстов программ и «твердые копии» форм документа данные;

· структуру начальной базы данных;

· блок – схему метода реализации;

· листинги форм;

· «твердые копии» форм документов.


Вариант 2

1. Сделать БД, имеющий последующие поля: фамилия, имя, отчество, год рождения, кафедра, должность, учебная нагрузка (в часах), лекции (в часах), консультации (в часах), практические занятия (в часах), лабораторные работы (в часах), курсовые работы (в часах Распечатка текстов программ и «твердые копии» форм документа).

2. Основная форма должна содержать меню информационно-справочной системы «Досье учебного отдела»:

· поиск и сортировка данных;

· просмотр;

· и редактирование БД;

· вывод на печать;

· выход.

3. В форме (2) должны находиться кнопки:

· «Просмотреть»;

· «Редактировать»;

· «Выйти».

4. В форме печати справок (данных) по:

· фамилиям;

· кафедрам;

· должностям

Должны находиться кнопки-переключатели «Просмотр перед печатью» и «Печать номеров строк Распечатка текстов программ и «твердые копии» форм документа».


Структура начальной базы данных

Наименование поля Тип поля Количество знаков в поле Количество символов после запятой
stroka Integer (Autoincrement)
family Character -
name Character -
otchest Character -
yearbir Integer -
kafed Character -
dolzhnost Character -
nagruzka Numeric
lekcii Numeric
konsult Numeric
pracktik Numeric
laborator Numeric
kursof Numeric


Блок – схема метода реализации

Распечатка текстов программ Распечатка текстов программ и «твердые копии» форм документа и «твердые копии» форм документа

Рис 1. Основная форма

Программный код, выполняемый при нажатии на кнопку «Поиск и сортировка данных»:

DO FORM "d:\users\пк\documents\visual foxpro projects\ермолина\поиск и сортировка.scx"

Программный код, выполняемый при нажатии на кнопку «Просмотр и редактирование БД»:

DO FORM "d:\users\пк\documents\visual foxpro projects Распечатка текстов программ и «твердые копии» форм документа\ермолина\просмотр.scx"

Программный код, выполняемый при нажатии на кнопку «Вывод на печать»:

DO FORM "d:\users\пк\documents\visual foxpro projects\ермолина\печать.scx"

Программный код, выполняемый при нажатии на кнопку «Выход»:

THISFORM.Release

Рис 2. Форма «Поиск и сортировка»

Программный код, выполняемый при нажатии на кнопку «Поиск»:

SELECT Table Распечатка текстов программ и «твердые копии» форм документа_уебного_отдела.stroka,; Table_уебного_отдела.family+Table_уебного_отдела.name+Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table_уебного_отдела.kafed,;

Table_уебного_отдела.dolzhnost, Table_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika, Table_уебного_отдела Распечатка текстов программ и «твердые копии» форм документа.laborator,;

Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

WHERE Table_уебного_отдела.family=thisform.text1.Value OR Table_уебного_отдела.name=thisform.text1.Value;

OR Table_уебного_отдела.otchest=thisform.text1.Value OR Table_уебного_отдела.kafed=thisform.text1.Value;

OR Table_уебного Распечатка текстов программ и «твердые копии» форм документа_отдела.dolzhnost=thisform.text1.Value;

ORDER BY Table_уебного_отдела.stroka

Рис 3. Итог поиска.

Программный код, выполняемый при нажатии на кнопку «Сортировать»:

IF Thisform.Combo1.Value='строке'then

SELECT Table_уебного_отдела.stroka, Table_уебного_отдела.family,;

Table_уебного_отдела.name, Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table_уебного_отдела.kafed Распечатка текстов программ и «твердые копии» форм документа,;

Table_уебного_отдела.dolzhnost, Table_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika, Table_уебного_отдела.laborator,;

Table_уебного_отдела.kursov;

FROM;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

ORDER BY Table_уебного_отдела.stroka

ENDIF

IF Thisform.Combo Распечатка текстов программ и «твердые копии» форм документа1.Value='Фамилия'then

SELECT Table_уебного_отдела.stroka,;

Table_уебного_отдела.family+Table_уебного_отдела.name+Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table_уебного_отдела.kafed,;

Table_уебного_отдела.dolzhnost, Table_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika, Table_уебного_отдела.laborator,;

Table Распечатка текстов программ и «твердые копии» форм документа_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

ORDER BY Table_уебного_отдела.family

ENDIF

IF Thisform.Combo1.Value='имя'then

SELECT Table_уебного_отдела.stroka, Table_уебного_отдела.family,;

Table_уебного_отдела.name, Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table_уебного_отдела.kafed,;

Table Распечатка текстов программ и «твердые копии» форм документа_уебного_отдела.dolzhnost, Table_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika, Table_уебного_отдела.laborator,;

Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

ORDER BY Table_уебного_отдела.name;

ENDIF

IF Thisform.Combo Распечатка текстов программ и «твердые копии» форм документа1.Value='очество'then

SELECT Table_уебного_отдела.stroka, Table_уебного_отдела.family,;

Table_уебного_отдела.name, Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table_уебного_отдела.kafed,;

Table_уебного_отдела.dolzhnost, Table_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika, Table_уебного_отдела.laborator,;

Table Распечатка текстов программ и «твердые копии» форм документа_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

ORDER BY Table_уебного_отдела.otchest;

ENDIF

IF Thisform.Combo1.Value='год рождения'then

SELECT Table_уебного_отдела.stroka, Table_уебного_отдела.family,;

Table_уебного_отдела.name, Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table Распечатка текстов программ и «твердые копии» форм документа_уебного_отдела.kafed,;

Table_уебного_отдела.dolzhnost, Table_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika, Table_уебного_отдела.laborator,;

Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

ORDER BY Table_уебного_отдела.yearbir;

ENDIF

IF Thisform.Combo Распечатка текстов программ и «твердые копии» форм документа1.Value='кафедра'then

SELECT Table_уебного_отдела.stroka,;

Table_уебного_отдела.kafed, Table_уебного_отдела.dolzhnost,;

Table_уебного_отдела.family, Table_уебного_отдела.name,;

Table_уебного_отдела.otchest, Table_уебного_отдела.yearbir,;

Table_уебного_отдела.nagruzka, Table_уебного_отдела.lekcii,;

Table_уебного_отдела.koncult, Table_уебного_отдела.praktika,;

Table_уебного_отдела Распечатка текстов программ и «твердые копии» форм документа.laborator, Table_уебного_отдела.kursov; FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

ORDER BY Table_уебного_отдела.kafed;

ENDIF

IF Thisform.Combo1.Value='должность'then

SELECT Table_уебного_отдела.stroka,;

Table_уебного_отдела.dolzhnost+Table_уебного_отдела.kafed,;

Table_уебного_отдела.family+Table_уебного_отдела Распечатка текстов программ и «твердые копии» форм документа.name+Table_уебного_отдела.otchest,; Table_уебного_отдела.nagruzka, Table_уебного_отдела.lekcii,; Table_уебного_отдела.koncult, Table_уебного_отдела.praktika,; Table_уебного_отдела.laborator, Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

ORDER BY Table_уебного_отдела.dolzhnost;

ENDIF

IF Thisform.Combo1.Value Распечатка текстов программ и «твердые копии» форм документа='нагрузка'then

SELECT Table_уебного_отдела.stroka, Table_уебного_отдела.family,;

Table_уебного_отдела.name, Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table_уебного_отдела.kafed,;

Table_уебного_отдела.dolzhnost, Table_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika, Table_уебного_отдела.laborator Распечатка текстов программ и «твердые копии» форм документа,;

Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

ORDER BY Table_уебного_отдела.nagruzka;

ENDIF

IF Thisform.Combo1.Value='лекции'then

SELECT Table_уебного_отдела.stroka, Table_уебного_отдела.family,;

Table_уебного_отдела.name, Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table_уебного_отдела.kafed Распечатка текстов программ и «твердые копии» форм документа,;

Table_уебного_отдела.dolzhnost, Table_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika, Table_уебного_отдела.laborator,;

Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

ORDER BY Table_уебного_отдела.lekcii;

ENDIF

IF Thisform.Combo Распечатка текстов программ и «твердые копии» форм документа1.Value='консультации'then

SELECT Table_уебного_отдела.stroka, Table_уебного_отдела.family,;

Table_уебного_отдела.name, Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table_уебного_отдела.kafed,;

Table_уебного_отдела.dolzhnost, Table_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika, Table_уебного_отдела.laborator Распечатка текстов программ и «твердые копии» форм документа,;

Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

ORDER BY Table_уебного_отдела.konsult;

ENDIF

IF Thisform.Combo1.Value='практика'then

SELECT Table_уебного_отдела.stroka, Table_уебного_отдела.family,;

Table_уебного_отдела.name, Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table_уебного_отдела Распечатка текстов программ и «твердые копии» форм документа.kafed,;

Table_уебного_отдела.dolzhnost, Table_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika, Table_уебного_отдела.laborator,;

Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

ORDER BY Table_уебного_отдела.pracktik;

ENDIF

IF Thisform.Combo1.Value='лабораторные Распечатка текстов программ и «твердые копии» форм документа'then

SELECT Table_уебного_отдела.stroka,;

Table_уебного_отдела.dolzhnost+Table_уебного_отдела.kafed,;

Table_уебного_отдела.family+Table_уебного_отдела.name+Table_уебного_отдела.otchest,;Table_уебного_отдела.nagruzka,; Table_уебного_отдела.lekcii,; Table_уебного_отдела.koncult, Table_уебного_отдела.praktika,; Table_уебного_отдела.laborator, Table_уебного_отдела Распечатка текстов программ и «твердые копии» форм документа.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

ORDER BY Table_уебного_отдела.laborator;

ENDIF

IF Thisform.Combo1.Value='курсовик'then

SELECT Table_уебного_отдела.stroka, Table_уебного_отдела.family,;

Table_уебного_отдела.name, Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table_уебного_отдела.kafed,;

Table_уебного Распечатка текстов программ и «твердые копии» форм документа_отдела.dolzhnost, Table_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika, Table_уебного_отдела.laborator,;

Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

ORDER BY Table_уебного_отдела.kursof;

ENDIF

Рис 4. Итог сортировки по кафедрам.

Программный Распечатка текстов программ и «твердые копии» форм документа код, выполняемый при нажатии на кнопку «Выход»:

thisform.Releas

Рис 5. Форма «Просмотр и редактирование БД»

Программный код, выполняемый при нажатии на кнопку «Просмотреть»:

SELECT Table_уебного_отдела.stroka,;

Table_уебного_отдела.family+Table_уебного_отдела.name+Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table_уебного_отдела.kafed,;

Table_уебного_отдела.dolzhnost Распечатка текстов программ и «твердые копии» форм документа, Table_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika, Table_уебного_отдела.laborator,;

Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

ORDER BY Table_уебного_отдела.family

Рис 6. Форма «Просмотреть»

Программный код, выполняемый при Распечатка текстов программ и «твердые копии» форм документа нажатии на кнопку «Редактировать»:

DO FORM "d:\users\пк\documents\visual foxpro projects\ермолина\досье уебного отдела.scx"

thisform.Release

Рис 7. Форма «Редактирования»

Программный код, выполняемый при нажатии на кнопку «Выход»:

thisform.Release

Рис 7. Форма «Печать справок»

Программный код, выполняемый при нажатии на кнопку «По фамилиям»:

IF thisform.Check2.Value=1 then

IF thisform.Check Распечатка текстов программ и «твердые копии» форм документа1.Value=1 then

SELECT Table_уебного_отдела.stroka,; Table_уебного_отдела.family+Table_уебного_отдела.name+Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table_уебного_отдела.kafed,;

Table_уебного_отдела.dolzhnost, Table_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika, Table_уебного Распечатка текстов программ и «твердые копии» форм документа_отдела.laborator,;

Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

REPORT FORM по фамилиям PREVIEW

ENDIF

SELECT Table_уебного_отдела.stroka,; Table_уебного_отдела.family+Table_уебного_отдела.name+Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table_уебного_отдела.kafed,;

Table_уебного_отдела.dolzhnost, Table Распечатка текстов программ и «твердые копии» форм документа_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika, Table_уебного_отдела.laborator,;

Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

REPORT FORM по фамилиям

TO PRINTER PROMPT

ELSE

IF thisform.Check1.Value=1 then

SELECT Table_уебного_отдела.family Распечатка текстов программ и «твердые копии» форм документа+Table_уебного_отдела.name+Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table_уебного_отдела.kafed,;

Table_уебного_отдела.dolzhnost, Table_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika, Table_уебного_отдела.laborator,;

Table_уебного_отдела.kursov;

FROM ;

"досье учебного Распечатка текстов программ и «твердые копии» форм документа отдела!table уебного отдела" Table_уебного_отдела;

REPORT FORM по фамилиям PREVIEW

ENDIF

SELECT Table_уебного_отдела.family+Table_уебного_отдела.name+Table_уебного_отдела.otchest,;

Table_уебного_отдела.yearbir, Table_уебного_отдела.kafed,;

Table_уебного_отдела.dolzhnost, Table_уебного_отдела.nagruzka,;

Table_уебного_отдела.lekcii, Table_уебного_отдела.koncult,;

Table_уебного_отдела.praktika Распечатка текстов программ и «твердые копии» форм документа, Table_уебного_отдела.laborator,;

Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

REPORT FORM по фамилиям

TO PRINTER PROMPT

ENDIF

Рис 8. Форма «Печать по фамилии»

Программный код, выполняемый при нажатии на кнопку «По кафедрам»:

IF thisform.Check2.Value=1 then

IF thisform.Check1.Value Распечатка текстов программ и «твердые копии» форм документа=1 then

SELECT Table_уебного_отдела.stroka,;

Table_уебного_отдела.kafed+Table_уебного_отдела.dolzhnost,;

Table_уебного_отдела.family, Table_уебного_отдела.name,;

Table_уебного_отдела.otchest, Table_уебного_отдела.yearbir,;

Table_уебного_отдела.nagruzka, Table_уебного_отдела.lekcii,;

Table_уебного_отдела.koncult, Table_уебного_отдела.praktika,;

Table_уебного_отдела.laborator, Table_уебного Распечатка текстов программ и «твердые копии» форм документа_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

REPORT FORM по каф PREVIEW

ENDIF

SELECT Table_уебного_отдела.stroka,;

Table_уебного_отдела.kafed+Table_уебного_отдела.dolzhnost,;

Table_уебного_отдела.family, Table_уебного_отдела.name,;

Table_уебного_отдела.otchest, Table_уебного_отдела.yearbir,;

Table_уебного Распечатка текстов программ и «твердые копии» форм документа_отдела.nagruzka, Table_уебного_отдела.lekcii,;

Table_уебного_отдела.koncult, Table_уебного_отдела.praktika,;

Table_уебного_отдела.laborator, Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

REPORT FORM по каф

TO PRINTER PROMPT

ELSE

IF thisform.Check1.Value=1 then

SELECT Table_уебного_отдела.kafed+Table_уебного Распечатка текстов программ и «твердые копии» форм документа_отдела.dolzhnost,;

Table_уебного_отдела.family, Table_уебного_отдела.name,;

Table_уебного_отдела.otchest, Table_уебного_отдела.yearbir,;

Table_уебного_отдела.nagruzka, Table_уебного_отдела.lekcii,;

Table_уебного_отдела.koncult, Table_уебного_отдела.praktika,;

Table_уебного_отдела.laborator, Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела Распечатка текстов программ и «твердые копии» форм документа" Table_уебного_отдела;

REPORT FORM по каф PREVIEW

ENDIF

SELECT Table_уебного_отдела.kafed+Table_уебного_отдела.dolzhnost,;

Table_уебного_отдела.family, Table_уебного_отдела.name,;

Table_уебного_отдела.otchest, Table_уебного_отдела.yearbir,;

Table_уебного_отдела.nagruzka, Table_уебного_отдела.lekcii,;

Table_уебного_отдела.koncult, Table_уебного_отдела.praktika,;

Table_уебного_отдела Распечатка текстов программ и «твердые копии» форм документа.laborator, Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

REPORT FORM по каф

TO PRINTER PROMPT

ENDIF

Рис 9. Форма «Печать по кафедрам»

Программный код, выполняемый при нажатии на кнопку «По должностям»:

IF thisform.Check2.Value=1 then

IF thisform.Check1.Value=1 then

SELECT Table_уебного_отдела Распечатка текстов программ и «твердые копии» форм документа.stroka,; Table_уебного_отдела.dolzhnost+Table_уебного_отдела.kafed,;

Table_уебного_отдела.family+Table_уебного_отдела.name+Table_уебного_отдела.otchest,;

Table_уебного_отдела.nagruzka, Table_уебного_отдела.lekcii,;

Table_уебного_отдела.koncult, Table_уебного_отдела.praktika,;

Table_уебного_отдела.laborator, Table_уебного_отдела.kursov;

FROM ;

"досье учебного Распечатка текстов программ и «твердые копии» форм документа отдела!table уебного отдела" Table_уебного_отдела;

REPORT FORM по должностям PREVIEW

ENDIF

SELECT Table_уебного_отдела.stroka,; Table_уебного_отдела.dolzhnost+Table_уебного_отдела.kafed,; Table_уебного_отдела.family+Table_уебного_отдела.name+Table_уебного_отдела.otchest,;

Table_уебного_отдела.nagruzka, Table_уебного_отдела.lekcii,;

Table_уебного_отдела.koncult, Table_уебного Распечатка текстов программ и «твердые копии» форм документа_отдела.praktika,;

Table_уебного_отдела.laborator, Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

REPORT FORM по должностям PREVIEW

TO PRINTER PROMPT

ELSE

IF thisform.Check1.Value=1 then

SELECT Table_уебного_отдела.dolzhnost+Table_уебного_отдела.kafed,;

Table_уебного_отдела.family+Table_уебного_отдела.name+Table_уебного_отдела Распечатка текстов программ и «твердые копии» форм документа.otchest,;

Table_уебного_отдела.nagruzka, Table_уебного_отдела.lekcii,;

Table_уебного_отдела.koncult, Table_уебного_отдела.praktika,;

Table_уебного_отдела.laborator, Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

REPORT FORM по должностям PREVIEW

ENDIF

SELECT Table_уебного_отдела.dolzhnost+Table_уебного_отдела.kafed,; Table Распечатка текстов программ и «твердые копии» форм документа_уебного_отдела.family+Table_уебного_отдела.name+Table_уебного_отдела.otchest,;

Table_уебного_отдела.nagruzka, Table_уебного_отдела.lekcii,;

Table_уебного_отдела.koncult, Table_уебного_отдела.praktika,;

Table_уебного_отдела.laborator, Table_уебного_отдела.kursov;

FROM ;

"досье учебного отдела!table уебного отдела" Table_уебного_отдела;

REPORT FORM по должностям Распечатка текстов программ и «твердые копии» форм документа PREVIEW

TO PRINTER PROMPT

ENDIF

Рис 7. Форма «Печать по должностям»

Программный код, выполняемый при нажатии на кнопку «Выход»:

THISFORM.Release


Вариант 2

Составьте запрос, который выбирает меньший заказ каждого покупателя.

Таблица Заказы

Таблица Покупки

Решение:

Запрос, который выбирает меньший заказ каждого покупателя будет смотреться так:

SELECT MIN(Заказы.amt), Заказы.cnum, Покупки.cname, Покупки.city;

FROM Распечатка текстов программ и «твердые копии» форм документа ;

заказы;

INNER JOIN покупки ;

ON Заказы.cnum = Покупки.cnum;

GROUP BY Заказы.cnum, Покупки.city, Покупки.cname

Применяемая литература.

  1. Омельченко Л.Н. «Самоучитель Visual Foxpro 8”. СПб.: БХВ-Петербург, 2003. – 688с.: ил.
  2. Коптева Л.Г. Базы данных. Рабочая программка, управление к лабораторным работам и задание на контрольную работу с методическими указаниями Распечатка текстов программ и «твердые копии» форм документа. М.: РГОТУПС, 1997 – 18с.


rashodi-po-komandirovaniyu-proezd-strahovka-prozhivanie-i-pitanie-uchastnikov-sorevnovanij-nesut-komandiruyushie-organizacii.html
rashodi-po-podgotovke-i-provedeniyu-kubka-proizvodyatsya-za-schyot-organizatorov-kubka-i-inih-privlechyonnih-sredstv.html
rashodi-po-soderzhaniyu-i-ekspluatacii-transportnih-sredstv.html