На нижней панели инструментов щелкните по кнопке Запустить . Форма списка будет представлена так, как она будет выглядеть в режиме 1С: Предприятие. Видно, что очень много реквизитов и приходиться использовать горизонтальную прокрутку. Разместим реквизиты по удобнее (см. рис. 4.5). Для того, чтобы разместить реквизиты в одной строке (например, Документ и Время) или в одной колонке (Время и Дата), необходимо вызвать окно свойств реквизита и на вкладке Положение установить соответствующее положение реквизита в форме.

Рис. 4.5. Экранная форма Журнала проводок.

Задание 4. Создание экранных форм Операции.

Перейдем к созданию формы операции. Для этого:

1. В окне метаданных выделите объекта метаданных Операция и откройте для редактирования окно свойств.

2. Щелкните по кнопке [Форма операции], в окне Размещение реквизитов вставьте все реквизиты кроме Плана счетов (табличная часть).

3. Отредактируйте форму операции согласно рис 4.6, используя для проверки уже известную кнопку Запустить .

Рис. 4.6. Экранная форма Операции.

4. Создайте форму списка, щелкнув по кнопке [Форма журнала] и далее Форма списка. Отредактируйте на свое усмотрение.

Отредактируйте пользовательское меню, способом, описанным в главе 2, сохраните изменения метаданных, перейдите в режим 1С: Предприятие и проверьте результат вашей работы, выполнив команды Операции/Журнал операций, Операции/Журнал проводок, Документы/Операция, Журналы/Операции.

5. Создание первичных документов.

Итак, переходим к созданию документов. Для этого у нас уже все готово: ), операции иплан счетов создан (всего три счета - но уже план проводки спроектированы. Ранее уже упоминалось, что будем проектировать Приходный и Расходный кассовый ордеры, с помощью которых будем принимать и выдавать сотрудникам деньги из кассы. Конечно же, наш документ не претендует на гибкость, т. к. формирование конкретной проводки (Дебет 50 – Кредит 73) будет прописано в самой программе, а поступление денег с расчетного счета и на расчетный счет у нас вообще пока учитываться не будет. Идеальный вариант – когда корреспондирующий счет выбирается самим пользователем в экранной форме документа. Но это наш первый документ, поэтому пока обойдемся без дополнительных сложностей.

Задание 1. Создание нового журнала.

Прежде чем создавать документ, подготовим для его хранения специальный журнал Кассовые. Для этого:

1. В окне метаданных выделите объект Журналы и из контекстного меню выполните команду Новый журнал.

2. В окне свойств введите Идентификатор и Синоним – Касса, тип журнала – обычный.

3. Форму журнала пока создавать не будем, т.к. позже будем добавлять новые графы журнала.

4. Сохраните изменения метаданных.

Задание 2. Создание Приходного кассового ордера №1.

Для начала определим, какие дополнительные реквизиты, кроме основных, коими являются Номер документа и Дата документа, будет иметь наш первый документ – Приходный кассовый ордер. Пусть это будет следующий список:

1. Автор документа – необходимо знать на ком лежит ответственность.

2. Плательщик – от кого принимаем деньги.

3. Сумма – сколько принимаем денег.

4. Основание – зачем принимаем деньги.

5. Комментарий – есть во всех документах и мы не отстаем.

2.1. Создание документа. Приступим к определению свойств документа. Для этого:

1. В окне метаданных выделите объект Документы и из контекстного меню выполните команду Новый документ.

2. Заполните свойства документа согласно рис. 5.1.

3. Добавьте реквизиты шапки. Для реквизитов АвторДокумента, Основание, Комментарий – тип значения Строка; для реквизита Плательщик – С.Сотрудники; для реквизита Сумма – Число, длина – 17, точность – 2, разделять триады – ДА, неотрицательный – ДА.

Рис. 5.1 Окно свойств документа Приходный кассовый ордер. 2.2. Создание формы документа. Спроектируем внешний вид формы документа. Для этого:

1. Щелкните по кнопке [Форма].

2. В окне Размещение реквизитов добавьте все реквизиты в форму.

3. Разместите реквизиты в форме, например, как на рис. 5.2, переименовав заголовки текстовых полей и установив шрифтовое оформление на свой вкус.

4. Поле ввода АвторДокумента сделайте недоступным, установив соответствующий флажок на вкладке Общие окна свойств поля ввода.

Рис. 5.2 Экранная форма документа Приходный кассовый ордер.

5. Перейдите в Модуль формы и введите процедуру, по которой определяется текущий пользователь и его фамилия вводится в поле АвторДокумента.

Процедура ВводНового() АвторДокумента=СокрЛП(ИмяПользователя()); КонецПроцедуры 2.3. Проведение документа. Теперь нам предстоит важный момент – написать процедуру для проведения документа. Проводки создаются в модуле документа с использованием предопределенной процедуры ОбработкаПроведения(). Запишем данную процедуру. Для этого:

1. Перейдите в окно свойств документа и щелкните по кнопке [Модуль документа].

2. Откроется окно текстового редактора для написания программы.

3. Введите следующий программный код:

Процедура ОбработкаПроведения() Если Плательщик.Выбран()=0 Тогда Сообщить("Документ Приходный ордер №"+НомерДок+" от "+ДатаДок+" |не проведен. |Не выбран Плательщик"); НеПроводитьДокумент(); Возврат; КонецЕсли; Операция.НоваяПроводка(); // Создаем проводку Операция.Дебет.Счет = СчетПоКоду("50.01",ПланыСчетов.НашПлан); Операция.Кредит.Счет = СчетПоКоду("73.01",ПланыСчетов.НашПлан); Операция.Кредит.Сотрудник = Плательщик; Операция.Сумма = Сумма; Операция.Содержание = Основание; Операция.СуммаОперации = Сумма; Операция.Автор = АвторДокумента; Операция.Записать(); КонецПроцедуры В данном случае процедура достаточно проста: в одном документе – одна проводка. 2.4. Редактирование журнала Касса. Теперь вернемся к редактированию журнала Касса и добавим новую графу. Для этого:

1. В окне метаданных откройте журнал Касса для редактирования.

2. В окне свойств щелкните по кнопке [Новый] для добавления новой графы в журнал.

3. Установите свойства графы согласно рис.5.3.

4. Из списка возможных значений выберите реквизит Сумма Приходного кассового ордера и добавьте его в список выбранных значений.

Рис. 5.3 Добавление новых граф в журнал Касса. Отредактируйте пользовательское меню, сохраните изменения метаданных перейдите в режим 1С: Предприятие. Проверьте работу документа Приходный кассовый ордер: внесите необходимые данные, проведите документ, удостоверьтесь в наличии записей в Журнале проводок, Журнале операций, Журнале Касса.

Задание 3. Создание Приходного кассового ордера №2.

3.1. Создание Приходного кассового ордера №2. Созданный ранее Приходный кассовый ордер не является гибким, т.к. нет возможности выбрать интересующий нас корреспондирующий счет. Попытаемся исправить этот недочет. Создадим в нашей конфигурации еще один приходный ордер, но уже более продвинутый. Нет необходимости создавать его заново – воспользуемся копией уже имеющегося ордера. Сначала немного отредактируем старый приходный ордер: Идентификатор – ПриходныйОрдер1, синоним – Приходный кассовый ордер №1. Сохраните изменения метаданных и отредактируйте пользовательское меню. Для создания копии выделите ПриходныйОрдер1 и выполните команду Действия/Запомнить, а затем – Действия/Вставить. Отредактируем новый приходный ордер. Для этого:

1. В окне метаданных выделите копию ордера и откройте его для редактирования.

2. Идентификатор – ПриходныйОрдер2, синоним – Приходный кассовый ордер №2.

3. Добавьте новые реквизиты:

   • КоррСчет. Идентификатор – КоррСчет, Синоним – Корреспондирующий счет, Тип значения – Счет.НашПлан.

   • Субконто1. Идентификатор – Субконто1, Синоним – Субконто 1, Тип значения – неопределенный.

   • Субконто2. Идентификатор – Субконто2, Синоним – Субконто 2, Тип значения – неопределенный.

Теперь мы сможем выбирать счет в форме диалога. 3.2. Создание экранной формы. Отредактируем экранную форму нового ордера. Для этого:

1. Щелкните по кнопке [Форма].

2. Добавьте новые реквизиты, используя кнопку Реквизиты на нижней панели инструментов.

3. Для реквизита Коррсчет добавьте текстовое поле с заголовком Корреспондирующий счет (см. рис. 5.4). На вкладке Дополнительно пропишите формулу ПриВыбореСчета().

4. Для реквизитов Субконто1 и Субконто2 добавьте текстовые поля с пустым заголовком и формулами (вкладка Дополнительно) КоррСчет.ВидСубконто(1) и КоррСчет.ВидСубконто(2) соответственно.

5. Для новых реквизитов создайте рамку группы (кнопка ).

Рис. 5.4 Экранная форма документа.

6. На вкладке Модуль добавьте процедуру ПриВыбореСчета().

Процедура ПриВыбореСчета() Для А = 1 По 2 Цикл НазначитьТип("Субконто"+А,КоррСчет.ВидСубконто(А)); КонецЦикла; КонецПроцедуры

7. С помощью кнопки Запустить просмотрите форму в режиме 1С.

3.3. Создание процедуры проведения. Осталось написать процедуру проведения документа. Перейдите в окно свойств документа и щелкните по кнопке [Модуль документа]. Процедура ОбработкаПроведения() Если Плательщик.Выбран()=0 Тогда Сообщить("Документ Приходный ордер №"+НомерДок+" от "+ДатаДок+" |не проведен. |Не выбран Плательщик"); НеПроводитьДокумент(); Возврат; // Встроенная процедура Сообщить() выводит в нижней части 1С сообщение, заключенное в кавычки КонецЕсли; // Проверяем заполнение реквизита КоррСчет Если КоррСчет.Выбран() = 0 Тогда СтатусВозврата(0); Возврат; КонецЕсли; //Сравниваем значения реквизита Плательщик со значениями Субконто1 и Субконто2 Если Субконто1<> Плательщик Тогда Если Субконто2<> Плательщик Тогда Сообщить("Документ Приходный ордер №"+НомерДок+" от "+ДатаДок+" |не проведен. |Значение Плательщика не соответствует значению объекта аналитики!"); НеПроводитьДокумент(); Возврат; КонецЕсли; КонецЕсли; //Проверяем значение реквизита Сумма Если Сумма > 0 Тогда Операция.НоваяПроводка(); // Создаем проводку Операция.Дебет.Счет = СчетПоКоду("50.01",ПланыСчетов.НашПлан); Операция.Кредит.Счет = КоррСчет; Операция.Кредит.Счет = КоррСчет; Операция.Кредит.Субконто(1,Субконто1); Операция.Кредит.Субконто(2,Субконто2); Операция.Сумма = Сумма; Операция.Содержание = Основание; Операция.СуммаОперации = Сумма; Операция.Автор = АвторДокумента; Операция.Записать(); ИначеЕсли Сумма=0 Тогда Сообщить("Документ Приходный ордер №"+НомерДок+" от "+ДатаДок+" |не проведен. |Введите сумму документа!"); НеПроводитьДокумент(); Возврат; КонецЕсли; КонецПроцедуры Сохраните изменения метаданных, отредактируйте пользовательское меню и перейдите в режим 1С: Предприятие. Откройте ^ Приходный кассовый ордер №2 и поэкспериментируйте с ним: например, не вводите плательщика, или не вводите счет – в этом случае документ проводиться не будет, а в нижней части окна появится соответствующее сообщение: Заполните все реквизиты корректно и проведите документ. Зайдите в Журнал проводок и убедитесь в том, что документ проведен.

Задание 4. Создание Расходного кассового ордера.

Расходный кассовый ордер создайте самостоятельно. Он будет аналогичен ПКО. Только вместо реквизита Плательщик возьмите, например, реквизит Выдано. И естественно, необходимо подкорректировать модуль документа – процедуру ОбработкаПроведения(). В журнал Касса добавьте новую графу СуммаРасхода.

6. Создание отчетов.

Для оперативного получения информации по счетам в систему были введены Бухгалтерские итоги. Они хранятся и поддерживаются системой 1С: Предприятие автоматически в соответствии с существующими планами счетов. Для начала создадим новый отчет с использованием конструктора ^ Бухгалтерский запрос. Бухгалтерский запрос позволяет получить бухгалтерские итоги за произвольный период времени в режиме запроса. Создадим отчет Анализ счета. Для этого:

1. Выполните команду Конструкторы/Новый отчет.

2. На первом шаге выберите Тип отчета – в составе конфигурации, введите Идентификатор – Анализ, Синоним и Комментарий – Анализ счета.

3. Второй шаг – вставьте команду в пользовательское меню.

4. Третий шаг – вызвать конструктор бухгалтерских запросов.

5. Четвертый шаг – имя новой процедуры оставьте такой же – Сформировать.

6. Пятый шаг – выберите вид отчета – Анализ.

7. Шестой шаг – Период будет выбираться в диалоге формы.

8. Седьмой шаг – Выбирать счет в диалоге формы.

9. Восьмой шаг – Получить итоги по всем корреспондирующим счетам.

10. Девятый шаг – пропускаем, т. к. у нас только один план счетов.

11. Десятый шаг (как будем проводить анализ). Щелкните по кнопке Добавить и установите значение Строки – Период – День. В нижнем списке щелкните также кнопку Добавить и выберите Корреспондирующий счет, установите флажок – В разрезе субсчетов (см. рис. 6.1).

12. Последний шаг – вызов процедуры – выбрать кнопку С&формировать, генерировать отчет – ДА. Щелкните кнопку Готово.

Рис. 6.1 Конструктор бухгалтерских итогов. Если все сделано правильно, то должна получиться вот такая экранная форма отчета (см. рис. 6.2). Рис. 6.2 Форма отчета Анализ счета. Перейдите на вкладку Модуль и просмотрите процедуру Сформировать(). Перейдите на вкладку Сформировать (это у нас имя новой таблицы) и посмотрите шаблон печатной формы таблицы. Сохраните метаданные и перейдите в режим 1С: Предприятие. Апробируйте отчет на работоспособность, выбрав поочередно счета 73, 50 и 51.

37