LINEBURG


<< Пред. стр.

страница 70
(всего 83)

ОГЛАВЛЕНИЕ

След. стр. >>


* Загопшок ферпы
•обяасв» данных
Да*апйтаи?«Кин4
'id Дата пост
SHTtj
feafpyrmbiOC | код группы ', Ой
Дата спис
•"^,"^^3 Датаошаняя.. ..
Начальный « « к
НзйявнвеаНМе Наименование •Начальный и з н | Н в щ ^ д я ^ и ^ Т » ' [номер док
таЩОС j группы ОС «акопданныйиягас Накопленный и -Иг([Годовая t
Масйчный износ;
*адовдя нориа Годовая н Сц^Йрмыи npeSef
Суммарный прс t^<tlCMam<rvmn ^[Начальная п (
амортизации
Норма Норма авт} Kef*K«pre4«? ˜ ^ К а р т о ч к а Ос[

КавточвнОС]^»5(1»ваф«^ ^(аожгеЙЕТИКа j
,<™„^˜ —п *˜
„ .Л Ж.1 „V _.V. V-
л Л Л

Характеристика ОС

>,>,-.
* ^ * •• i 4. «
4 !
"- • > » J
7' ^J
>7 t
Л 1.7: •
••^•^•узд.-;
> -f fattKvma&e&bt4 **.ч*..гъь.
Р&цеемдаяв тиежщв^Шша^^/^'о!!^^ j ''^ит(]начаг»('
-Sum([Ha4an3 t

Рис. 7.28. Макет главной формы Объект ОС
573
Основные понятия СУБД Access


О для вычисления стоимости начального износа всех инвентарных объектов
ОС в области Примечание формы главной формы вставить вычисляемое
поле, указать свойства: Данные: = БитЦНачальный износ]), Формат поля —
Денежный, Доступ — Нет, Блокировка — Да; надпись поля — Начальный из­
нос ОС;
О для вычисления стоимости накопленного износа всех инвентарных объек­
тов ОС в области Примечание формы главной формы вставить вычисляе­
мое поле, указать свойства: Данные: = БитЦНакопленный износ]), Формат
поля — Денежный, Доступ — Нет, Блокировка — Да; надпись поля — Накоп­
ленный износ ОС;
О для вычисления остаточной стоимости всех инвентарных объектов ОС в
области Примечание формы главной формы вставить вычисляемое поле,
указать свойства: Данные: = 5ит([Начальная СТОИМОСТЬ]- [Начальный износ]
-№([Накопленный износ])), Формат поля — Денежный, Доступ — Нет, Блоки­
ровка — Да; надпись поля — Остаточная стоимость ОС.
9. Выполнить настройку подчиненной формы Карточка ОС (рис. 7.29):
О удалить поля Фамилия, Имя, Отчество; в область Данные для вывода фами­
лии и инициалов МОЛ вставить вычисляемое поле, свойства Данные: ^Фа­
милия] & " " & 1_еп([Имя];1) & ". " & 1_еп([Отчество];1) & "."; Доступ — Нет;
Блокировка — Да; надпись поля — Фамилия Имя Отчество МОЛ;
О вставить вычисляемое поле в область Примечание формы для подсчета чис­
ла карточек инвентарного объекта ОС, свойства:
Данные. =Count([HoMep карточки ОС]), Вывод на экран — Нет; Имя
элемента - Поле18;
О с помощью команды меню Вид • Последовательность перехода изменить
порядок обхода полей формы.

! Щитцммми.Т.нИ ,.
Номер кар-очки. Код МОП|;Фамипия Имя Отчество МОЛ *5 Код подразделения! Дата открытия [Дат а закрытия \
•Очисть леннь»
pan mxtzl - Щх* «fJWi [Ща^щ/^Щ
-Count([b
, <То. »Ш.
Рис. 7.29. Макет формы Карточка ОС

10. Выполнить настройку подчиненной формы Амортизация ОС (рис. 7.30):
О при входе в поле Сумма амортизации автоматически вводить сумму ме­
сячного износа, вычисленного в главной форме (имя поля — ПолеЗЗ); со­
бытие Вход для поля Сумма амортизации — Процедура обработки событий.
Вызвать построитель выражений, перейти в окно редактора Visual Basic,
имя процедуры — Сумма_амортизации_Ег^ег ():
P r i v a t e Sub Сумма_амортизации_ЕгиегО
[Сумма амортизации] = Parent![ПолеЗЗ]
End Sub
574 Глава 7 Система управления базами данных MS Access 2000


О вставить вычисляемое поте в область Примечание формы для накопленно
го износа ОС, свойства Данные =Sum([Сумма амортизации]) Вывод на эк­
ран — Нет Доступ — Нет Блокировка — Да Имя элемента — Поле4
О вставить вычисляемое поче в область Примечание формы для суммарного
пробега 1 [я автотранспоршых сретс!в свойства Данные =Sum([npo6er])
Вывод на экран — Нет Имя элемента — Поле7
О с помощью команды меню Вид • Последовательность перехода изменить
порядок обхода потен формы

*3№жзеок. форда
Пробег
Сутё «метизации
Дата аийр ги?зц№<


С\ ммз амортиЗс Пробег |
Дата зморт лг j

^ Примечание формы
Поп* t [-Sum([Cyiw Sum({npo6pr]
П« (ЯП 7

Р и с . 7 . 3 0 . Макет формы Амортизация ОС


ИьсатаркьиндаерОС | [оиЮ01 К Код подразделения ] >Админ «j ДаТзгкигганаашна ff*Vt»lM
• ••* i — | з *ш* MJAr


<gaffivmfai<x: | эвн персона * | нач&гъп$ч стоимости l o o o o p j ^STS списания
^8M "ерсонапьмь * Q.QOp.J Номер документе
453 13p
J Me«ft*feifirtSrtot* j
Д а т а п р и е ф е т е н н ^ j 01 060QJ
j
Норма Всегй*артвчек




Номар1.арточ и Код МОЛ фамилия Имя Отчество МОП Да т аоткрьтия
Код подразделения Датазакрьт

Цех! 2108W
13 06 Ы
<КШв2 l * S L j J IMHPHQS И А
0D2O0S J12B0 j j Смирнов И А 21 OfcWs


Эай
«* i l L U L з *• |и!>*1иа;




Первоначальна» стоимость ОС, J422 900 00p|
О&цее число «шеи гарныв объектов ОС
Начальны- износ ОС 553 13р Остаточная t T o w w c t v a c 422 346 881
о оор накоплен»* изиос о с
«L
1 .>. i.W.i>*i mi
Р и с . 7 . 3 1 . Ф о р м а Объект ОС


11 Выпо шить дополните 1ьн\ю настройку павной формы (рис 7 31) для авто­
магического заполнения поля Накопленный износ при выходе из подчинен­
ной формы Амортизация ОС
О выдетнть подчиненную форму Амортизация ОС указать дтя формы свои
ство события Выход — Процедура обработки события Нажать кнопку по-
строитетя выражений в окне редактора Visual Basic ввести текст проце­
дуры обработки события Амортизация_ОС_Ехгё
Private Sub А м о р т и з а ц и я _ 0 С _ Е х 1 t ( C a n c e l As Integer)
= Me1[Амортизация
[Накопленный износ] ОС]'[Поле4]
575
Основные понятия СУБД Access


[Суммарный пробег] = Me1[Амортизация ОС]'[Поле7]
End Sub
О включить в область Данные вычисляемое иоле для подсчета количества
инвентарных карточек по каждому объекту ОС Надпись поля Всего кар­
точек, свойство Данные =[Карточка ОС]'Поле18, Доступ — Нет, Блокиров­
ка — Да
12 Сохранить форму — команда меню Файл • Сохранить
13 Для работы с данными через форму перейти в режим ввода и редактирова­
ния данных — команда меню Вид • Форма

Пример 11
Создание многотабличной формы для ввода и редактирования записей главная
таблица — Типовая операция, подчиненная таблица — Шаблон проводки
Последовательность действий по созданию макета формы (рис 7 32)
1 Перейти на вкладку Формы
2 Нажать КНОПКУ Создать, выбрать Мастер форм Источник данных — таблица
Типовая операция Выбрать все поля таблицы
3 Выбрать таблицу Шаблон проводки, выбрать все поля, кроме Код типовой
операции Вид представ тения данных (главная таблица) — Типовая операция,
внешний вид подчиненной формы — Ленточный, стиль — произвольный, имя
главной формы — Типовая операция, имя подчиненной формы — Шаблон
После создания формы выполняется настройка в конструкторе форм Для этого
следует
1 Выбрать на вктадке Формы изменяемую форму
2 Перейти в Конструктор формы с помощью кнопки Конструктор
3 Изменить размер элементов управления, их положение — команда меню
Формат
4 Проверить свойства элементов управления — команда меню Вид • Свойства
5 Настроить подчиненную форму
О преобразовать поле Номер субсчета дебета в элемент поле со списком с
помощью команды меню Формат • Преобразовать элемент в • Поле со спи­
ском,
О список значений субсчета дебета может формироваться для выбранного
счета дебета Для эгого указывается свойство поля со списком Тип источ­
ника строк - Таблица или запрос, свойство Источник строк — запрос (формы
ЖХО, поле Номер субсчета дебета) Условие отбора для формирования
списка субсчетов дебета
[Forms]'[Типовая операция]'[Шаблон] [Form]'[Номер счета дебет]
О преобразовать поте Номер субсчета кредита в лемент поле со списком с
помощью команды меню Формат • Преобразовать элемент в • Поле со спи­
ском
576 Глава 7 Система управления базами данных MS Access 2000



О список значений субсчета кредита может формироваться для выбранного
счета кредита. Для этого указывается свойство поля со списком Тип ис­
точника строк — Таблица или запрос, свойство Источник строк — запрос
(формы ЖХО, поле Номер субсчета кредита). Условие отбора для форми­
рования списка субсчетов кредита:
[Forms]![TnnoBafl операция]'[Шаблон].[Роггл]![Номер счета кредит]
В подчиненной форме для правильного вывода субсчета измененного счета
необходимо выполнять обновление записи. Для этого создается макрос, ко­
торый будет выполняться при изменении значений полей Номер счета дебе­
та, Номер счета кредита'
О перейти на вкладку окна БД Макросы, нажать кнопку Создать; выбрать
макрокоманду — Выполнить команду, команда — Refresh. Сохранить мак­
рос под именем Обновление,
О в подчиненной форме выбрать поле Номер счета дебета, указать свойство
поля событие Изменение, макрос — Обновление; выбрать поле Номер сче­
та кредита, указать свойство поля событие Изменение, макрос — Обновле­
ние
Сохранить форм}' — команда меню Файл • Сохранить
Перейти в режим ввода и редактирования данных — команда меню Вид •
Форма


Кад типовое Qiispamy СЙ0| йаоменсванее Покупк^ОС

Код ДШ.Г К«СД*П" Формула суммы операции
2 8 6 01 Покупка о 6/напичному расчету
Ч ˜ V° ll 'SLll ° °. .,rJ li" Cjjlof чистая
сумма ОС



ЗСГ00В__?| '04^jj 019 т | 0 1 rj НДС 20% дополнительно к
первоначальной стоимости


Я
"*˜zl< - ^ 1 ; Ж 3 LZM!"



> ink*}»»г
Запись- «.)..< }Г

Р и с . 7 . 3 2 . Ф о р м а Типовая операция


Пример 12
Создание многотабличной формы для автоматического формирования проводок
ЖХО на основании шаблона проводок выбранной типовой операции.
Последоватетьность действий по созданию макета формы (рис. 7.33).
1 Л ерей ш па вкладку Формы.
2. Нажать кнопку Создать, выбрать Мастер форм. Источник данных — табли­
ца — Проводка Выбрать все поля таблицы.
577
Основные понятия СУБД Access


3. Выбрать таблицу Типовая операция, выбрать поле Наименование типовой опе­
рации.
4. Выбрать таблицу Инвентарный объект ОС, выбрать поле Код группы ОС.
5. Вид представления данных — по таблице Проводка, имя формы — Проводка.
После создания формы выполняется настройка в конструкторе форм. Для этого
следует:
1. Выбрать на вкладке Формы изменяемую форму.
2. Перейти в Конструктор формы с помощью кнопки Конструктор
3. Изменить размер элементов управления, их положение с помощью команды
меню Формат.
4. Для полей Наименование типовой операции и Код группы ОС задать свойства:
Доступ — Нет, Блокировка — Да.
5. Добавить элемент управления — Календарь с помощью команды меню Встав­
ка • Элемент ActiveX. Выбрать Элемент управления Календарь 9.0. Для исполь­
зования выбранной календарной даты следует создать процедуру обработки
событий. Для этого указать в свойстве Выход — Процедура обработки собы­
тий. Текст процедуры:
Private Sub ЭлементАст.1 veX14_Exi t (Cancel As Integer)
[Дата проводки] = [3neMeHTActiveX14]
[Дата документа] = [ЭлементАсПveX14]
End Sub




Рис. 7.33. Форма Проводка

6. Разместить кнопку для вызова формы ЖХО, категория — Работа с формой,
действие — Открыть форму. Задать надпись кнопки — ЖХО.
7. Разместить кнопку для вызова формы Объект ОС: категория — Работа с фор­
мой, действие — Открыть форму. Задать надпись кнопки — Новый ОС. Для
ввода только новых ОС следует внести изменения в текст процедуры обра­
ботки событий кнопки: вместо строки: DoCmd.OpenForm stDocName,,, stLinkCritena
вставить: DoCmd.OpenForm stDocName, acNormal, "", "", acAdd, acNormal.
578 Глава 7. Система управления базами данных MS Access 2000


8. Сохранить форму — команда меню Файл • Сохранить.
9. Для работы с данными через форму перейти в режим ввода и редактирова­
ния данных — команда меню Вид • Форма (см. рис. 7.33)1.
Пример 13
Создание формы, в которой обеспечивается подготовка параметров отчета Обо-
ротно-сальдовая ведомость по счетам.
Последовательность действий по созданию макета формы.
1. Перейти на вкладку Формы.
2. Нажать кнопку Создать, выбрать Конструктор для построения формы.
3. Разместить в форме элементы управления:
О Надпись:имя НадписьО, Подпись — Оборотно-сальдовая ведомость по сче­
там, субсчетам.
О Поле со списком для выбора счетов. Поле со списком строится с помощью
Мастера: Значения из таблицы Счет, доступные поля: Номер счета, Номер
субсчета, Наименование счета, Тип счета, доступные поля — Номер счета,
подпись поля со списком — Номер счета. Проверить свойство Имя —
ПолеСоСписком1.
О Поле со списком для выбора субсчетов. Поле со списком строится с помо­
щью Мастера: Значения из таблицы Счет, доступные поля: Номер субсче­
та, скрыть ключевой столбец, подпись поля со списком — Номер субсчета.
Проверить свойство Имя — ПолеСоСписком2.
4. Изменить условия отбора субсчетов, с учетом выбранного счета:
О Для ПоляСоСписком2 изменить свойство Источник строк — вызвать по­
строитель запросов (...).
О Добавить в бланк запроса поле Номер счета, которое не выводится на эк­
ран; в строке Условие отбора построить выражение:
[Forms]![Форма отчета ОСВ]![ПолеСоСписком1].
5. Вставить кнопку для сброса параметров отчета:
О Отключить Мастера на панели Элементы управления и разместить кнопку.
О Задать свойство кнопки: Имя — Обновить, Нажатие кнопки — Процедура
обработки событий, Имя кнопки — Обновить.
О Перейти в редактор Visual Basic — кнопка (...) и ввести текст процедуры:
P r i v a t e Sub Обновить_СИск()
Refresh
Me![ПолеСоСписком1] = ""
Me![ПолеСоСписком2] = ""
End Sub



Кнопки Запись в ЖХО и Обновить будут описаны ниже.
579
Основные понятия СУБД Access


6. Вставить кнопку для вызова формы Счет.
О Включить Мастера на панели Элементы управления и разместить кнопку;
О Категория — Работа с формой, действие — Открыть форму, указать имя
формы — Счет.
О Указать Открыть форму и показать все записи.
О Выбрать рисунок для кнопки и задать имя кнопки — Счет.
7. Вставить кнопку закрытия формы ОСВ.
О Включить Мастера на панели Элементы управления и разместить кнопку.
О Категория — Работа с формой, действие — Закрыть форму.
О Выбрать рисунок для кнопки и задать имя кнопки — Выход.
8. Вставить кнопку для ввода параметров отчета Оборотная ведомость по сче­
там1:
О Включить Мастера на панели Элементы управления и разместить кнопку.
О Категория — Работа с отчетом, действие — Просмотр отчета.
О Указать имя отчета — Оборотно-сальдовая ведомость по счетам.
О Выбрать рисунок для кнопки и задать имя кнопки — Отчет ОСВ.
9. Закрыть форму с сохранением, имя формы — Форма отчета ОСВ.
Окончательный вид макета формы для параметров отчета «Оборотная ведо­
мость по счетам» представлен на рис. 7.34.




л
уттттшлтшю * \ "А*&$Р >.г«м*мимам
Для вывода отчета по определенному счету,
субсчету - выбор из списка, кнопка "Лупа".
Для отмены ранее выбраинык значений - кнопка
'Ластик".
Для вывода отчета по всем счетам, субсчетам,
параметры не задаются.
Переход в форму Счет - кнопка "Карандаш".
Выход из формы - кнопка "STOP".
•%
mm SE
Рис. 7.34. Макет формы для параметров отчета Оборотная ведомость по счетам


Запросы
Запросы СУБД Access являются основой для алгоритмической обработки дан­
ных БД, используются для формирования подсхемы данных, обеспечивающих
создание многотабличных форм и отчетов. Запросы используются и для зада­
ния условий фильтрации записей таблиц, формирования страниц доступа. Ис-


Кнопка создается после подготовки отчета «Оборотная ведомость по счетам»
580 Глава 7 Система управления базами данных MS Access 2000


<< Пред. стр.

страница 70
(всего 83)

ОГЛАВЛЕНИЕ

След. стр. >>

Copyright © Design by: Sunlight webdesign