Даталогическая модель данных

 

Выше перечисленные данные будут заноситься в таблицы базы данных.

 

Таблица 1 - Структура таблицы «Сотрудники»

 

Наименование	Тип поля	Назначение
ФИО	Строка(100)	ФИО сотрудника
Должность	СправочникСсылка .Должности	Должность

 

 

Таблица 2 - Структура таблицы «ПоступлениеТовара»

Наименование	Тип поля	Назначение
Код	Счетчик	Код заявки
Дата	Дата	Дата заявки
Поставщик	СправочникСсылка. Поставщик	Список товаров
Товары	СправочникСсылка .Товар	Наименование товара ссылкой на справочник

 

Таблица 3 - Структура таблицы «Реализация товара»

Наименование	Тип поля	Назначение
Код	Счетчик	Код движения
Дата	Дата	Дата движения
Товар	СправочникСсылка .Товар	Наименование товара ссылкой на справочник
Количество	Число(6,0)	Цена
Цена	Число(2)	Количество товара
Сумма	Число(7)	Общая сумма для товара

 

Структура нормативно-справочной информации

Нормативно-справочной информацией будут являться справочники: «Единицы измерения», «Поставщики», «Номенклатура».

 

Таблица 4- Структура таблицы «Единицы измерения»

Наименование	Тип поля	Назначение
Код	Счетчик	Код единицы измерения
Название	Строка(20)	Наименование

 

Таблица 5 - Структура таблицы «Номенклатура»

Наименование	Тип поля	Назначение
Код	Счетчик	Код товара
Название	Строка(20)	Наименование товара
ЕдИзм	Число	Код единицы измерения
Производитель	Строка(20)	Название производитель

 

Таблица 6 - Структура таблицы «Поставщик»

Наименование	Тип поля	Назначение
Код	Счетчик	Код единицы измерения
Название	Строка(20)	Наименование
Контакты	Строка(100)	Контактные данные поставщика

 

Таблица 7 - Структура таблицы «Поставщик»

Наименование	Тип поля	Назначение
Код	Счетчик	Код единицы измерения
Название	Строка(20)	Наименование
Сайт	Строка(20)	Адрес сайта

Структура выходной информации

Выходной информацией будут являться следующие документы:

- заявки от покупателей:

- товар;

- количество;

- поставщик;

- заявки поставщику:

- товар;

- количество;

- дата заявки;

- чек покупателю:

- дата покупки,

- товар,

- количество товара,

- цена.

 

Реляционная модель данных

 

Реляционная база данных представляет собой множество взаимосвязанных таблиц, каждая из которых содержит информацию об объектах определенного вида. Каждая строка таблицы содержит данные об одном объекте (например, автомобиле, компьютере, клиенте), а столбцы таблицы содержат различные характеристики этих объектов - атрибуты (например, номер двигателя, марка процессора, телефоны фирм или клиентов).

Строки таблицы называются записями. Все записи таблицы имеют одинаковую структуру - они состоят из полей (элементов данных), в которых хранятся атрибуты объекта. Каждое поле записи содержит одну характеристику объекта и представляет собой заданный тип данных (например, текстовая строка, число, дата). Для идентификации записей используется первичный ключ. Схему построенной реляционной модели базы данных изображена на рисунке 4.

 

 

 

Рисунок 4 – Реляционная модель данных

 

 

Алгоритм автоматизации

 

Проверка возможности сохранения

Процедура ПоКнОк()

 

Проверяем «проведен» ли документ. Если нет, то проверяем на наличие значение переменной «Поставщики» и заполнения хотя бы одного товара. В случае отсутствия информации об этом, выводим соответствующее сообщение.

 

Если Проведен() = 0 Тогда

Если (ПустоеЗначение(Поставщик) = 1) Тогда

Предупреждение («Не выбран поставщик!»);

Если (ПустоеЗначение(Товар.Название) = 1) Тогда

Предупреждение («Не выбран товар!»);

Возврат;

КонецЕсли;

 

Создаем переменную-объект ККР, в которой будем хранить информацию о заказе, которому оказывается эта работа.

ККР = СоздатьОбъект («Документ.ПриходТовара»);

Находим элемент из справочника Оборудование по названию. В случае успешного нахождения присваиваем в параметр Клиент данные о текущем поставщике.

Если ККР. НайтиЭлемент(Наименование) = 1 Тогда

ККР. Клиент = Поставщик.Название;

После выполнения присвоения этих значений записываем эти данные в нашу базу. ККР. Записать();

В случае не нахождения оборудования с указанным названием (когда ККР. НайтиЭлемент(Наименование) = 0), выводим аналогичное сообщение и заканчиваем работу с процедурой.

Иначе

Предупреждение («Оборудование с названием «+Наименование+» не найдено!»);

Возврат;

КонецЕсли;

Записываем информацию об операции в базу данных.

Записать();

КонецЕсли;

Закрываем форму и указываем окончание процедуры.

Форма. Закрыть(0);

КонецПроцедуры

 

Печать квитанции

 

Процедура ПоКнКвитанция()

Создаем объект таблица Таб.

Таб = СоздатьОбъект («Таблица»);

Таб. ИсходнаяТаблица («Таблица1»);

Таб. ВывестиСекцию («Секция_2»);

Если работы выполнял сервисный центр, тогда выводим требуемую секцию.

Если ВыпТО = 1 Тогда

Таб. ВывестиСекцию («Секция_3»);

Создаем переменную ДЗ, в которую получаем значения текущего документа.

 

ДЗ = СоздатьОбъект («Документ»);

ДЗ. ВыбратьПодчиненныеДокументы (ТекущийДокумент());

Если информация о текущем документе успешно загружена, тогда выбираем все строки для данного документа.

Если ДЗ. ПолучитьДокумент() = 1 Тогда

ДЗ. ВыбратьСтроки();

Далее в цикле, пока выполняется условие на получение новой строки (то есть осуществляется поочередный выбор каждой строки) получаем информацию о номере строки, единице измерения, а также количестве оборудования для ремонта или закупки. После выводим секцию с соответствующей информацией.

Пока ДЗ. ПолучитьСтроку() = 1 Цикл

Ном1 = ДЗ. НомерСтроки;

ЗИП = ДЗ.ЗИП;

ЕдИзм = ДЗ. ЕдИзм;

Количество = ДЗ. Количество;

Таб. ВывестиСекцию («Секция_4»);

КонецЦикла;

КонецЕсли;

Теперь формируем секцию с номерами строк из текущего документа. Для этого также используем цикл с условием получения строки.

ВыбратьСтроки();

Пока ПолучитьСтроку() = 1 Цикл

Ном2 = НомерСтроки;

Таб. ВывестиСекцию («Секция_6»);

КонецЦикла;

Если работы выполняла сторонняя ремонтная фирма, то выводим соответствующую информацию в отдельной секции.

 

ИначеЕсли ВыпТО = 2 Тогда

Таб. ВывестиСекцию («Секция_8»);

КонецЕсли;

Устанавливаем значения для созданной таблицы и параметр просмотра «только для чтения». В заголовок таблицы указываем «Квитанция о приходе товара».

Таб. Опции (0,0,0,0);

Таб. ТолькоПросмотр(1);

Таб. Показать («Квитанция о приходе товара», "»);

КонецПроцедуры