Файл: Разработка конфигурации «Складской учет» в среде 1С:Предприятие 8.3 (Описание разработанных форм отчетов, необходимых для отражения результатов решения задач).pdf

Рассмотрим более детально справочник, который чаще других используются в нашем проекте.

В таблице 2 представлено описание структура записей справочника «Номенклатура»

Таблица 2. Описание структуры справочника «Номенклатура»

В таблице 3 представлено описание структура записей справочника «Контрагенты»

Таблица 3. Описание структуры справочника «Контрагент»

В таблице 4 представлено описание структура записей справочника «Контактные лица»

Таблица 4. Описание структуры справочника «Контактные лица»

В таблице 5 представлено описание структура записей справочника «Ставка НДС»

Таблица 5. Описание структуры справочника «Ставка НДС»

В таблице 6 представлено описание структура записей справочника «Наценка»

Таблица 5. Описание структуры справочника «Наценка»

2.2. Характеристика разработанных экранных форм документов в среде 1С:Предприятие

Входным документом в нашем проекте будет документ «Поступление товара».

На рисунке 1 показана форма (макет) документа в конфигураторе среды 1С:Предприятие.

Рисунок 1. Форма (макет) документа «Поступление товара»

Документ «Поступление товара» включает в себя следующие реквизиты: Номер, Дата, Контрагент, Договор, Контактное Лицо, Склад, Сотрудник.

Периодичность нумерации документа установлена в течении года, следовательно с нового года будет новая нумерация.

На рисунке 2 представлена форма документа «Поступление товара» на этапе ввода в систему 1С:Предприятие.

Рисунок 2. Форма документа «Поступление товара» экранная форма

Реквизиты Контрагент, Договор, Контактное Лицо, Склад, Сотрудник имеют возможность выбора значении из соответствующих справочников.

Значения реквизитов табличной формы: Номенклатура, Количество, Цена, Сумма, Ставка НДС, Сумма НДС, Всего, Наценка, Цена продажи за единицу товара.

Значение реквизита табличной формы Номенклатура ссылается на справочник «Номенклатура».

На рисунке 3 представлена форма (макет) документа «Продажа товаров, Товары».

Рисунок 3. Форма (макет) документа «Продажа товаров, Товары»

Документ «Продажа товаров» включает в себя следующие реквизиты: Номер, Дата, Контрагент, Контактное Лицо, Склад, Сотрудник, Комментарий.

Так же видно, что данный документ имеет вторую страницу, которая называется «Услуги» рассмотрим и ее форму (макет) на рисунке 4.

Рисунок 4. Форма (макет) документа «Продажа товаров, Услуги»

Шапка вкладки Услуги аналогична шапке вкладки Товары.

Рассмотрим вид данного документа в на этапе ввода в систему1С:Предприятие.

На рисунке 5 представлена форма документа «Продажа Товаров, вкладка Товары» на этапе ввода в систему 1С:Предприятие.

Рисунок 5. Форма документа «Продажа товаров, Товары» экранная форма

Реквизиты Контрагент, Контактное Лицо, Склад, Сотрудник имеют возможность выбора значении из соответствующих справочников.

Значения реквизитов табличной формы: Номенклатура, Количество, Цена, Сумма.

Значения реквизитов табличной формы Номенклатура, Цена ссылаются на справочник «Номенклатура».

2.3 Описание документов, необходимых для получения исходной информации (разработка документов и регистров)

Рассмотрим более подробно описание документов необходимых для получения исходной информации, а так же регистры.

Начнем с документа «Поступление товара».

Значение поле «Цена» подставляется из справочника «Номенклатура» при помощи процедуры:

&НаКлиенте Процедура ТоварыНоменклатураПриИзменении(Элемент)

ТекущиеДанные = Элементы.Товары.ТекущиеДанные;

ТекущиеДанные.Цена =ПолучитьЦенуПокупкиНоменклатуры (ТекущиеДанные.Номенклатура);

РассчитатьСуммуТабличнойЧастиТовары();

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

&НаСервереБезКонтекста

Функция ПолучитьЦенуПокупкиНоменклатуры(Номенклатура)

Возврат Номенклатура.ЦенаПродажи;

КонецФункции

При изменении количества изменяется сумма на это число, для этого в модуле документа прописана процедура:

&НаКлиенте

Процедура ТоварыКоличествоПриИзменении(Элемент)

РассчитатьСуммуТабличнойЧастиТовары();

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

Ставка НДС запрашивается из соответствующего справочника «Ставки НДС»

Сумма за товар и сумма НДС рассчитываются автоматически так же благодаря процедуре:

&НаКлиенте

Процедура РассчитатьСуммуТабличнойЧастиТовары()

ТекущиеДанные = Элементы.Товары.ТекущиеДанные;

ТекущиеДанные.Сумма = ТекущиеДанные.Цена * ТекущиеДанные.Количество;

ТекущиеДанные.СуммаНДС=ТекущиеДанные.Сумма*ПолучитьСтавкуНДСЧислом(ТекущиеДанные.СтавкаНДС) / 100;

ТекущиеДанные.Всего= ТекущиеДанные.Сумма + ТекущиеДанные.СуммаНДС;

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

При этом необходимо Ставку НДС из процентного выражения представить числом для этого подходит только процедура &НаСервереБезКонтекста

Функция ПолучитьСтавкуНДСЧислом(СтавкаНДС)

Возврат СтавкаНДС.Ставка;

КонецФункции.

Для нас очень важно сразу получить наценку на товар для расчета Цены продажи. Как известно на сегодняшний день наценка за частую составляет от 20% до 30% от цены покупки. Для расчета наценки нами применяется процедура &НаСервереБезКонтекста

Функция ПолучитьЦенуПокупкиНоменклатуры(Номенклатура)

Возврат Номенклатура.ЦенаПродажи;

КонецФункции.

В дальнейшем наша Наценка отобразится в расчете Цены продажи за единицу товара в процедуре:

&НаКлиенте Процедура РассчитатьЦенаПродажиТабличнойЧастиТовары()

ТекущиеДанные = Элементы.Товары.ТекущиеДанные;

ТекущиеДанные.ЦенаПродажи= ТекущиеДанные.Цена*ПолучитьСтавкуНДСЧислом(ТекущиеДанные.СтавкаНДС)/100+ТекущиеДанные.Цена+ТекущиеДанные.Цена*ПолучитьНаценкуЧислом(ТекущиеДанные.Наценка)/100;

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

Так же при оформлении документа «Поступление товара» для простоты сотрудника при вводе данных имеется привязка Контактного лица к Контрагенту при помощи процедуры:

&НаКлиенте

Процедура КонтактноеЛицоПриИзменении(Элемент)

Объект.Контрагент=ПолучитьКонтрагентаПоКонтактномуЛицу(Объект.КонтактноеЛицо);

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

&НаСервереБезКонтекста

Функция ПолучитьКонтрагентаПоКонтактномуЛицу(КонтактноеЛицо)

Запрос = Новый Запрос;

Запрос.Текст =

"ВЫБРАТЬ

| КонтактныеЛица.Владелец КАК Владелец

|ИЗ

| Справочник.КонтактныеЛица КАК КонтактныеЛица

|ГДЕ

| КонтактныеЛица.Ссылка = &Ссылка";

Запрос.УстановитьПараметр("Ссылка", КонтактноеЛицо);

РезультатЗапроса = Запрос.Выполнить();

ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать(); Если ВыборкаДетальныеЗаписи.Следующий() Тогда

Возврат ВыборкаДетальныеЗаписи.Владелец;

КонецЕсли;

КонецФункции

Для документа «Поступление товара» реализована команда вывод на печать при

На рисунке 6 представлена печатная форма документа «Поступление товара» в табличном виде.

Рисунок 6. Печатная форма документа «Поступление товара»

На основе данного документа созданы так же регистры накоплении «Закупки», «Остатки номенклатуры», «Остатки». Рассмотрим каждый из них.

Регистр «Закупки» - вид регистра «Обороты». Использует следующие данные: измерения - номенклатура, контрагент; ресурсы – количество, сумма. На рисунке 7 представлен вид регистра в среде 1С.

Рисунок 7. Регистр «Закупки»

Регистр «Остатки Номенклатуры» - вид регистра «Остатки».

Использует следующие данные: измерения - номенклатура, склад, серия номенклатуры; ресурсы – количество. На рисунке 8 представлен вид регистра в среде 1С.

Рисунок 8. Регистр «Остатки Номенклатуры»

Регистр «Остаток» - вид регистра «Остатки».

Использует следующие данные: измерения - номенклатура, склад; ресурсы – количество. На рисунке 9 представлен вид регистра в среде 1С.

Рисунок 9. Регистр «Остатки»

Помимо регистров накоплении по документу «Поступление товара» создан регистр сведений «Цены поставщиков». Со следующими данными: измерения – контрагент, номенклатура; ресурсы – цена.

Все операции по регистрам прописаны в модуле объекта документа «Поступление товара»:

Процедура ОбработкаПроведения(Отказ, Режим)

//{{__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ

// Данный фрагмент построен конструктором.

// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!

// регистр ЦеныПоставщиков

Движения.ЦеныПоставщиков.Записывать = Истина;

Для Каждого ТекСтрокаТовары Из Товары Цикл

Движение = Движения.ЦеныПоставщиков.Добавить();

Движение.Период = Дата;

Движение.Контрагент = Контрагент;

Движение.Номенклатура = ТекСтрокаТовары.Номенклатура;

Движение.Цена = ТекСтрокаТовары.Цена;

КонецЦикла;

// регистр ОстаткиНоменклатуры Приход

Движения.ОстаткиНоменклатуры.Записывать = Истина;

Для Каждого ТекСтрокаТовары Из Товары Цикл

Движение = Движения.ОстаткиНоменклатуры.Добавить();

Движение.ВидДвижения = ВидДвиженияНакопления.Приход;

Движение.Период = Дата;

Движение.Номенклатура = ТекСтрокаТовары.Номенклатура;

Движение.Склад = Склад;

Движение.СерияНоменклатуры = ТекСтрокаТовары.СерияНоменклатуры;

Движение.Количество = ТекСтрокаТовары.Количество;