Наконец мы подошли
к самому главному, созданию непосредственно системы учета. Всякая
система учета должна что-нибудь учитывать, поэтому создадим для
начала справочник товаров. Графически структуру справочника товаров
мы изобразим так, как показано на рисунке.
Здесь время
поговорить о группах и уровнях справочника. 1С позволяет разбивать
справочник на логические группы, в данном примере это группы "Пром.
Товары" и "Продукты" и подгруппы "Мебель" и "Посуда". В группах
размещен непосредственно сам товар: В группе "Пром. Товар" в подгруппе
"Мебель" товары "Стол на 6 персон" и "Стул мягкий". В группе "Пром.
Товар" в подгруппе "Посуда" товары "Тарелка глубокая" и "Супница
расписная". В группе "Продукты" товары "Кефир жирность 1.5%" и "яблоки
'Голден'". При наличии подобной структуры справочника в 1С становится
возможным ведение учета как по отдельным позициям номенклатуры,
так и суммой по группе. Это будет показано в дальнейшем. Группы
"Пром. Товары" и "Продукты" у нас лежат на 1-ом уровне справочника,
Подгруппы "Мебель" и "Посуда" и товары "Кефир жирность 1.5%" и "яблоки
'Голден'" лежат на 2-ом уровне справочника и товары "Стол на 6 персон",
"Стул мягкий", "Тарелка глубокая" и "Супница расписная" лежат на
3-ем уровне справочника. Таким образом у нас справочник будет иметь
3 уровня вложенности.
Определим какие
характеристики товара нас будут интересовать.
Во-первых
это артикул. Под артикул мы отведем предопределенное поле справочника
- "Код". Он у нас будет содержать буквы и цифры, длина не более
8 символов.
Во-вторых
это название. Под название мы выделим второе предопределенное
поле справочника - Наименование. Длина этого поля у нас пусть
будет не более 50 символов.
В-третьих
- основная единица измерения данного товара, т.е. та единица на
которую определяем цену. Это будет дополнительное поле, значение
которого мы будем выбирать из списка. Для списка стандартных единиц
измерения мы используем такой объект метаданных, как "Перечисление"
(рациональнее было бы использовать справочник, но в упрощенной
конфигурации мы пойдем самым простым путем).
В-четвертых
- цена поступления за основную единицу товара.
И в-пятых
- цена реализации за единицу товара.
Теперь разберемся
с группами. Группы будут содержать только Код и Наименование.
Переходим к
практике...
Создаем
перечисление с единицами измерения. Для этого в окне метаданных
ставим курсор на раздел "Перечисления" и создаем новое перечисление;
Субконто
не создаем - тут нужна компонента Бухгалтерия;
Вставляем
команду в пользовательское меню;
Вот появилось
окно свойств справочника. Доопределим свойства. Как и договаривались
количество уровней ставим - 3, длина кода - 8, длина наименования
- 50, группы сверху - Да, автоматическая нумерация - не нужна,
контроль уникальности - не нужен, серии кодов - все равно, тип
кода - текстовый, основное представление - в виде кода (может
быть товар с одинаковым наименованием, но разным артикулом), одна
форма для элемента и группы - Нет, редактировать - в диалоге;
Добавим реквизиты;
ЕдИзм - основная
единица измерения, тип - П.ЕдИзм (П - здесь Перечисление), для
элемента;
ЦенаП - цена
поступления, тип число 7.2, неотрицательное (отрицательная цена
- это очень интересно), периодический!!!, для элемента, изменяется
документом и вручную;
Здесь уместно
поговорить про различие между периодическими и непериодическими
элементами справочника. Периодический элемент справочника хранит
историю своего изменения! Он позволяет определить, какое значение
он имел в интересующий нас момент времени. И это очень удобно. Но
за удобство приходится платить. Код, использующий периодические
элементы более сложен, и в списке справочника нельзя сортировать
и отбирать по значениям периодических реквизитов.
ЦенаР - цена
реализации, тип число 7.2, неотрицательное, периодический, для
элемента, изменяется документом и вручную;
Теперь создаем
форму элемента справочника. Мы особыми украшательствами заниматься
не будем, нам сейчас главное функциональность;
При нажатии
на [Форма элемента] появилось окно редактирования формы элемента
и диалог с перечнем реквизитов элемента справочника. Пометим все
и нажмем [Вставить]. Форма заполнится элементами диалога и подписями
к ним. Расставим их поудобнее и изменим подписи;
Если мы будем
каждый раз создавать новый элемент справочника, нам придется вводить
много раз одну и туже единицу измерения. Это не есть хорошо. Выход
из этой ситуации таков. Мы создаем константу в которой будем хранить
единицу измерения по умолчанию;
Создаем константу
"ЕдИзмПоУмолчанию". Для этого переключимся в окно с деревом метаданных,
и в раздел "Константы" введем новую константу. Наименование -
"ЕдИзмПоУмолчанию", Комментарий - "единица измерения по умолчанию",
Тип - П.ЕдИзм;
Возвращаемся
в форму элемента справочника;
Переключаемся
на закладку "Модуль". Сюда мы напишем код:
Процедура ВводНового()
// предопределенная процедура
// при вводе нового элемента справочника
ЕдИзм=Константа.ЕдИзмПоУмолчанию;
// в поле ЕдИзм заносим значение из
константы
КонецПроцедуры
Нам еще не
нравится, что при вводе цены прихода цена реализации остается
неизменной. Мы хотим чтобы цена реализации была равна цене прихода
плюс наценка процентом, с возможностью редактирования цены реализации;
Вводим константу
"ПроцентНаценки", Комментарий - "процент наценки на приходную
цену", тип - число 5.2;
Переключаемся
на закладку "Модуль". В свойствах поля ЦенаП на закладке "Дополнительно"
напишем формулу ЦенаП();
В модуле
формы элемента напишем следующую процедуру:
Процедура ЦенаП()
ЦенаР=ЦенаП*(1+(Константа.ПроцентНаценки/100));
//Константа.ПроцентНаценки у нас в %
КонецПроцедуры Кстати, на картинке есть флаг на опции "Имеет кнопку
выбора", если ее ставить у поля ввода, то у числовых полей будет
появляться калькулятор, у полей типа дата - календарик (такой маленький
справа).
Работа с
элементом справочника закончена. Можем закрыть его;
Возвращаемся
в окно со свойствами справочника;
Начинаем
редактировать форму группы. Она будет иметь самый примитивный
вид, как на картинке, но можно и как ни будь украсить (по желанию);
Кода никакого
не будет. Закрываем окно редактирования формы группы справочника;
Возвращаемся
в окно со свойствами справочника;
Будем редактировать
форму списка справочника. У справочника может быть несколько форм
списка, для разных случаев, содержащих разные наборы реквизитов.
В данном случае пока обойдемся одной формой;
В окне свойств
справочника выберем по кнопке [Формы списка] из выпавшего меню
пункт "Форма списка";
Появится
диалог с перечнем реквизитов похожий на предыдущие, отметим, что
нам еще нужно дерево групп и нажмем [Вставить];
Отредактируем
размеры формы и элементов диалога и добавим две кнопки;
Первая
кнопка Заголовок - Закрыть, Формула - #Закрыть.
Эта кнопка будет закрывать форму списка. Команда #Закрыть -
напрямую закрывает форму, без написания какого-либо еще кода.
Очень полезная команда (см КиА т.2);
Вторая
кнопка Заголовок - Печать, Формула - Печать().
Эта кнопка позволит нам распечатать справочник. Но надо писать
код;
(Вид формы списка справочника номенклатуры)
Переключимся
на закладку "Модуль" окна редактирования формы списка справочника.
Впишем код:
Процедура Печать()
СпрТов=СоздатьОбъект("Справочник.Номенклатура");
// это мы создали в памяти копию справочника
СпрТов.ПорядокКодов();
// справочник мы желаем сортировать
по кодам
СпрТов.ВыбратьЭлементы();
// открываем выбор элементов
Таб=СоздатьОбъект("Таблица");
// создаем объект для печатной формы
Таб.ИсходнаяТаблица("Таблица");
// указываем какую таблицу брать за
основу
Таб.ВывестиСекцию("Шапка");
// формируем шапку печатной формы
Пока СпрТов.ПолучитьЭлемент()=1 Цикл
// пока есть очередной получаемый элемент
ТЭ=СпрТов.ТекущийЭлемент();
// временная переменная для краткости
Если ТЭ.ЭтоГруппа()=1 Тогда
// если текущий элемент справочника
группа
Код=ТЭ.Код;
Наз=ТЭ.Наименование;
Таб.ВывестиСекцию("Группа");
// выводим строку для группы
Иначе
// просто элемент
Код=ТЭ.Код;
Наз=ТЭ.Наименование;
ЕдИ=Строка(ТЭ.ЕдИзм);
ЦенаП=ТЭ.ЦенаП.Получить(ТекущаяДата());
// а это как получить значение периодического
реквизита!!!
// ТекущаяДата() - функция возвращающая текущее число
ЦенаР=ТЭ.ЦенаР.Получить(ТекущаяДата());
Таб.ВывестиСекцию("Элемент");
КонецЕсли;
КонецЦикла;
Таб.ТолькоПросмотр(1);
// а нечего редактировать!
Таб.ПараметрыСтраницы(1,100,1);
Таб.Показать("");
// делаем печатную форму видимой. Можно
посылать на принтер
КонецПроцедуры
Теперь переключаемся
в закладку "Таблица". Табличных частей у одной формы может быть
несколько, но это так, для справки;
Тут хорошо
почитать КиА том 2 со стр.162 и далее;
Рисуем шаблон
нашей печатной формы. В секции "Шапка" все поля текстовые, в секциях
"Группа" и "Элемент" - выражения. Оформление - по желанию. Главное
- названия полей. У меня это выглядит так:
Закрываем
форму списка;
Закрываем
окно свойств справочника;
Сохраняем
конфигурацию;
Нас спрашивают
про анализ изменений... [Да];
Нам сообщают,
что были внесены следующие изменения. Жмем [Принять];
Подтверждаем
сообщение о конце реорганизации данных;
2.5
Работа со справочником товаров - номенклатуры.
Нами был создан
справочник номенклатуры. Теперь мы можем войти в 1С:Предприятие
и посмотреть не него. Заодно и заполним наш справочник.
Входим в
1С:Предприятие в нашу базу "Учебная" под именем "Программист"
с паролем 123;
В меню мы
видим раздел "Справочники". В справочниках есть пока только один
- Номенклатура;
Если вы этого
пункт меню не видите, это значит, что вы при создании справочника
либо не пользовались конструктором, либо не указали необходимость
включения справочника в интерфейс. Тогда входите а меню Операции.
Там находим команду "Справочники". Появился список справочников.
В списке находим справочник номенклатуры и открываем его;
Через меню
Действие командой "Новая группа" создадим группу из первого уровня
- Код - 00000001, Наименование - "Пром. товары", [ОК];
Программа
спросит нас сохранить ли элемент. Ответим [Да];
Аналогично
введем группу "Продукты" с кодом 00000002;
Теперь входим
внутрь группы "Пром. товары";
Вводим две
подгруппы второго уровня: "Мебель" - 00000003, и "Посуда" - 00000004.
Коды 00000001-00000004 придумал я просто для порядка сортировки
в отчете;
Теперь можно
заводить товары. Но сперва укажем значения наших констант;
В меню Операции
выбираем команду "Константы";
Появилось
окошко с перечнем наших констант. Введем значения. Для единицы
измерения по умолчанию - шт., для процента наценки - 35;
Закроем окно
с константами;
В справочнике
"Номенклатура" входим в подгруппу "Мебель";
Меню Действие
команда "Новый";
Появилось
окошко для ввода данных по товару;
Заполняем:
Артикул - СТО-023, Наименование - "Стол на 6 персон", Ед.Изм -
шт, цена поступления - 2500 цена реализации сформировалась сразу
после нажатия на [ENTER] после ввода цены прихода и составила
3375, [ОК]. Сохранить элемент - [Да]. Остальные товары занесем
в соответствующие группы, если цена расхода предлагаемая машиной
и цена в табличке не равны, поправляем машину;
Группы
и товары
Цена
поступления
Цена
реализации
Ед.
измерения
Пром.
товары
Мебель
Стол на 6 персон СТО-023
2500
3375
шт.
Стул мягкий СТУ-012
780
1050
шт.
Посуда
Супница расписная СУП-004
87.25
118
шт.
Тарелка глубокая ТАР-123
18.75
25
шт.
Продукты
Кефир жирность 1.5% МПР-0342
6.90
9.32
шт.
Яблоки "Голден" ФРЯ-908
17.50
25
кг.
Теперь нажмем
[Печать] в форме списка справочника. Это будет выглядеть примерно
так. Любуемся результатом;
Полученную
табличную печатную форму мы можем послать на принтер;
Выходим из
1С:Предприятия. Так как сохранить изменения в конфигураторе мы
можем только если ВСЕ пользователи выйдут из программы 1С:Предприятие.
Не вышедших можно найти, если воспользоваться Монитором, но и
он ничего не покажет, если кто-то открыл окно для ввода имени
пользователя и пароля и не вошел. Таких надо учить...
2.6
Продолжение работы с товарами.
У нас есть
справочник номенклатуры. В нем у каждого товара мы указали основную
единицу измерения. Но мы ведь можем работать и с большими количествами.
Например мы можем продать ящик яблок, в ящике, к примеру, 25 кг.
Или ящик с тарелками, где их 12 штук. Мы можем пользоваться и другими
единицами, если их занесем, соответственно, как значения перечисления
ЕдИзм. Это не возбраняется. Хорошо посмотреть "Общероссийский классификатор
единиц измерения". Но вернемся к нашей программе. Мы пришли к выводу,
что нам необходимо как-то указать, что товар может измеряться не
только в базовой единице, но и в каких-то кратных ей других единицах
измерения. Так яблоки у нас будут либо в килограммах, либо в ящиках
по 25 кг., тарелки либо в штуках, либо в ящиках комплектом на дюжину
персон, кефир либо в пакетах по 1 штуке, либо в ящиках по 15 штук
пакетов.
Эта задача в 1С решается следующим способом. Мы заведем новый справочник
подчиненный справочнику товаров. Подчиненность означает, что каждая
запись справочника товаров может иметь, принадлежащие только ей,
одну, либо несколько, либо вообще не иметь, записей в подчиненном
справочнике. Тут неплохо ознакомится с теорией реляционных баз данных.
Литературы по этому вопросу есть много. Например книги Баркера,
любая книжка по MS Access для начинающих и т.д.
Опишем каким мы хотим видеть наш подчиненный справочник. Название
ему дадим "Единицы". В нем должны быть перечислены единицы измерения
товара, включая базовую, и коэффициенты пересчета этих единиц в
базовую, для базовой это "1". Реализуем нашу идею.
Создаем новый
справочник;
Идентификатор
- "Единицы", Комментарий - "единицы измерения товара";
В интерфейс
вставлять не будем, это служебный справочник;
[Готово].
Появилось окно свойств справочника;
ГЛАВНОЕ:
В поле подчинен выбираем справочник "Номенклатура". Этим мы и
указываем характер их отношений;
Количество
уровней - 1, следовательно групп у нас не будет, и зачем?. Длина
кода - 5, длина наименования - 0. Мы не будем использовать это
поле за ненадобностью. Серии кодов в пределах подчинения, тип
кода - текст, сюда мы будем заносить текстовое представление названия
единицы измерения, основное представление - код (другого варианта
и нет). Автоматическая нумерация и контроль уникальности нам не
нужны;
Занесем два
новых реквизита: Первый - "Ед", тип - П.ЕдИзм. Второй - "Коэффициент",
тип Число 5.0, неотрицательный;
Редактировать
будем в диалоге;
Создаем форму
элемента;
Если Вы обратили
внимание, предопределенное поле Наименование нам для выбора не
предложили, это потому, что мы указали его длину = 0;
Расставим
поля как-нибудь поудобнее, но можем оставить и так;
Поле ввода
кода сделаем недоступным - сюда мы будем, как и договорились ранее,
автоматически заносить строковое представление названия единицы
измерения;
Пусть поле
ввода "Коэффициент" у нас будет с кнопкой выбора - так симпатичнее;
В поле ввода
"Ед" добавим в формулу процедуру Ед();
В модуле
формы пишем код процедуры Ед():
Процедура Ед()
Код=Строка(Ед);
// Здесь функцией Строка() мы получаем
строковое
// представление значения перечисления
КонецПроцедуры
Еще мы хотим
при вводе новой единицы измерения нам по умолчанию бы ставилось
то значение, которое стоит у товара-владельца в качестве основного,
ну соответственно и коэффициент должен ставиться равным единице.
Пишем знакомую уже нам предопределенную процедуру:
Процедура ВводНового()
Ед=Владелец.ЕдИзм;
// А вот это важно. Здесь "Владелец"
это указание на запись в справочнике
// "Номенклатура", которой будет принадлежать эта единица измерения
Коэффициент=1;
Код=Строка(Ед);
КонецПроцедуры В 1С ссылки на реквизиты таблиц имеют такой же вид
как и ссылки на атрибуты и методы объектов (через "."), а не как
в VBA, где используется "!";
Для закрепления
информации о ссылке "Владелец" внесем текстовое поле, которое
в форме элемента будет нам выводить код и наименование товара-владельца:
В диалоге
вставим из меню Вставить командой "Текст" текстовое поле;
В окошке
свойств этого текста очистим поле "Заголовок";
На закладке
"Дополнительно" введем формулу
"("+СокрЛП(Владелец.Код)+")
"+СокрЛП(Владелец.Наименование)
Здесь СокрЛП() - это функция, которая удаляет пробелы в конце
и в начале текстовой строки, "(" - текстовое выражение в коде
в 1С заключают в кавычки, + в 1С служит и знаком конкатенации
текстовых выражений;
На закладке
"Шрифт" выберем какой нибудь шрифт и оформление по нашему вкусу;
Нажмем
[ОК];
Разместим
это текстовое поле где ни будь сверху формы;
Скопируем
это текстовое поле в буфер обмена;
Форма элемента
готова. Закроем ее;
Создадим
форму списка;
Растянем
поля пошире, чтоб заголовки полей были видны полностью, и вставим
наверх из буфера обмена текстовое поле;
Форму списка
можно закрыть;
Сохраняем
изменения и входим в 1С:Предприятие;
Войдем в
справочник номенклатуры;
Найдем "Кефир"
и установим на него курсор;
Из меню Действия
командой "Подчиненный справочник" вызовем справочник "Единицы".
Если бы у нас было несколько справочников подчиненных справочнику
товаров, то нам пришлось бы выбирать из списка;
Введем новый
элемент. Это будет элемент с базовой единицей. Ничего изменять
не будем и сохраним его;
Теперь введем
еще один элемент - с производной единицей измерения;
Единица Ц
ящик (ящ.), коэффициент - 15;
В списке
единиц у нас две записи;
Переключимся
в справочник товаров и установим курсор на яблоках;
Возвращаемся
в справочник единиц - он пуст. Две единицы, что мы только что
ввели относятся к кефиру, соответственно в списке записей относящихся
к яблокам их и не должно быть;
Введем аналогичным
образом две записи для яблок: килограмм (кг.) коэффициент - 1,
ящик (ящ.) коэффициент - 25;
Для остальных
товаров внесем записи, как было сказано в начале главы. Обратите
внимание, мы не можем создать подчиненные записи к элементу типа
группа;
Разместив
на экране рядом справочники товаров и единиц и переходя курсором
по записям о товарах, мы можем видеть как в справочнике единиц
меняются наборы записей;
Закроем справочник
товаров. Установим курсор в справочнике единиц на любой записи;
Через меню
Действия выполним команду "Иерархический список";
В справочнике
единиц стало видно сразу множество записей;
Переходя
по ним курсором, мы видим как меняется содержание текстового поля
вверху списка, где мы указали выводить код и наименование владельца;
Остановимся
на какой либо из записей;
Через меню
Действия выполним команду "Иерархический список";
Снова в списке
остались только записи относящиеся к какому-то одному товару;
Через меню
Действия выполним команду "Справочник-владелец";
Открылся
справочник товаров. Курсор в нем установился на том товаре, который
являлся владельцем текущей единицы измерения;
Если мы будем
выключать-включать иерархический список в справочнике товаров,
то мы будем видеть соответственно либо все товары и группы сразу,
либо только относящиеся к текущей группе/подгруппе;
