ЛАБОРАТОРНАЯ РАБОТА (РАЗДЕЛ ОТЧЁТА) № 5. РАЗРАБОТКА И РАЗМЕЩЕНИЕ ПОДЧИНЁННЫХ ФОРМ

Лабораторная работа (раздел отчёта) № 5. Разработка и размещение подчинённых форм

Цель. Создание одиночной формы и размещение в ней подчинённой ленточной формы, синхронизация полей.

Порядок выполнения работы

1. Разработка формы Поставки по городам и подчинённой формы Поставки в город. Предлагаемая к разработке одиночная (простая, в один столбец) форма Поставки по городам (рис. 5) удобна для ввода, редактирования и просмотра поставок в отдельные города. Элемент Поставки в город является подчинённой формой (подформой) простой формы Поставки по городам. Подформу синхронизируем с формой по полю Город, чтобы в подформе отбирались лишь записи (поставки), соответствующие текущей записи (городу) в форме. Поле Код формы Поставки по городам будет основным, а подчинённым (внешним) – поле Город подформы. Благодаря этому в подформе будут отбираться записи о поставках в текущий город, представленный в форме.

Рис. 5. Одиночная форма Поставки по городам

Используя Мастер форм и разместив в Области данных все поля таблицы Города, создайте простую («в один столбец») форму Поставки по городам. Разместите в Заголовке формы текст «Информация по городу». Ленточную форму Поставки в город получите путём копирования формы Журнал поставок и удаления из новой формы кнопки Города.

2. Внедрение подчинённой формы, синхронизация полей. Откройте форму Поставки по городам в режиме конструктора, увеличьте размеры Области данных. На панели элементов при нажатой кнопке мастера нажмите кнопку «Подчинённая форма/отчёт» и мышью обозначьте в области данных формы прямоугольную область размещения подформы. Активизируется «Мастер подчинённых форм». В первом окне следует выбрать вариант (нажать кнопку выбора) «Имеющиеся формы» и выделить имя формы Поставки в город. В следующем окне выбрать из списка вариант «'<Инструкция SQL>' для каждой записи 'Города' поле связи 'Код'». Можно выбрать вариант «Самостоятельное определение», т.к. предлагаемые готовые варианты синхронизации могут оказаться «не понятными» или просто не подойти. При таком выборе вид окна изменится. В колонке «Поля формы или отчёта:» выбрать из списка поле Код, в колонке «Поля подчинённой формы или отчёта:» выбрать поле Город. В последнем окне Мастера оставьте предложенное для подформы имя «Поставки в город». Сохраните изменения и проверьте работу формы в режиме просмотра. В конструкторе формы просмотрите закладку Данные свойств подформы. Свойство Подчинённые поля должно содержать значение Город, свойство Основные поля – значение Код. Это и есть поля подформы и формы, по которым связываются и синхронизируются данные. Установка указанных свойств позволяет «вручную» синхронизировать форму и её подформу.

Замечание 1. Поле со списком Город после создания формы можно было бы удалить, но это не позволит менять подчинённость элементов ПС, для некоторых ПС эта операция часто оказывается необходимой. В данном случае имеется возможность изменить город поставки автомобилей.

Замечание 2. В форме Поставки по городам не удастся увидеть поставок, для которых не указан город, хотя ввод таких поставок возможен, но при переходе к следующей записи они «исчезают» (только для этой формы). Требуется разработка «особого механизма» и форм работы с такими поставками, или можно ограничиться формой Журнал поставок.

3. Придерживаясь порядка пунктов 1 и 2 работы, разработайте форму Поставки марок автомобилей с подчинённой формой Поставки (рис. 6).

Рис. 6. Одиночная форма Поставки марок автомобилей

4. В форме Журнал поставок Создайте кнопку Печать накладной на поставку и Печать журнала, по нажатию которых для предварительного просмотра печати выводятся соответствующие отчёты. Для печати  текущей накладной оператором Dim Тек№ объявите переменную глобального модульного листа VBA. Затем создайте программный обработчик события Текущая запись формы, добавив в него команду Тек№=№ . В отчёте по накладной в Источнике записей (им может быть копия запроса Записи журнала поставок) установите Условие отбора в виде =CurNo(). CurNo – глобальная функция с оператором  CurNo=Тек№, возвращающая значение Тек№.

5. Разработайте и подключите к кнопкам главной кнопочной формы макросы открытия форм Поставки по городам и Поставки марок автомобилей.