Вывод
Информационная система 1С: Предприятие подходит для обучения студентов основам работы с системами программирования. Система 1С: Предприятие 7.7 является «конструктором» для создания мощных программ автоматизации предприятия «малыми силами». За счет реализации объектно-ориентированного подхода возрастает скорость разработки приложений. Встроенный язык программирования обладает большими возможностями. Наличие конструкторов и визуальных средств проектирования обеспечивает простоту и удобство работы с программой, а интуитивно-понятный интерфейс – ее быстрое освоение.
Эта система имеет компонентную структуру, позволяет не только импорт сторонних компонент, но и возможность разработки собственных.
1. 1С: Предприятие Версия 7.7 Конфигурирование и администрирование. Части 1 и 2, Москва, 1С: Паблишинг, 2005 г.
2. 1С: Предприятие Версия 7.7 Описание встроенного языка. Части 1 и 2, Москва, 1С: Паблишинг, 2005 г.
3. С.А. Митичкин, Учебник по 1С
4. С.Н. Постовалов, Программирование в системе 1С: Предприятие 7.7 (компонента «Бухгалтерский учет»): курс лекций. УЦМИ «Бизнес-Информатика», Новосибирск, 2002 – 63 с.
Создать отчет «Ведомость по товарам», в котором отображать количество товара на начало и конец периода, поступление и расход товара. Колонки отчета – Товар, нач остаток, приход, расход, кон остаток.
В отчете должна быть возможность выбрать товар / группу товаров, по которым делается отчет. Поле «Единица» заполняется основной единицей товара
Выполнение
Создан отчет «Ведомость по товарам». В диалоге отчета размещены элементы – выбор периода (НачДата и КонДата) и ВыбТовар. Отчет формируется на основании данных запроса к итогам и движениям регистра «ОстаткиТоваров». Если в диалоге реквизит ВыбТовар заполнен, к запросу добавляется условие.
Процедура, формирующая отчет:
Процедура Сформировать()
Запрос = СоздатьОбъект («Запрос»);
ТекстЗапроса =
«Период с НачДата по КонДата;
|Товар = Регистр. ОстаткиТоваров. Товар;
|Количество = Регистр. ОстаткиТоваров. Количество;
|Функция Нач = НачОст(Количество);
|Функция Прих = Приход(Количество);
|Функция Расх = Расход(Количество);
|Функция Кон = КонОст(Количество);
|Группировка Товар;»
;
Если ВыбТовар. Выбран() = 1 Тогда
ТекстЗапроса = ТекстЗапроса
+ «Условие Товар в ВыбТовар;»;
КонецЕсли;
Если Запрос. Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;
Таб = СоздатьОбъект («Таблица»);
Таб. ИсходнаяТаблица («Таблица»);
Таб. ВывестиСекцию («Заголовок»);
Пока Запрос. Группировка («Товар») = 1 Цикл
Если Запрос. Товар. ЭтоГруппа()=1 Тогда
Таб. ВывестиСекцию («Группа»);
Иначе
Един = Запрос. Товар. ОсновнаяЕдиница;
Таб. ВывестиСекцию («Товар»);
КонецЕсли;
КонецЦикла;
Таб. ВывестиСекцию («Итого»);
Таб. ТолькоПросмотр(1);
Таб. Показать («Отчет по остаткам товаров», «»);
КонецПроцедуры
Пример выполненного отчета:
| Товары | Ед. | Начальный остаток | Приход | Расход | Конечный остаток |
| Крупы | |||||
| Крупа «Геркулес» | упак | 160,000 | 140,000 | 300,000 | |
| Крупа гречневая | упак | 280,000 | 70,000 | 350,000 | |
| Крупа манная | пак | 9,000 | 8,000 | 17,000 | |
| Сахарный песок | пак | 5,000 | 10,000 | 15,000 | |
| Консервы | |||||
| Килька | банка | 12,000 | 12,000 | ||
| Ставрида | банка | 5,000 | 5,000 | ||