Внешняя печатная форма Т-5 (на каждого сотрудника отдельно) для документа Кадровый перевод списком для 1С: ЗУП 3.1.11, 3.1.10

03.03.20

В документе Кадровый перевод списком для ЗУП 3.1 есть стандартная печатная форма Т-5а, которая выводит приказ о перемещении тем же списком. На самом деле это не всегда удобно, так как приказ должен подшиваться кадровиком в личное дело сотрудника, и сведения о кадровых изменениях других работников там не к месту. Внешняя печатная форма Т-5 для документа Кадровый перевод списком решает эту задачу, позволяя вывести форму приказа Т-5 на каждого сотрудника отдельным листом.

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование		По подписке [?]	Купить один файл
Внешняя печатная форма Т-5 (на каждого сотрудника отдельно) для документа Кадровый перевод списком для 1С: ЗУП 3.1.10, 3.1.11 .epf 9,10Kb 50	50	Скачать (1 SM)	Купить за 1 850 руб.
Внешняя печатная форма Т-5 (на каждого сотрудника отдельно) для документа Кадровый перевод списком для 1С: ЗУП 3.1.12 .epf 9,12Kb 106	106	Скачать (2 SM)	Купить за 2 150 руб.

Такие печатные формы востребованы (например: //infostart.ru/public/504491/, //infostart.ru/public/730058/), но к сожалению из-за постоянных доработок типовых релизов, довольно часто перестают работать. Причина банальна - методы из типовой ЗУП, которые разработчик внешней печатной формы использовал, в новых релизах конфигурации кардинальным образом изменены или вовсе перестали существовать.

Эта печатная форма адаптирована под последнюю редакцию Зарплата и управление персоналом, 3.1.11 и может использоваться начиная с редакции 3.1.10. и более ранних, если там есть типовой отчет "ПечатнаяФормаТ5а". Для этого следует зарегистрировать скачанный файл в разделе "Администрирование - Печатные формы, отчеты и обработки - Дополнительные отчеты и обработки".

Отчет тестировался на конфигурации 1С:ЗУП 3.1.11.106.

03.03.2020 Версия 1.1 для редакции 1С: ЗУП 3.1.12

Отчет доработан в связи критичными изменениями в родительской конфигурации.

Тестировалось на редакции 1С:ЗУП 3.1.12.144.

Кадровый перевод списком внешняя печатная форма Т-5 ЗУП 3.1

+1 –

См. также

Обновление для конфигураций 1С:КА 1.1, ЗУП 2.5, Бухгалтерия 2.0

Зарплата Регламентированный учет и отчетность Кадровый учет Обновление 1С Бухгалтер Платформа 1С v8.3 Сложные периодические расчеты 1С:Комплексная автоматизация 1.х 1С:Бухгалтерия 2.0 1С:Зарплата и Управление Персоналом 2.5 Бухгалтерский учет Налоговый учет Управленческий учет Акцизы ЕНВД ЕСН Земельный налог ИП, ПБОЮЛ, КФХ Налог на имущество Налог на прибыль НДС НДФЛ ФОМС, ЕФС Транспортный налог УСН ПСН (патентная система налогообложения) Платные (руб)

Пакет обновлений для старых конфигураций 1С:КА 1.1, ЗУП 2.5 и БУХ 2.0 - УСН, НДС 5%, 7%, НДФЛ новая шкала 2025, ЕФС-1, Расчет страховых взносов, Статистика, СЗВ-ТД, 2-НДФЛ, Регламентированная отчетность, Кадровый учет, Прослеживаемость импортных товаров. С 14.04.25 ожидается увеличение стоимости на 10%

30690 руб.

01.04.2020 156439 579 392

267

Из Excel в 1С "одним нажатием"

Загрузка и выгрузка в Excel Оптовая торговля Печатные формы Бухгалтер Пользователь Платформа 1С v8.3 Управляемые формы Платформа 1C v8.2 1C:Бухгалтерия 1С:Комплексная автоматизация 1.х 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Розница 2 1С:Управление производственным предприятием 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Управление холдингом 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Бухгалтерский учет Управленческий учет Платные (руб)

Универсальная обработка для загрузки документов из Excel в 1С. Забудьте о ручном вводе: загружайте документы из Excel в 1С за секунды! Не требует указания параметров (номера колонок, номер первой строки таблицы и т.д.) и предварительной настройки. Просто выбираете файл Excel, документ 1С и нажимаете кнопку "Загрузить". Обработка сама находит таблицу в файле Excel, необходимые для загрузки данные в ней (номенклатура, количество, НДС, цена, сумма) и загружает ее в 1С.

8000 руб.

09.11.2016 244844 1134 912

1055

Infostart PrintWizard (конструктор печатных форм)

Пакетная печать Печатные формы Инструментарий разработчика Программист Платформа 1С v8.3 Запросы 1С:Зарплата и кадры бюджетного учреждения 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 Платные (руб)

Инструмент, позволяющий абсолютно по-новому взглянуть на процесс разработки печатных форм. Благодаря конструктору можно значительно снизить затраты времени на разработку печатных форм, повысить качество и "прозрачность" разработки, а также навести порядок в многообразии корпоративных печатных форм.

22200 руб.

06.10.2023 20505 52 19

УТ 11, КА 2, ERP 2: Настраиваемые под каждую организацию печать и подпись ответственных лиц в печатных формах (ТОРГ-12, Счёт-фактура, УПД, УКД, Заказ клиента, Акт сверки, М-15 и др.)

Печатные формы Взаиморасчеты Оптовая торговля Производство готовой продукции (работ, услуг) Акт сверки Бухгалтер Пользователь Оперативный учет Управляемые формы 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Бухгалтерский учет Управленческий учет Платные (руб)

Задайте для каждой организации свою печать и для каждого физического лица свою подпись. Выберите в документе печатную форму "... с печатью и подписью" - и автоматически сформируется табличный документ с печатью и подписями той организации и ответственных лиц, которые указаны в документе.

14400 руб.

13.03.2018 63259 227 79

120

Путевые листы (расширение)

Печатные формы Бухгалтер Платформа 1С v8.3 Бухгалтерский учет 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Транспорт, автопарки, такси Бухгалтерский учет Платные (руб)

Учет путевых листов выполнен в виде расширения. Предназначен для учета путевых листов в конфигурации БП 3.0., УТ 11.5 и КА 2.5 Печатная форма: Типовая межотраслевая форма № 3. Утверждена постановлением Госкомстата России от 28.11.97 № 78. Типовая межотраслевая форма № 4-П от 18.09.2008 г. N 152 с учетом изменений указанных в Приказе Министерства транспорта Российской Федерации №368 от 11 сентября 2020 г. №368, Типовая межотраслевая форма № ЭСМ-7, и др. ЭСМ-2, 4-С, 3 спец., 6 спец., ПЛ для Автомобильного крана.

4800 руб.

14.10.2019 40723 284 216

186

Печать актов форм МХ-1, МХ-3 в 1С:БП 3.0

Печатные формы Логистика, склад и ТМЦ Бухгалтер Платформа 1С v8.3 Бухгалтерский учет 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Платные (руб)

Обработки для "1С:Бухгалтерия предприятия 3.0", которые формируют акты МХ-1 и МХ-3 для документов "ПоступлениеТоваровУслуг", "Реализация товаров услуг", "Возврат товаров поставщику", "Передача материалов в эксплуатацию" соответственно. Так же можно сформировать акты с факсимиле, которая загружена в 1С:Бухгалтерия предприятия 3.0.

3720 руб.

18.02.2019 66330 229 15

182

Универсальная печать по шаблонам Word (Печать договоров из 1С БП 3, УНФ 1.6, ЗУП 3, УТ 11, КА 2, ERP 2, ДО 3)

Печатные формы Программист Пользователь Платформа 1С v8.3 Управляемые формы 1C:Бухгалтерия 1С:ERP Управление предприятием 2 Платные (руб)

Научите вашу 1C печатать из 1С в файл Word (Например: трудовые договоры, договоры с контрагентами, спецификации, дополнительные соглашения, приказы, коммерческие предложения, акты, накладные, карточки партнера или любого справочника и многие другие). Универсальная печать предназначена для формирования печатных форм на основе шаблонов в формате Word из любой конфигурации 1С. С помощью данного инструмента можно самостоятельно заполнить шаблон реквизитами справочника или документа 1С и сформировать печатные формы на основании ссылки на любой объект.

3960 руб.

08.10.2019 49612 182 105

175

КС 2 и КС 3 в 1С Бухгалтерия 3.0: заполнить, распечатать, сохранить. Отправить по ЭДО!

Печатные формы Производство готовой продукции (работ, услуг) Бухгалтер Платформа 1С v8.3 Бухгалтерский учет Оперативный учет 1С:Бухгалтерия 3.0 Строительство Россия Бухгалтерский учет Платные (руб)

Откройте для себя заполнение КС-2 и КС-3 в "1С:Бухгалтерия 3.0". Вы получаете удобство, скорость и систему, чтобы заполнить, распечатать и сохранить формы КС-2 и КС-3 из документов "Оказание производственных услуг" или "Реализация товаров услуг". Вы можете заполнить дополнительную информацию о материалах из документов "Требование-накладная" и указать сведения, которые не предусмотрены типовой конфигурацией "1С:Бухгалтерия 3.0". Так же доступно множество настроек для формирования КС-2 и КС-3.

4560 руб.

13.02.2019 103263 467 46

449

Комментарии

Подписаться на ответы Инфостарт бот

Свернуть все

1. loginovvn 06.11.19 04:51 Сейчас в теме

Т-5

2. DedMoroz1983 2 09.01.20 05:52 Сейчас в теме

Какой макет для печати используется внешний или общий?

3. Азбука Морзе 108 14.01.20 10:14 Сейчас в теме

(2) В обработке используется внешний макет, который является копией типового макета.

4. krasil 03.03.20 14:49 Сейчас в теме

{ВнешняяОбработка.ПечатьПриказаТ5Списком.МодульОбъекта(26)}: Поле объекта не обнаружено (П)
МакетКомпоновкиДанных.ЗначенияПараметров.П.Значение.ЗагрузитьЗначения(МассивОбъектов);
Не работает.

5. Азбука Морзе 108 03.03.20 15:11 Сейчас в теме

На каком релизе?

6. Азбука Морзе 108 03.03.20 17:24 Сейчас в теме

Начиная с релиза ЗУП 3.1.12 изменились наименования параметров отчета "Кадровый перевод списком".
В связи с этим в модуле объекта обработки строку

МакетКомпоновкиДанных.ЗначенияПараметров.П.Значение.ЗагрузитьЗначения(МассивОбъектов);

следует заменить на строку:

МакетКомпоновкиДанных.ЗначенияПараметров.СсылкиНаОбъекты.Значение.ЗагрузитьЗначения(МассивОбъектов);

В ближайшее время будет доступна для скачивания обновленная ссылка.

7. krasil 04.03.20 01:33 Сейчас в теме

Релиз; Зарплата и управление персоналом, редакция 3.1 (3.1.12.142) (http://v8.1c.ru/hrm/)
Copyright © ООО "1С-Софт", 2010 - 2020. Все права защищены
(http://www.1c.ru)

Заплатка не помогла, ругается НА
{ВнешняяОбработка.ПечатьПриказаТ5Списком.МодульОбъекта(27)}: Поле объекта не обнаружено (Значение)
МакетКомпоновкиДанных.ЗначенияПараметров.Значение.ЗагрузитьЗначения(МассивОбъектов);

8. krasil 04.03.20 01:35 Сейчас в теме

Сорян, предыдущее письмо отзываю.
Работает.

9. saddhu 01.07.20 17:52 Сейчас в теме

В 3.1.14.61 делается элементарно - в модуле менеджера Кадрового перевода списком, в процедуре ДобавитьКомандыПечати после блока
Если ПравоДоступа("Просмотр", Метаданные.Отчеты.ПечатнаяФормаТ5а) Тогда
КомандаПечати = КомандыПечати.Добавить();
КомандаПечати.Обработчик = "УправлениеПечатьюБЗККлиент.ВыполнитьКомандуПечати";
КомандаПечати.МенеджерПечати = "Отчет.ПечатнаяФормаТ5а";
КомандаПечати.Идентификатор = "ПФ_MXL_Т5а";
КомандаПечати.Представление = НСтр("ru = 'Приказ о переводе (Т-5а)'");
КомандаПечати.ДополнительныеПараметры.Вставить("ТребуетсяЧтениеБезОграничений", Истина);
КомандаПечати.ПроверкаПроведенияПередПечатью = Истина;
КонецЕсли;

добавляете

Если ПравоДоступа("Просмотр", Метаданные.Отчеты.ПечатнаяФормаТ5) Тогда
КомандаПечати = КомандыПечати.Добавить();
КомандаПечати.Обработчик = "УправлениеПечатьюБЗККлиент.ВыполнитьКомандуПечати";
КомандаПечати.МенеджерПечати = "Отчет.ПечатнаяФормаТ5";
КомандаПечати.Идентификатор = "ПФ_MXL_Т5";
КомандаПечати.Представление = НСтр("ru = 'Приказ о переводе (Т-5)'");
КомандаПечати.ДополнительныеПараметры.Вставить("ТребуетсяЧтениеБезОграничений", Истина);
КомандаПечати.ПроверкаПроведенияПередПечатью = Истина;
КонецЕсли;

все.... функционал печати Т5 по сути есть, только не подключен ))

Ответить

10. vavka 6 16.07.20 18:21 Сейчас в теме

(9) Все верно, к автору поста могу добавить - лучше в расширение закинуть. Метод перехватчика "После".

Ответить

22. user1508952 01.03.22 12:34 Сейчас в теме

(9)Добрый день! Подскажите пожалуйста в какой процедуре надо вставить событие после. Ошибка Значение не является значением объектного типа (Добавить)
{Права Документ.КадровыйПереводСписком.МодульМенеджера(6)}:КомандаПечати = КомандыПечати.Добавить();

28. dikar40 9 27.11.24 10:20 Сейчас в теме

(9) Благодарю, элегантное добавление печатной формы.
Вы сэкономили мне время. Thumbs Up

11. semenoof 05.02.21 17:42 Сейчас в теме

Друзья, будет ли работать данная обработка на КА 2.4.13.119? Можно получить эту обработку на 5438995собакаgmail.com?
Заплатить 2 смартмани для теста пока нет возожности.
Спасибо.

12. semenoof 08.02.21 10:20 Сейчас в теме

Обработка была протестирована на КА 2.4.13.119. Все отлично работает. Сергей, спасибо вам, что прислали по моей просьбе обработку.

13. semenoof 08.02.21 17:25 Сейчас в теме

Друзья, подскажите, а как в этой обработке поменять нумерацию:
если имеем 3х сотрудников:
Номер документа/1
Номер доrумента/2
Номер документа/3
Сейчас проставляется один номер документа у всех 3х.

14. Азбука Морзе 108 08.02.21 18:09 Сейчас в теме

(13) В этой обработке номер документа берется из ссылки на документ Кадровый перевод списком.. А этот документ один на всех сотрудников и номер у него один. Но вы можете изменить обработку под свои нужды, ведь код у нее открыт.

21. user1608137 24.08.21 09:09 Сейчас в теме

(13)
Кадровики сразу попросили добавить в номер "через слеш" номер по порядку как в премиях ...

я сделал просто счетчиком, и передавал его в цикле доп. параметром в шапку.
[СсылкаНаОбъектНомерНаПечать]/[номерстроки]

15. DmitryKSL 158 18.02.21 12:50 Сейчас в теме

Ошибка на версии ЗУП 3.1.17.60

16. DmitryKSL 158 18.02.21 13:43 Сейчас в теме

Заменил
МакетКомпоновкиДанных = ЗарплатаКадрыОтчеты.МакетКомпоновкиДанныхОтчета(ОтчетТ5а, "Т5а");
На
МакетКомпоновкиДанных = ЗарплатаКадрыОтчеты.МакетКомпоновкиДанныхОтчета(ОтчетТ5а, "Т5аКОРП");
Версия ЗУП КОРП.

17. Азбука Морзе 108 18.02.21 16:04 Сейчас в теме

(16) Спасибо за информацию. В ближайшее время выложу версии для ЗУП 3.1.17

18. ejique 11.03.21 16:04 Сейчас в теме

Добрый день
Есть версия для 3.1.17?

19. Азбука Морзе 108 11.03.21 17:45 Сейчас в теме

(18) Текущая версия проверена для редакции 3.1.17.94.

20. user1608137 23.08.21 16:08 Сейчас в теме

Кадровики сразу попросили добавить в номер "через слеш" номер по порядку как в премиях ...

я сделал просто счетчиком, и передавал его в цикле доп. параметром в шапку.
[СсылкаНаОбъектНомерНаПечать]/[номерстроки]

23. fovconsult 01.03.22 16:47 Сейчас в теме

Добрый день! Подскажите пожалуйста в какой процедуре надо вставить событие после. Ошибка Значение не является значением объектного типа (Добавить)
{Права Документ.КадровыйПереводСписком.МодульМенеджера(6)}:КомандаПечати = КомандыПечати.Добавить();

Зарплата и управление персоналом, редакция 3.1 (3.1.21.36)

24. Азбука Морзе 108 01.03.22 17:11 Сейчас в теме

(23) Вопрос не понятен. Какое отношение он имеет к этой публикации.

25. fovconsult 01.03.22 17:13 Сейчас в теме

к комментарию saddhu если использовать расширение

26. Азбука Морзе 108 01.03.22 17:31 Сейчас в теме

(25) Так обратитесь к автору комментария. В этой публикации описана внешняя обработка, а не расширение.

27. zgs.asy 05.09.22 11:20 Сейчас в теме

Зарплата и управление персоналом, редакция 3.1 (3.1.23.20). Было и в более ранних версиях.
Отчет.ПечатнаяФормаТ5
Настройки отчета позволяют формировать печатные формы Т-5 по документу Кадровый перевод списком на каждого сотрудника, указанного в отборе (Работа.Сотрудник).

Прикрепленные файлы:

29. dikar40 9 27.11.24 10:24 Сейчас в теме

(27) Благодарю, тоже вариант и тоже красиво

30. Kostya31 09.02.25 19:51 Сейчас в теме

Делается проще, в модуль менеджера документа КадровыйПереводСписком в расширение добавляется несколько строчек и будет вам счастье)

&Вместо("ДобавитьКомандыПечати")
Процедура Silver_ДобавитьКомандыПечати(КомандыПечати)
ИдентификаторыПФ = Новый Массив;

Если Пользователи.РолиДоступны("ДобавлениеИзменениеДанныхДляНачисленияЗарплаты,ЧтениеДанныхДляНачисленияЗарплаты", , Ложь) Тогда

// Бронирование позиции
КомандаПечати = КомандыПечати.Добавить();
КомандаПечати.Обработчик = "УправлениеПечатьюБЗККлиент.ВыполнитьКомандуПечати";
КомандаПечати.МенеджерПечати = "Обработка.ПечатьКадровыхПриказовРасширенная";
КомандаПечати.Идентификатор = "ПФ_MXL_ПодтверждениеБронированияПозиции";
КомандаПечати.Представление = НСтр("ru = 'Подтверждение брони'");
КомандаПечати.ПроверкаПроведенияПередПечатью = Истина;
КомандаПечати.ФункциональныеОпции = "ИспользоватьБронированиеПозиций";

ЗарплатаКадры.ДобавитьИдентификаторКомандыДляПечатиВПакетномРежиме(ИдентификаторыПФ, КомандаПечати);

КонецЕсли;
//Добавлено (
// Приказ о переводе Т-5
Если ПравоДоступа("Просмотр", Метаданные.Отчеты.ПечатнаяФормаТ5) Тогда

КомандаПечати = КомандыПечати.Добавить();
КомандаПечати.Обработчик = "УправлениеПечатьюБЗККлиент.ВыполнитьКомандуПечати";
КомандаПечати.МенеджерПечати = "Отчет.ПечатнаяФормаТ5";
КомандаПечати.Идентификатор = "ПФ_MXL_Т5";
КомандаПечати.Представление = НСтр("ru = 'Приказ о переводе (Т-5)'");
КомандаПечати.ДополнительныеПараметры.Вставить("ТребуетсяЧтениеБезОграничений", Истина);
КомандаПечати.ПроверкаПроведенияПередПечатью = Истина;

ЗарплатаКадры.ДобавитьИдентификаторКомандыДляПечатиВПакетномРежиме(ИдентификаторыПФ, КомандаПечати);

КонецЕсли;
//Добавлено)
Если ОбщегоНазначения.ПодсистемаСуществует("ЗарплатаКадрыПриложения.ГосударственнаяСлужба") Тогда
Модуль = ОбщегоНазначения.ОбщийМодуль("ГосударственнаяСлужба");
Модуль.ДобавитьКомандуПечатиСлужебногоКонтракта(КомандыПечати, ИдентификаторыПФ);
КонецЕсли;

Если ОбщегоНазначения.ПодсистемаСуществует("ЗарплатаКадрыПриложения.КадровыйУчет.ДистанционнаяРабота") Тогда
МодульДистанционнаяРабота = ОбщегоНазначения.ОбщийМодуль("ДистанционнаяРабота");
МодульДистанционнаяРабота.ДобавитьКомандыПечатиПереводаНаДистанционнуюРаботу(КомандыПечати, Истина, ИдентификаторыПФ);
КонецЕсли;

// Настраиваемый комплект документов
Если ИдентификаторыПФ.Количество()>0 Тогда
КомандаПечати = КомандыПечати.Добавить();
КомандаПечати.Обработчик = "УправлениеПечатьюБЗККлиент.ВыполнитьКомандуПечати";
КомандаПечати.Идентификатор = СтрСоединить(ИдентификаторыПФ, ",");
КомандаПечати.Порядок = 900;
КомандаПечати.ПроверкаПроведенияПередПечатью = Истина;
КомандаПечати.ДополнитьКомплектВнешнимиПечатнымиФормами = Истина;
КомандаПечати.Представление = НСтр("ru = 'Комплект документов при кадровом переводе'");
КомандаПечати.ДополнительныеПараметры.Вставить("ТребуетсяЧтениеБезОграничений", Истина);
КомандаПечати.Картинка = БиблиотекаКартинок.ПечатьПакетаДокументов;
КонецЕсли;

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

31. Азбука Морзе 108 10.02.25 19:50 Сейчас в теме

(30) Спасибо за комментарий. После него счетчик скачиваний обработки увеличился. Пользователи предпочитают скачать проверенную обработку на БСП, а не "простые" расширения в модуле менеджера типовых кадровых документов. Тем более у них как правило нет прав на работу с расширениями.
Кстати Ваш простой код примерно вдвое больше по размеру кода в моей обработке.

32. Kostya31 10.02.25 23:16 Сейчас в теме

(31) Ну простите за счетчик)
А на счет кода, я показал всю процедуру и место куда вставлять, а сам вставляемый код вот-
//Добавлено (
// Приказ о переводе Т-5
Если ПравоДоступа("Просмотр", Метаданные.Отчеты.ПечатнаяФормаТ5) Тогда

КомандаПечати = КомандыПечати.Добавить();
КомандаПечати.Обработчик = "УправлениеПечатьюБЗККлиент.ВыполнитьКомандуПечати";
КомандаПечати.МенеджерПечати = "Отчет.ПечатнаяФормаТ5";
КомандаПечати.Идентификатор = "ПФ_MXL_Т5";
КомандаПечати.Представление = НСтр("ru = 'Приказ о переводе (Т-5)'");
КомандаПечати.ДополнительныеПараметры.Вставить("ТребуетсяЧтениеБезОграничений", Истина);
КомандаПечати.ПроверкаПроведенияПередПечатью = Истина;

ЗарплатаКадры.ДобавитьИдентификаторКомандыДляПечатиВПакетномРежиме(ИдентификаторыПФ, КомандаПечати);

КонецЕсли;
//Добавлено)

Не расстраивайтесь, код у вас конечно больше)