Разработка формы ввода «ф_накладная_приход»
Форма ф_накладная_приход служит для ввода данных в базу данных накладных и состоит из главной формы, на которой расположена кнопка для добавления данных о пришедшей продукции. Главная форма содержит поля Номер накладной прихода, её дату, торговую точку, куда была привезена продукция в виде ленточной ЭФ. Форма для добавления данных о продуктах содержит следующие поля — продукция, количество, цена. Формы связаны полями номер накладной прихода.
В форме для добавления данных о продуктах:
— номер заказа — =[Формы]![ф_накл_приход]![номер].
Внешний вид форм представлен ниже на рис. 3.1 и 3.2.
Рисунок 3.1 — Форма «ф_накладная_приход».
Для добавления данных создана кнопка «Добавить запись». Для добавления записи в таблицу был создан запрос, sql-код которого приведен ниже:
INSERT INTO dbo_тНакладная_приход (Номер_накладной_прихода, Дата_накладной_прихода, Код_операции, Код_продуктовой_точки)SELECT [Формы]![ф_накл_приход]![Поле2] AS [Number], [Формы]![ф_накл_приход]![Поле4]AS [date], 1 AS Operation, [Формы]![ф_накл_приход]![К8] AS Т_т.
Рисунок 3.2 — Форма для добавления пришедших продуктов.
Для вставки записи в таблицу «тПриход» был написан модуль на Visual Basic, код которого представлен ниже:
Private Sub Кнопка6_Click ().
CurrentDb.Execute «Insert into dbo_тПриход» _.
& «(Кол_приход, Цена1_прихода, Код_продукции, Номер_накладной _прихода) Values «_.
& «('» & Me.Количество.Value & «', '» & Me.Цена.Value & «', '» & Me. Продук ция.Value & «','» & Me.Номер.Value & «');» .
DoCmd.close acForm, «Form1», acSaveYes.
End Sub.