Звіти в системі «1с:Підприємство 8.1» це окрема навіть не глава це окрема частина системи. Порівнюючи стандартні звіти системи 7.7 та 8.1 можна відзначити що в «1с:Підприємство 8.1» значно гнучкіші звіти ніж в 7.7 Сьогодні ми навчимось створювати звіти.

Проте давайте спочатку задамось питанням «Що таке звіт?». Звіт це вибірка даних з різних джерел, їхнє групування, сортування, та представлення в вигляді, як правило, таблиці. Отже для формування звіту ми для початку маємо знати де в базі даних знаходяться  потрібні нам дані.

Для роботи з звітами в системі «1с:Підприємство 8.1» використовується об’єкт «Запрос». Він дозволяє отримувати інформацію, що зберігається в полях бази даних, в вигляді вибірки, що сформована по заданим правилам.

Вихідну інформацію звіт(запит)  отримує з набору таблиць.  Ці таблиці містять реальні дані отримані з бази даних і можуть бути поділені на дві великі групи: реальні та віртуальні. В свою чергу реальні таблиці можуть бути поділені на об’єктні таблиці та необ’єктні таблиці. Реальні таблиці містять інформацію з будь якої реальної таблиці.  В нашому випадку це може бути довідник фільмів.

Віртуальні таблиці формуються з кількох реальних таблиць бази даних. Наприклад віртуальною є таблиця регістрів накопичення «ОстаткиИОбороты».

Об’єктні таблиці містять інформацію об’єктних даних (довідники, документи…) . Особливістю об’єктних таблиць є те, що вони включають в себе поле Ссылка, що містить  посилання на поточний запис. Крім того для таких таблиць є характерним ієрархічність, тобто поля таких таблиць можуть містити в собі вкладені таблиці, табличні частини.

Мова запитів

Те які дані будуть вибрані з бази і їхнє представлення, все це  описується в запиті (тексті запиту) який формується на спеціальній мові зпитів. Текст запиту в загальному складається з наступних частин:

• Опис запиту
• Об’єднання запитів
• Впорядкування результатів
• Автовпорядкування результатів
• Опис підсумків

Обов’язковою частиною є тільки перша – опис запиту. Все решта може додаватись по мірі необхідності.

Опис запиту визначає джерела даних, поля вибірки, групування …

Об’єднання запиті  визначає як будуть об’єднані результати кількох запитів.

Впорядкування результатів визначає умови впорядкування стрічок запиту.

Автовпорядкування дозволяє включити режим автоматичного сортування стрічок запиту.

Опис підсумків  пояснює які підсумки потрібно розраховувати і як групувати результат.

Детально мова запитів описана в відповідній літературі. Ми з основними конструкціями мови ознайомимось в процесі створення запитів(звітів).

Нагадую що бухгалтера  можуть записатись на курси 1с які я провожу у Львові.  Курси для  користувачів системи 1с Бухгалтерія для України.

Наша відеотека почала розвиватись і ми вже не просто позичаємо диски друзям і колегам, а і продаємо диски з фільмами (це означає що ми будемо купувати чисті диски та коробки і записувати на них фільми для продажі). Крім того ми вирішили записувати диски на носії інформації за певну суму (тобто надаємо послуги). Відповідно в програму потрібно внести зміни. Подивимось якими вони будуть.

Спочатку ми створимо перелічення «ВидТовару» з наступними значеннями: «Товар», «Послуга».

Потім ми створимо новий довідник «Номенклатура». В ньому вкажемо реквізит «Вид» і встановимо його тип «ВидТовару».

Тепер відредагуємо регістр накопичення «ЗалишкиДисків». Відкриємо вимір «Диски» і відредагуємо його вид даних наступним чиномВкажемо що в регістрі використовується складний тип даних. І відзначимо два довідники («Диски», «Номенклатура») як типи даних даного виміру (див. рис.).

Аналогічні дії потрібно буде провести в двох документах, там де фігурує тип даних «Диски».

Тепер давайте змінимо процедуру проведення документу «ПозичивПодивитись». Тепер процедура проведення буде виглядати так:

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

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

// Даний фрагмент побудований конструктором.

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

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

// регістр ЗалишкиДисків Расход

если ТекСтрокаДиски.Диск.Метаданные().Имя = “Номенклатура” тогда

если ТекСтрокаДиски.Диск.Вид <> перечисления.ВидТовару.Послуга тогда

Движение = Движения.ЗалишкиДисків.Добавить();

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

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

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

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

конецесли;

иначе

Движение = Движения.ЗалишкиДисків.Добавить();

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

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

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

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

конецесли;

КонецЦикла;

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

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

Як бачимо в тілі циклу додано дві вкладені одна в другу конструкції

Если … Тогда …. Конецесли;

В першій конструкції ми перевіряємо чи в колонці «Диск» табличної сатини «Диски» вибрано елемент довідника «Номенклатура». В разі якщо це так тоді другим «если» ми перевіряємо чи номенклатура є послугою. Якщо це твердження не відповідає дійсності тоді робимо рух по регістру. В разі якщо вибраний елемент не належить довіднику номенклатура ми просто проводимо його по регістру без додаткових перевірок.

На цьому пропоную закінчити.

• в межах секунди
• В межах дня
• В межах місяця
• В межах кварталу
• В межах року
• В межах реєстратору (якщо встановлений режим запису підлеглий реєстратору)

Період це службове поле і завжди має тип дата. Та слугує для приналежності значення до якогось періоду. При записі даних «1с:Підприємство 8.1» приводить тип дати до початку періоду в який вона припадає. Наприклад при періодичності місяць дата 14-01-2009 перетвориться в записаному регістр і в 01-01-2009

Ще однією особливістю даного регістра є те що тут немає прямої заборони на редагування даних користувачем напряму. Якщо є прив’язка до документа-реєстратора то редагування реєстру напряму буде неможливим, якщо ж реєстр не є прив’язаний до реєстратора то такий реєстр називається незалежним і його редагування доступне користувачу.

Думаю теоретичних відомостей вже достатньо, давайте перейдемо до практичного використання даних.

Оскільки ми будемо позичати( а можливо в майбутньому і продавати фільми) то на потрібно буде зафіксувати ціни по яких ми будемо продавати з прив’язкою до дати.

Йдемо на закладку конфігуратора «Регістри відомостей» та створимо новий регістр відомостей «Ціни».

На основній закладці задаєте назву «Ціни» і вказуєте періодичність регістру в межах дня

На закладці дані вказуєте вимір регістру – «Диски» і вибираєте тип даних «Довідник.диски»

Ресурсом відповідно буде «Ціна» – тип число, довжина 15, 2 знаки після коми, невід’ємне.

Ну що ж тепер перейдемо до налаштування документів для роботи з даним реєстром.

Документ «ПрихіднаНакладна» ми рухати не будемо, нас більше цікавить документ «ПозичивПодивитись» оскільки якраз в ньому ціни мали би заповнюватись автоматично.

Для початку відкриємо його екранну форму.

Ціна має виставлятись в той момент коли ми вже вибрали який диск ми будемо позичати(продавати). Значить вибираємо поле введення диску і натискуємо на збільшувальне скло навпроти події «ПриИзменении»

Там ми пропишемо наступне

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

// Вставити вміст обробника.

строкатабличнойчасти= элементыформы.диски.ТекущиеДанные;

строкатабличнойчасти.ціна= РоботаЗДокументами.РоздрібнаЦіна(дата,элемент.значение);

ЗФ.ПерерахунокСуми(строкатабличнойчасти);

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

Перший рядок – отримуємо дані поточної стрічки

Другий рядок викликаємо функцію з загального модуля РоботаЗДокументами РоздрібнаЦіна і передаємо їй два параметри: Дату та Значення поточного елементу керування ( в нашому випадку значення довідника дисків).

Третій рядок – перерахунок суми в поточній стрічці.

Почекайте, почекайте, скаже уважний читач але ж ми не маємо ніякого загального модуля РоботаЗДокументами і ніякої функції РоздрібнаЦіна . Все правильно ми якраз і підійшли до їхнього створення.

По аналогії з загальним модулем «ЗФ» створимо модуль «РоботаЗДокументами» в якоми ми напишемо наступну функцію:

функция РоздрібнаЦіна(АктуальнаДата,ЕлементНоменклатури) экспорт

відбір = Новый Структура(”Диски”,ЕлементНоменклатури );

значенняРесурса= регистрыСведений.ціни.ПолучитьПоследнее(АктуальнаДата,відбір);

возврат значенняРесурса.ціна;

конецфункции

В першій стрічці ми створюємо змінну відбір, якій передаємо отримані функцією дані для отримання посилання на елемент довідника «Диски» який нам потрібний для отримання значення регістру.

В другій стрічці ми отримуємо значення регістру.

А в останній стрічці повертаємо як значення функції ціну на диск, яка актуальна на відповідну дату.

Тепер запустіть «1с:Підприємство 8.1» і в періодичний регістр відомостей «Ціна» внесіть ціни на диски на 1 число місяця і на 10 число місяця.

Виберіть диск в табличній частині і подивіться на ціну. Тепер поміняйте дату і знову виберіть диск, ціна має змінитись.

Поздоровляю на цьому наше зняття з цінами можна вважати закінченим.

Для початку відкриємо документ а потім його форму і з панелі елементів керування додамо кнопку на форму документу.

Вкажіть заголовок кнопки «Друк» в відповідному полі «Властивостей».

Тепер підготуємо макет друкованої форми документу. ДЛЯ цього перейдіть в вітку «Макети» Приходної накладної та створіть новий макет з назвою «Друк» та типом «Табличний документ».

Спочатку виділіть 6 рядків і через меню «Таблиця – імена – призначити ім’я» дайте їм ім’я «Шапка». Потім виділіть область в 2 клітинки по висоті та 5 по довжині і за допомогою кнопки об’єднайте їх. В цю загальну клітинку впишіть назву «Приходна накладна» та від форматуйте її на свій смак.

Третій рядок також об’єднайте і в нього внесіть наступний текст: № [номер] від [дата]

У властивостях комірки вкажіть значення параметру «Заполнение» «Шаблон».

Давайте пояснимо значення параметру «Заполнение».

1. Текст – як ми його внести так і бачимо в згенерованому макеті
2. Параметр – ми по суті справи вказуємо ім’я змінної значення якого на етапі генерування підставляється в документ.
3. Шаблон – це зхрещення двох попередніх параметрів. Наприклад на етапі генерування значення номера і дати заміняться на свої фактичні значення відносно відкритого документу. Тобто змінні з обох боів виділяються квадратними дужками. А текст ніяк не виділяється.

В шостий рядок має виглядати так:

На цьому редагування шапки закінчимо.

Тепер виділяємо 7 рядок і через «Таблиця – імена – призначити ім’я» надамо йому ім’я «ПерелікДисків». В клітинках внесемо назви змінних, що співпадають з назвами колонок табличної частини «Товари» документу «Приходна накладна» в властивостях клітинок вказуйте «Заполнение: параметр».

Ну ніби все, щасливо подумає програміст-учень, проте це не так, ви вказали диски які отримали, але на дисках може бути по кілька фільмів, і бажано знати детально що ми отримуємо, наступна стрічка допоможе вивести інформацію про фільми на отриманих нами дисках.

Першу клітинку не заповнюємо а в наступних заповнюємо такими значеннями

Створюємо нову секцію:«Підвал», в якій клітинки заповнюємо так:

Де ВсьогоКть та ВсьогоСума є параметрами а все решта текстом.

З налаштуванням макету нібито все, перейдемо безпосередньо до процедури його формування та виводу на екран.

В загальному наш макет має виглядати так:

Відкрийте форму документу та перейдіть на закладку модуль, там відшукайте процедуру «Друк». Це основна процедура яка буде викликатись кнопкою «Друк» і всі команди ми будемо писати тут.

Процедура Друк (Элемент)

// Вставити вміст обробника.

ТабДок = Новый ТабличныйДокумент;

Макет = Документы.ПрихіднаНакладна.ПолучитьМакет(”Друк”);

// Шапка, формування,заповнення параметрів, вивід

Шапка = Макет.ПолучитьОбласть(”Шапка”); //отримуємо область макету шапка

Шапка.Параметры.Заполнить(ЭтотОбъект); //заповнюємо параметри шапки значеннями змінних

ТабДок.Вывести(Шапка); //виводимо шапку

// Перелік товарів (дисків) виводиться в циклі

ОбластьПерілікДисків = Макет.ПолучитьОбласть(”ПерелікДисків”); // отримуємо облать макету”ПерелікДискі”

// і починаємо в циклі опрацьовувати кожну стрічку табличної частини товар

Для Каждого ПоточнаСтрічкаПерелікуДисків Из Товар Цикл

ОбластьПерілікДисків.Параметры.Заполнить(ПоточнаСтрічкаПерелікуДисків);//заповнюємо змінними

ТабДок.Вывести(ОбластьПерілікДисків);//виводимо

// вкладений цикл для виводу інформації про фільми на диску

ОбластьПФ = Макет.ПолучитьОбласть(”ПерелікФільмів”);

Для Каждого ПоточнаСтрічкаПерелікуфільмів Из ПоточнаСтрічкаПерелікуДисків.товар.ПерелікФільмів Цикл

ОбластьПФ.Параметры.режисер = ПоточнаСтрічкаПерелікуфільмів.Фільм.Режисер;//вказуємо значення однієї з змінних напряму

ОбластьПФ.Параметры.Заполнить(ПоточнаСтрічкаПерелікуфільмів); //автоматично запонюємо значеннями змінних

//увага значеннями а не посиланнями! якщо ви в комірці внесете фільм.Режисер то нічого не виведе оскільки це посилання

ТабДок.Вывести(ОбластьПФ); //виводимо

КонецЦикла;

КонецЦикла;

Область = Макет.ПолучитьОбласть(”Підвал”); //ну тут має бути все зрозуміло

Область.Параметры.ВсьогоКть = Товар.Итог(”кть”);//підсумовуємо колонку кть

Область.Параметры.ВсьогоСума = Товар.Итог(”Сума”);// та сума

ТабДок.Вывести(Область); //виводимо

// тут встановлення додаткових параметрів виводу.

ТабДок.ОтображатьСетку = Ложь;

ТабДок.Защита = Ложь;

ТабДок.ТолькоПросмотр = Ложь;

ТабДок.ОтображатьЗаголовки = Ложь;

ТабДок.Показать(); //показуємо на екран те що ми навиводили

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

Ну думаю з коментарів в програмі має бути все зрозуміло.

Запускаємо «1с:Підприємство 8.1» і натискуємо на кнопку «Друк» любуємося результатом.

Як домашнє завдання маєте зробити друковану форму для документу «позичивПодивитись»

Справа в тому, що ми маємо довідники і документи, в документах маємо потрібну нам інформацію для формування звітів (наприклад залишків по певних складах) проте для отримання потрібних нам результатів потрібно буде проаналізувати всі документ що роблять відповідні рухи товарів. Добре якщо це лише один документ приходу та один документ розходу товарів. В випадку коли їх кілька задача ускладнюється, якщо ж документів кілька десятків запрограмувати звіт буде дуже важко. Чи не краще зберігати дані про рухи товарів в одній окремій структурі даних і при формуванні звіту всі дані вибирати інформацію лише звідтіля? Для полегшення доступу до інформації яка зберігається в багатьох документах, та і не тільки в документах було створено «регістри накопичення».

Регістр накопичення має певну структуру в якій і накопичуються дані . ці дані будуть зберігатися в регістрі в вигляді окремих записів.

Важливо відмітити що регістр накопичення не передбачає того щоб користувач міг його редагувати. Регістр створений для того щоб дані в нього заносились і модифікувались виключно об’єктами конфігурації.

До поняття «регістр накопичення» мають відношення також поняття «вимір» та «ресурс».

Вимірами (измерениями) називають розрізи інформації представлені в регістрі (в нашому випадку це може бути склад куди прийняли товар і сам товар.

Числова інформація що зберігається в регістрі називається ресурсами.

Зміна стану регістру накопичення відбувається як правило під час проведення документу і полягає в тому що в регістр додаються кілька записів з посилання на документ який зробив зміну (документ буде регістратором), «напрям» приросту (прихід чи розхід) ну і звичайно значення вимірів та ресурсів. Все в комплексі називається рухом регістру.

Крім вищевказаної інформації регістр може мати набір реквізитів, це додаткова інформація відносно руху регістру.

Давайте створимо регістр в якому буде фіксуватись інформація про рух наших дисків.

Регістр накопичення відповідно буде називатись ЗалишкиДисків і матиме лише один вимір «Диски», (посилання на відповідний довідник, та один ресурс – «Кількість», де вказуватиметься скільки дисків прийшло чи пішло.

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

Відкриваємо в конфігуратор документ ПрихіднаНакладна.

Якщо ви уважно робили попередні уроки, то ви помітили що стала активною закладка «Рухи», якраз з нею ми і будемо працювати.

В верхньому віконечку вибираємо регістр накопичення «ЗалишкиДисків» і відзначаємо його галочкою, потім в нижній частині вікна натискуємо на кнопку «Конструктор рухів»

Ви побачите наступне вікно:

Конструктор рухів в «1с:Підприємство 8.1»

В табличці «Регістри» вказано той регістр рухи якого ми будемо конструювати.

Рухи по регістрах можуть бути двох типів: Прихід (чомусь по версії «1с:Підприємство 8.1» це «Прибуток») та розхід (по версії «1с:Підприємство 8.1» – «Видаток»).

В початковому варіанті в реквізитах документу вказано лише реквізити шапки документу, в разі якщо нам потрібно зробити рух по табличній частині вказуємо її у відповідному полі.

Після підготовчої частині вказуємо в нижній табличній частині відповідність реквізитів документу – значенням відповідних вимірів та ресурсів регістру. Для цього просто потрібно натиснути спочатку на порожньому полі в колонці «Вираз» а потім двічі клацнути на відповідному реквізиті документу. До речі для полегшення вибору реквізитів на відповідних до вимог регістру полях збоку з’являються маленькі червоні галочки. Коли багато реквізитів це дуже полегшує роботу.

Після натискування кнопки «ОК» бачимо наступну картину:

«Конструктор рухів» створив наступний код:

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

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

// Даний фрагмент побудований конструктором.

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

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

// регістр ЗалишкиДисків Приход

Движение = Движения.ЗалишкиДисків.Добавить();

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

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

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

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

КонецЦикла;

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

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

Перша стрічка вказує що код буде виконуватись лише при проведенні документу, це наперед визначена зарезервована процедура.

Друга і передостання стрічки це службові коментарі. Значення яких вказано в 3 і 4 стрічках.

Наступні стрічки це, властиво, сам значущий код програми.

Конструкція

Для Каждого … Из … Цикл

КонецЦикла;

Це стандартна конструкція «1с:Підприємство 8.1» для перебору табличної частини звертання до якої іде по назві «Товар».

Зауважте що об’єкт мови «1с:Підприємство 8.1» ДокументОбъект властивість Движения яке повертає колекцію наборів рухів регістрів до яких можна звернутись набравши крапку і назву регістру.

Таким чином в першій лінійці циклу ми додаємо до об’єкту Движения новий запис і зберігаємо його в змінній Движение. Потім ми присвоюємо потрібні значення полям, і так поки працює цикл. Після закінчення циклу ми записуємо значення в регістр одним масивом.

Ну що ж перевіримо чи працює те що ми так красиво описали

Запускаємо «1с:Підприємство 8.1» та відкриємо спочатку Регістр накопичення «Залишки дисків» (Операції-регістри накопичення –залишки дисків)

А потім документ «Прихідна накладна». (Операції-документи-прихідна накладна)

Коли ви натисните на «ОК» в регістрі з’являться відповідні записи.

Тепер налаштуємо наш документ ПозичивПодивитись.

Дії аналогічні як і з налаштуванням приходної накладної

Йдемо «Рухи – Регістр накопичення – Залишки дисків» потім конструктор рухів.

Єдина суттєва зміна це «Тип руху регістру» – «Видаток» див. рис.

Натискування «ОК» призведе до формування наступного коду він дуже подібний до попереднього.

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

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

// Даний фрагмент побудований конструктором.

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

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

// регістр ЗалишкиДисків Расход

Движение = Движения.ЗалишкиДисків.Добавить();

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

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

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

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

КонецЦикла;

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

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

Збережемо документ і запустивши «1с:Підприємство 8.1» перевіримо як він працює

Як видно з скріншоту рух по регістру відбувся. Отже документ рацює правильно поздоровляю!

В наступному уроці будемо вчитись створювати звіти.

Вчитись створювати конфігурацію ми будемо повторюючи курс офіційної книжки 1с: «Практическое пособие разработчика» Ну що ж почнемо