Другие предметы \ Базы данных

Создание базы данных с таблицами и заполнение их информацией (контрольная работа), страница 8

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

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

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

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

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

Скачать файл