v3.0.0.75
This commit is contained in:
Профи-Софт
@@ -0,0 +1,17 @@
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<MetaDataObject xmlns="http://v8.1c.ru/8.3/MDClasses" xmlns:v8="http://v8.1c.ru/8.1/data/core">
|
||||
<CommonModule uuid="95b559dc-5653-44e6-9eb3-312f0e28dc68">
|
||||
<Properties>
|
||||
<Name>ЗагрузкаДанныхИзExcel_ЗаписьВРегистры</Name>
|
||||
<Synonym>
|
||||
<v8:item>
|
||||
<v8:lang>ru</v8:lang>
|
||||
<v8:content>Запись в регистры</v8:content>
|
||||
</v8:item>
|
||||
</Synonym>
|
||||
<Comment/>
|
||||
<Global>false</Global>
|
||||
<Server>true</Server>
|
||||
</Properties>
|
||||
</CommonModule>
|
||||
</MetaDataObject>
|
||||
@@ -0,0 +1,285 @@
|
||||
// Запись данных в регистры 1С
|
||||
// Серверный модуль для записи движений через документ ПереносДанных
|
||||
|
||||
&НаСервереБезКонтекста
|
||||
Функция РазрешитьОрганизацию(Наименование)
|
||||
Если Не ЗначениеЗаполнено(Наименование) Тогда
|
||||
Возврат Неопределено;
|
||||
КонецЕсли;
|
||||
Возврат Справочники.Организации.НайтиПоНаименованию(СокрЛП(Наименование), Истина);
|
||||
КонецФункции
|
||||
|
||||
&НаСервереБезКонтекста
|
||||
Функция РазрешитьСтатьюФинансирования(Наименование)
|
||||
Если Не ЗначениеЗаполнено(Наименование) Тогда
|
||||
Возврат Неопределено;
|
||||
КонецЕсли;
|
||||
Возврат Справочники.СтатьиФинансированияЗарплата.НайтиПоНаименованию(СокрЛП(Наименование), Истина);
|
||||
КонецФункции
|
||||
|
||||
&НаСервереБезКонтекста
|
||||
Функция РазрешитьСтатьюРасходов(Код)
|
||||
Если Не ЗначениеЗаполнено(Код) Тогда
|
||||
Возврат Неопределено;
|
||||
КонецЕсли;
|
||||
Возврат Справочники.СтатьиРасходовЗарплата.НайтиПоКоду(СокрЛП(Код));
|
||||
КонецФункции
|
||||
|
||||
&НаСервереБезКонтекста
|
||||
Процедура ПостроитьКэшСотрудников(ТЧСотрудники, КэшСотрудников)
|
||||
КэшСотрудников = Новый Соответствие;
|
||||
Для Каждого Эл Из ТЧСотрудники Цикл
|
||||
СотрСсылка = Неопределено;
|
||||
Если ЗначениеЗаполнено(Эл.ИНН) Тогда
|
||||
СотрСсылка = Справочники.Сотрудники.НайтиПоРеквизиту("ИНН", СокрЛП(Эл.ИНН));
|
||||
КонецЕсли;
|
||||
Если Не ЗначениеЗаполнено(СотрСсылка) И ЗначениеЗаполнено(Эл.СНИЛС) Тогда
|
||||
ФЛ = Справочники.ФизическиеЛица.НайтиПоРеквизиту("СтраховойНомерПФР", СокрЛП(Эл.СНИЛС));
|
||||
Если ЗначениеЗаполнено(ФЛ) Тогда
|
||||
СотрСсылка = Справочники.Сотрудники.НайтиПоРеквизиту("ФизическоеЛицо", ФЛ, Истина);
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
Если Не ЗначениеЗаполнено(СотрСсылка) И ЗначениеЗаполнено(Эл.ФИО) Тогда
|
||||
СотрСсылка = Справочники.Сотрудники.НайтиПоНаименованию(СокрЛП(Эл.ФИО), Истина);
|
||||
КонецЕсли;
|
||||
Если ЗначениеЗаполнено(СотрСсылка) Тогда
|
||||
КэшСотрудников.Вставить(Эл.Идентификатор, Новый Структура("Сотрудник, ФизическоеЛицо", СотрСсылка, СотрСсылка.ФизическоеЛицо));
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
КонецПроцедуры
|
||||
|
||||
&НаСервереБезКонтекста
|
||||
Процедура ЗаполнитьТЧ(МассивДанных, МассивВзносов, МассивНДФЛ, МассивСотрудников, ТЧЗП, ТЧВзносы, ТЧНДФЛ, ТЧСотрудники)
|
||||
ТЧЗП.Очистить();
|
||||
ТЧВзносы.Очистить();
|
||||
ТЧНДФЛ.Очистить();
|
||||
ТЧСотрудники.Очистить();
|
||||
Для Каждого Строка Из МассивДанных Цикл
|
||||
НоваяСтрока = ТЧЗП.Добавить();
|
||||
ЗаполнитьЗначенияСвойств(НоваяСтрока, Строка);
|
||||
КонецЦикла;
|
||||
Для Каждого Строка Из МассивВзносов Цикл
|
||||
НоваяСтрока = ТЧВзносы.Добавить();
|
||||
ЗаполнитьЗначенияСвойств(НоваяСтрока, Строка);
|
||||
КонецЦикла;
|
||||
Для Каждого Строка Из МассивНДФЛ Цикл
|
||||
НоваяСтрока = ТЧНДФЛ.Добавить();
|
||||
ЗаполнитьЗначенияСвойств(НоваяСтрока, Строка);
|
||||
КонецЦикла;
|
||||
Для Каждого Строка Из МассивСотрудников Цикл
|
||||
НоваяСтрока = ТЧСотрудники.Добавить();
|
||||
ЗаполнитьЗначенияСвойств(НоваяСтрока, Строка);
|
||||
КонецЦикла;
|
||||
КонецПроцедуры
|
||||
|
||||
&НаСервере
|
||||
Процедура ЗаписатьДанные(ГодЗагрузкиПараметр, ОрганизацияНаименование, СтатьяФинансированияНаименование, СтатьяРасходовКод)
|
||||
ГодЧисло = Число(ГодЗагрузкиПараметр);
|
||||
МесяцЧисло = Цел(Объект.МесяцЗагрузки);
|
||||
Если ГодЧисло = 0 Тогда ГодЧисло = Год(ТекущаяДата()); КонецЕсли;
|
||||
Если МесяцЧисло < 1 Или МесяцЧисло > 12 Тогда
|
||||
Сообщить("Ошибка: месяц = " + МесяцЧисло + ", год = " + ГодЧисло);
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
Период = Дата(ГодЧисло, МесяцЧисло, 1);
|
||||
|
||||
Организация = РазрешитьОрганизацию(ОрганизацияНаименование);
|
||||
Если Не ЗначениеЗаполнено(Организация) Тогда
|
||||
Сообщить("Не найдена организация: """ + ОрганизацияНаименование + """");
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
СтатьяФинансирования = РазрешитьСтатьюФинансирования(СтатьяФинансированияНаименование);
|
||||
СтатьяРасходов = РазрешитьСтатьюРасходов(СтатьяРасходовКод);
|
||||
|
||||
КэшСотрудников = Новый Соответствие;
|
||||
ПостроитьКэшСотрудников(Объект.Сотрудники, КэшСотрудников);
|
||||
|
||||
ДокПеренос = Документы.ПереносДанных.СоздатьДокумент();
|
||||
ДокПеренос.Дата = Период;
|
||||
|
||||
ВидРасчётаОклад = ПланыВидовРасчета.Начисления.НайтиПоНаименованию("Оклад", Истина);
|
||||
|
||||
// Регистр 1: НачисленияУдержанияПоСотрудникам
|
||||
Для Каждого Строка Из Объект.ДанныеРасчетаЗП Цикл
|
||||
ДанныеСотр = КэшСотрудников.Получить(Строка.ИдентификаторСотрудника);
|
||||
Если ДанныеСотр = Неопределено Тогда Продолжить; КонецЕсли;
|
||||
ФизЛицо = ДанныеСотр.ФизическоеЛицо;
|
||||
СотрудникСсылка = ДанныеСотр.Сотрудник;
|
||||
|
||||
// Начисления
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "Оклад", Строка.Оклад, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ДоплатаСовместительство", Строка.ДоплатаСовместительство, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ДоплатаНочные", Строка.ДоплатаНочные, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ДоплатаПраздничные", Строка.ДоплатаПраздничные, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "НадбавкаЗаКатегорию", Строка.НадбавкаЗаКатегорию, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "НадбавкаЗаВредность", Строка.НадбавкаЗаВредность, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ПовышающийКоэффициент", Строка.ПовышающийКоэффициент, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "СтимулирующаяВыплата", Строка.СтимулирующиеВыплаты, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "РайонныйКоэффициент", Строка.РайонныйКоэффициент, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ПремияРазовая", Строка.ПремияРазовая, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "Отпуск", Строка.Отпуск, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "КомпенсацияЗаНеиспользованныйОтпуск", Строка.КомпенсацияЗаОтпуск, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ВыходноеПособие", Строка.ВыходноеПособие, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "Родовые", Строка.Родовые, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
|
||||
// Удержания
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "НДФЛ", Строка.НДФЛ, Перечисления.ГруппыНачисленияУдержанияВыплаты.Удержано, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ПрофВзнос", Строка.ПрофВзнос, Перечисления.ГруппыНачисленияУдержанияВыплаты.Удержано, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ИсполнительныйДокумент", Строка.ИсполнительныеДокументы, Перечисления.ГруппыНачисленияУдержанияВыплаты.Удержано, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
|
||||
// Выплаты
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "Оклад", Строка.Аванс, Перечисления.ГруппыНачисленияУдержанияВыплаты.Выплачено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "Оклад", Строка.ЗарплатаЗаПервуюПоловину, Перечисления.ГруппыНачисленияУдержанияВыплаты.Выплачено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "Касса1", Строка.Касса1, Перечисления.ГруппыНачисленияУдержанияВыплаты.Выплачено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "БезналичноеПеречисление", Строка.БезналичныеПеречисления, Перечисления.ГруппыНачисленияУдержанияВыплаты.Выплачено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ПремияАванс", Строка.ПремияАванс, Перечисления.ГруппыНачисленияУдержанияВыплаты.Выплачено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ВыплатыВМежрасчетный", Строка.ВыплатыВМежрасчетный, Перечисления.ГруппыНачисленияУдержанияВыплаты.Выплачено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
КонецЦикла;
|
||||
|
||||
// Регистр 2: ОтработанноеВремяПоСотрудникам
|
||||
Для Каждого Строка Из Объект.ДанныеРасчетаЗП Цикл
|
||||
ДанныеСотр = КэшСотрудников.Получить(Строка.ИдентификаторСотрудника);
|
||||
Если ДанныеСотр = Неопределено Тогда Продолжить; КонецЕсли;
|
||||
Если Строка.ОтработаноДней > 0 Или Строка.РабочиеЧасыПоТабелю > 0 Тогда
|
||||
Движение = ДокПеренос.Движения.ОтработанноеВремяПоСотрудникам.Добавить();
|
||||
Движение.Период = Период;
|
||||
Движение.Организация = Организация;
|
||||
Движение.ФизическоеЛицо = ДанныеСотр.ФизическоеЛицо;
|
||||
Движение.Сотрудник = ДанныеСотр.Сотрудник;
|
||||
Движение.Начисление = ВидРасчётаОклад;
|
||||
Движение.ОтработаноДней = Строка.ОтработаноДней;
|
||||
Движение.ОтработаноЧасов = Строка.РабочиеЧасыПоТабелю;
|
||||
Движение.ОплаченоДней = Строка.ОтработаноДней;
|
||||
Движение.ОплаченоЧасов = Строка.РабочиеЧасыПоТабелю;
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
|
||||
// Регистр 3: СведенияОДоходахНДФЛ
|
||||
Для Каждого Строка Из Объект.ДанныеНДФЛ Цикл
|
||||
ДанныеСотр = КэшСотрудников.Получить(Строка.ИдентификаторСотрудника);
|
||||
Если ДанныеСотр = Неопределено Тогда Продолжить; КонецЕсли;
|
||||
Движение = ДокПеренос.Движения.СведенияОДоходахНДФЛ.Добавить();
|
||||
Движение.Период = Период;
|
||||
Движение.ГоловнаяОрганизация = Организация;
|
||||
Движение.Организация = Организация;
|
||||
Движение.ФизическоеЛицо = ДанныеСотр.ФизическоеЛицо;
|
||||
Движение.МесяцНалоговогоПериода = Период;
|
||||
Движение.СуммаДохода = Строка.СуммаВаловогоДохода;
|
||||
Движение.СуммаВычета = Строка.СкидкаДляНДФЛЗаМесяц + Строка.ВычетНаРаботникаЗаМесяц + Строка.ВычетНаИждивенцевЗаМесяц;
|
||||
КонецЦикла;
|
||||
|
||||
// Регистр 4: СтраховыеВзносыПоФизическимЛицам
|
||||
Для Каждого Строка Из Объект.ДанныеСтраховыхВзносов Цикл
|
||||
ДанныеСотр = КэшСотрудников.Получить(Строка.ИдентификаторСотрудника);
|
||||
Если ДанныеСотр = Неопределено Тогда Продолжить; КонецЕсли;
|
||||
Движение = ДокПеренос.Движения.СтраховыеВзносыПоФизическимЛицам.Добавить();
|
||||
Движение.Период = Период;
|
||||
Движение.Организация = Организация;
|
||||
Движение.ФизическоеЛицо = ДанныеСотр.ФизическоеЛицо;
|
||||
Движение.Сотрудник = ДанныеСотр.Сотрудник;
|
||||
Движение.ПФРДоПредельнойВеличины = Строка.ДТ6Процент;
|
||||
Движение.ПФРСтраховая = Строка.ПФСтраховая;
|
||||
Движение.ФФОМС = Строка.ФССФОМС;
|
||||
Движение.ФССНесчастныеСлучаи = Строка.НСПЗ;
|
||||
КонецЦикла;
|
||||
|
||||
// Регистр 6: ВзаиморасчетыССотрудниками
|
||||
ДвиженияВзаиморасчеты = ДокПеренос.Движения.ВзаиморасчетыССотрудниками;
|
||||
Для Каждого Строка Из Объект.ДанныеРасчетаЗП Цикл
|
||||
ДанныеСотр = КэшСотрудников.Получить(Строка.ИдентификаторСотрудника);
|
||||
Если ДанныеСотр = Неопределено Тогда Продолжить; КонецЕсли;
|
||||
Если Строка.ВсегоНаРуки <> 0 Тогда
|
||||
Движение = ДвиженияВзаиморасчеты.Добавить();
|
||||
Движение.Период = Период;
|
||||
Движение.Организация = Организация;
|
||||
Движение.ФизическоеЛицо = ДанныеСотр.ФизическоеЛицо;
|
||||
Движение.Сотрудник = ДанныеСотр.Сотрудник;
|
||||
Движение.СтатьяФинансирования = СтатьяФинансирования;
|
||||
Движение.СтатьяРасходов = СтатьяРасходов;
|
||||
Движение.СуммаВзаиморасчетов = Строка.ВсегоНаРуки;
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
|
||||
// Регистр 7: БухгалтерскиеВзаиморасчетыССотрудниками
|
||||
ДвиженияБухВзаиморасчеты = ДокПеренос.Движения.БухгалтерскиеВзаиморасчетыССотрудниками;
|
||||
Для Каждого Строка Из Объект.ДанныеРасчетаЗП Цикл
|
||||
ДанныеСотр = КэшСотрудников.Получить(Строка.ИдентификаторСотрудника);
|
||||
Если ДанныеСотр = Неопределено Тогда Продолжить; КонецЕсли;
|
||||
Если Строка.ВсегоНаРуки <> 0 Тогда
|
||||
Движение = ДвиженияБухВзаиморасчеты.Добавить();
|
||||
Движение.Период = Период;
|
||||
Движение.Организация = Организация;
|
||||
Движение.ФизическоеЛицо = ДанныеСотр.ФизическоеЛицо;
|
||||
Движение.Сотрудник = ДанныеСотр.Сотрудник;
|
||||
Движение.СтатьяФинансирования = СтатьяФинансирования;
|
||||
Движение.СтатьяРасходов = СтатьяРасходов;
|
||||
Движение.СуммаВзаиморасчетов = Строка.ВсегоНаРуки;
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
|
||||
// Регистр 8: ДанныеОВремениДляРасчетаСреднегоОбщий
|
||||
ДвиженияСреднего = ДокПеренос.Движения.ДанныеОВремениДляРасчетаСреднегоОбщий;
|
||||
Для Каждого Строка Из Объект.ДанныеРасчетаЗП Цикл
|
||||
ДанныеСотр = КэшСотрудников.Получить(Строка.ИдентификаторСотрудника);
|
||||
Если ДанныеСотр = Неопределено Тогда Продолжить; КонецЕсли;
|
||||
Если Строка.ОтработаноДней <> 0 Тогда
|
||||
Движение = ДвиженияСреднего.Добавить();
|
||||
Движение.Период = Период;
|
||||
Движение.Сотрудник = ДанныеСотр.Сотрудник;
|
||||
Движение.ОтработаноДней = Строка.ОтработаноДней;
|
||||
Движение.ОтработаноЧасов = Строка.РабочиеЧасыПоТабелю;
|
||||
Движение.ОтработаноДнейКалендарных = Строка.ОтработаноДнейКалендарных;
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
|
||||
ДокПеренос.Записать();
|
||||
Сообщить("Данные записаны. Документ: " + ДокПеренос.Ссылка);
|
||||
КонецПроцедуры
|
||||
|
||||
&НаСервере
|
||||
Процедура ЗаписатьНачисление(ДокПеренос, Строка, ВидРасчета, Сумма, Группа, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка)
|
||||
Если Сумма = 0 Тогда Возврат; КонецЕсли;
|
||||
|
||||
ГруппаНаименование = "";
|
||||
Если Группа = Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено Тогда
|
||||
ГруппаНаименование = "";
|
||||
ИначеЕсли Группа = Перечисления.ГруппыНачисленияУдержанияВыплаты.Удержано Тогда
|
||||
ГруппаНаименование = "Удержание";
|
||||
ИначеЕсли Группа = Перечисления.ГруппыНачисленияУдержанияВыплаты.Выплачено Тогда
|
||||
ГруппаНаименование = "Выплата";
|
||||
КонецЕсли;
|
||||
|
||||
Суффикс = "";
|
||||
Если ЗначениеЗаполнено(СтатьяФинансирования) Тогда
|
||||
НаименованиеСтатьи = СокрЛП(СтатьяФинансирования.Наименование);
|
||||
Если СтрНайти(НаименованиеСтатьи, "ОМС") > 0 Тогда
|
||||
Суффикс = " (ОМС)";
|
||||
ИначеЕсли СтрНайти(НаименованиеСтатьи, "ПД") > 0 Тогда
|
||||
Суффикс = " (ПД)";
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
|
||||
ВидРасчёта = Неопределено;
|
||||
Если ЗначениеЗаполнено(Суффикс) Тогда
|
||||
ВидРасчёта = ПланыВидовРасчета.Начисления.НайтиПоНаименованию(ВидРасчета + Суффикс, Истина);
|
||||
КонецЕсли;
|
||||
Если ВидРасчёта = Неопределено Тогда
|
||||
ВидРасчёта = ПланыВидовРасчета.Начисления.НайтиПоНаименованию(ВидРасчета, Истина);
|
||||
КонецЕсли;
|
||||
Если ВидРасчёта = Неопределено Тогда
|
||||
Сообщить("Не найден ПВР: " + ВидРасчета + Суффикс);
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
Движение = ДокПеренос.Движения.НачисленияУдержанияПоСотрудникам.Добавить();
|
||||
Движение.Период = Период;
|
||||
Движение.Организация = Организация;
|
||||
Движение.ФизическоеЛицо = ФизЛицо;
|
||||
Движение.Сотрудник = СотрудникСсылка;
|
||||
Движение.НачислениеУдержание = ВидРасчёта;
|
||||
Движение.Сумма = Сумма;
|
||||
Движение.ГруппаНачисленияУдержанияВыплаты = Группа;
|
||||
Движение.СтатьяФинансирования = СтатьяФинансирования;
|
||||
Движение.СтатьяРасходов = СтатьяРасходов;
|
||||
Движение.Сторно = Ложь;
|
||||
КонецПроцедуры
|
||||
@@ -0,0 +1,17 @@
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<MetaDataObject xmlns="http://v8.1c.ru/8.3/MDClasses" xmlns:v8="http://v8.1c.ru/8.1/data/core">
|
||||
<CommonModule uuid="a3945307-e5b9-4d84-96e1-e13bbacabada">
|
||||
<Properties>
|
||||
<Name>ЗагрузкаДанныхИзExcel_МаппингДанных</Name>
|
||||
<Synonym>
|
||||
<v8:item>
|
||||
<v8:lang>ru</v8:lang>
|
||||
<v8:content>Маппинг данных</v8:content>
|
||||
</v8:item>
|
||||
</Synonym>
|
||||
<Comment/>
|
||||
<Global>false</Global>
|
||||
<Server>false</Server>
|
||||
</Properties>
|
||||
</CommonModule>
|
||||
</MetaDataObject>
|
||||
@@ -0,0 +1,187 @@
|
||||
// Маппинг данных
|
||||
// Парсинг Excel-листов, маппинг колонок на ПВР
|
||||
// Зависит от: ЗагрузкаДанныхИзExcel_ЧтениеЭксель
|
||||
|
||||
&НаКлиенте
|
||||
Функция НомерМесяцаВТекст(НомерМесяца)
|
||||
Массив = Новый Массив;
|
||||
Массив.Добавить("Январь"); Массив.Добавить("Февраль");
|
||||
Массив.Добавить("Март"); Массив.Добавить("Апрель");
|
||||
Массив.Добавить("Май"); Массив.Добавить("Июнь");
|
||||
Массив.Добавить("Июль"); Массив.Добавить("Август");
|
||||
Массив.Добавить("Сентябрь"); Массив.Добавить("Октябрь");
|
||||
Массив.Добавить("Ноябрь"); Массив.Добавить("Декабрь");
|
||||
Если НомерМесяца >= 1 И НомерМесяца <= 12 Тогда
|
||||
Возврат Массив[НомерМесяца - 1];
|
||||
КонецЕсли;
|
||||
Возврат "";
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция СтрокаМесяцаНаЛистеСотрудника()
|
||||
Смещение = Объект.МесяцЗагрузки;
|
||||
Если Не ЗначениеЗаполнено(Смещение) Тогда Смещение = 1; КонецЕсли;
|
||||
Возврат 35 + Смещение;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция НайтиЛистСотрудника(Книга, ЛистРасчет, НомерСтроки)
|
||||
Формула = ЛистРасчет.Cells(НомерСтроки, 1).Formula;
|
||||
Если ЗначениеЗаполнено(Формула) Тогда
|
||||
ИмяЛиста = ЗагрузкаДанныхИзExcel_ЧтениеЭксель.ИзвлечьИмяЛистаИзФормулы(Формула);
|
||||
Если ЗначениеЗаполнено(ИмяЛиста) Тогда
|
||||
Возврат ЗагрузкаДанныхИзExcel_ЧтениеЭксель.НайтиЛист(Книга, ИмяЛиста);
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
ФИО = ЗагрузкаДанныхИзExcel_ЧтениеЭксель.ПрочитатьЯчейкуСтрока(ЛистРасчет, НомерСтроки, 1);
|
||||
Если ЗначениеЗаполнено(ФИО) Тогда
|
||||
Возврат ЗагрузкаДанныхИзExcel_ЧтениеЭксель.НайтиЛист(Книга, ФИО);
|
||||
КонецЕсли;
|
||||
Возврат Неопределено;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция ПрочитатьКарточкуСотрудника(ЛистСотрудника)
|
||||
Данные = Новый Структура;
|
||||
Данные.Вставить("ФИО", ЗагрузкаДанныхИзExcel_ЧтениеЭксель.ПрочитатьЯчейкуСтрока(ЛистСотрудника, 2, 3));
|
||||
Данные.Вставить("ИНН", "");
|
||||
Данные.Вставить("СНИЛС", "");
|
||||
Данные.Вставить("ЛицевойСчетВБанке", ЗагрузкаДанныхИзExcel_ЧтениеЭксель.ПрочитатьЯчейкуСтрока(ЛистСотрудника, 3, 4));
|
||||
Данные.Вставить("ВидЗанятости", ЗагрузкаДанныхИзExcel_ЧтениеЭксель.ПрочитатьЯчейкуСтрока(ЛистСотрудника, 5, 1));
|
||||
Данные.Вставить("АдресРегистрации", "");
|
||||
Возврат Данные;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция ПрочитатьРасчетныеДанные(ЛистРасчет, Ном, ФИО)
|
||||
Ч = ЗагрузкаДанныхИзExcel_ЧтениеЭксель;
|
||||
С = Новый Структура;
|
||||
С.Вставить("ФИО", ФИО);
|
||||
С.Вставить("Должность", Ч.ПрочитатьЯчейкуСтрока(ЛистРасчет, Ном, 2));
|
||||
С.Вставить("СчетБК", Ч.ПрочитатьЯчейкуСтрока(ЛистРасчет, Ном, 3));
|
||||
С.Вставить("ВидЗанятости", Ч.ПрочитатьЯчейкуСтрока(ЛистРасчет, Ном, 4));
|
||||
С.Вставить("Оклад", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 8, ФИО));
|
||||
С.Вставить("КоличествоСтавок", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 7, ФИО));
|
||||
С.Вставить("ОтработаноДней", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 6, ФИО));
|
||||
С.Вставить("ЧасыДежурства", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 9, ФИО));
|
||||
С.Вставить("ЧасыНочные", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 10, ФИО));
|
||||
С.Вставить("ЧасыПраздничные", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 11, ФИО));
|
||||
С.Вставить("РабочиеЧасыПоТабелю", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 12, ФИО));
|
||||
С.Вставить("ИзРасчетаМесячногоОкладаДни", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 13, ФИО));
|
||||
С.Вставить("ДоплатаСовместительство", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 14, ФИО));
|
||||
С.Вставить("ДоплатаСовмещениеПроцент", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 15, ФИО));
|
||||
С.Вставить("ДоплатаИнтенсивность", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 16, ФИО));
|
||||
С.Вставить("ИзРасчетаМесячногоОкладаЧасы", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 17, ФИО));
|
||||
С.Вставить("ДоплатаНочные", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 18, ФИО));
|
||||
С.Вставить("ДоплатаПраздничные", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 19, ФИО));
|
||||
С.Вставить("ЗаСтаж", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 20, ФИО));
|
||||
С.Вставить("НадбавкаЗаКатегорию", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 21, ФИО));
|
||||
С.Вставить("НадбавкаЗаВредность", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 22, ФИО));
|
||||
С.Вставить("ПовышающийКоэффициент", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 23, ФИО));
|
||||
С.Вставить("СтимулирующиеВыплаты", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 24, ФИО));
|
||||
С.Вставить("СтимулирующаяНадбавка", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 25, ФИО));
|
||||
С.Вставить("РайонныйКоэффициент", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 26, ФИО));
|
||||
С.Вставить("ВыплатыПоУказу597", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 27, ФИО));
|
||||
С.Вставить("ПремияРазовая", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 28, ФИО));
|
||||
С.Вставить("БольничныйЛистЗаСчетПредприятия", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 29, ФИО));
|
||||
С.Вставить("ДоплатаПрофактиву", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 30, ФИО));
|
||||
С.Вставить("ПусковыеОбсервация", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 31, ФИО));
|
||||
С.Вставить("Отпуск", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 32, ФИО));
|
||||
С.Вставить("КомпенсацияЗаОтпуск", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 33, ФИО));
|
||||
С.Вставить("ПрочиеКомандировочныйУчебныйОтпуск", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 34, ФИО));
|
||||
С.Вставить("ВыходноеПособие", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 35, ФИО));
|
||||
С.Вставить("ПоУходуЗаРебенкомИнвалидом", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 36, ФИО));
|
||||
С.Вставить("ДоплатаДоМРОТ", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 37, ФИО));
|
||||
С.Вставить("Родовые", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 38, ФИО));
|
||||
С.Вставить("ИтогоНачислено", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 39, ФИО));
|
||||
С.Вставить("НДФЛ", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 40, ФИО));
|
||||
С.Вставить("ПрофВзнос", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 41, ФИО));
|
||||
С.Вставить("ИсполнительныеДокументы", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 42, ФИО));
|
||||
С.Вставить("Аванс", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 43, ФИО));
|
||||
С.Вставить("ПФСофинансирование", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 44, ФИО));
|
||||
С.Вставить("ПремияУдержание", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 45, ФИО));
|
||||
С.Вставить("Касса1", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 46, ФИО));
|
||||
С.Вставить("Касса2", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 47, ФИО));
|
||||
С.Вставить("Касса3", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 48, ФИО));
|
||||
С.Вставить("ПособиеДо3ЛетУдержание", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 49, ФИО));
|
||||
С.Вставить("БезналичныеПеречисления", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 50, ФИО));
|
||||
С.Вставить("ВозвратВКассу", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 51, ФИО));
|
||||
С.Вставить("Депонент", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 52, ФИО));
|
||||
С.Вставить("ОстатокНаНачало", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 54, ФИО));
|
||||
С.Вставить("ВсегоНаРуки", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 55, ФИО));
|
||||
С.Вставить("ЗарплатаЗаПервуюПоловину", 0); // TODO: определить колонку
|
||||
С.Вставить("ПремияАванс", 0); // TODO: определить колонку
|
||||
С.Вставить("ВыплатыВМежрасчетный", 0); // TODO: определить колонку
|
||||
С.Вставить("ИтогоУдержано",
|
||||
С.НДФЛ + С.ПрофВзнос + С.ИсполнительныеДокументы + С.ПФСофинансирование
|
||||
+ С.ПремияУдержание + С.ПособиеДо3ЛетУдержание + С.Депонент);
|
||||
С.Вставить("ИтогоВыплачено",
|
||||
С.Аванс + С.Касса1 + С.Касса2 + С.Касса3
|
||||
+ С.БезналичныеПеречисления + С.ВозвратВКассу);
|
||||
Возврат С;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция ПрочитатьНДФЛСоЛиста(ЛистСотрудника, ФИО)
|
||||
Ч = ЗагрузкаДанныхИзExcel_ЧтениеЭксель;
|
||||
СД = СтрокаМесяцаНаЛистеСотрудника();
|
||||
Если СД = 0 Тогда Возврат Неопределено; КонецЕсли;
|
||||
Если Не ЗначениеЗаполнено(ФИО) Тогда Возврат Неопределено; КонецЕсли;
|
||||
С = Новый Структура;
|
||||
С.Вставить("ФИО", ФИО);
|
||||
С.Вставить("МесяцРасчета", Ч.ПрочитатьЯчейкуСтрока(ЛистСотрудника, СД, 1));
|
||||
С.Вставить("СуммаВаловогоДохода", Ч.ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 4, ФИО));
|
||||
С.Вставить("СуммаВаловогоДоходаСНачалаГода", Ч.ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 6, ФИО));
|
||||
С.Вставить("СкидкаДляНДФЛЗаМесяц", Ч.ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 8, ФИО));
|
||||
С.Вставить("СкидкаДляНДФЛЗаГод", Ч.ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 9, ФИО));
|
||||
С.Вставить("СкидкаДляСВЗаМесяц", Ч.ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 10, ФИО));
|
||||
С.Вставить("ВычетНаРаботникаЗаМесяц", Ч.ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 12, ФИО));
|
||||
С.Вставить("ВычетНаИждивенцевЗаМесяц", Ч.ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 13, ФИО));
|
||||
С.Вставить("ВсегоВычетовЗаМесяц", Ч.ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 14, ФИО));
|
||||
С.Вставить("ОблагаемыйДоходЗаМесяц", Ч.ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 15, ФИО));
|
||||
С.Вставить("ОблагаемыйДоходЗаГод", Ч.ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 16, ФИО));
|
||||
С.Вставить("НачисленныйНДФЛЗаГод", Ч.ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 17, ФИО));
|
||||
С.Вставить("ИтогоНДФЛЗаМесяц", Ч.ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 18, ФИО));
|
||||
С.Вставить("НалоговаяБазаПоСВЗаМесяц", Ч.ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 23, ФИО));
|
||||
С.Вставить("ИтогоФСС", Ч.ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 37, ФИО));
|
||||
Возврат С;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция ПрочитатьВзносыИзРасчета(ЛистРасчет, Ном, ФИО)
|
||||
Ч = ЗагрузкаДанныхИзExcel_ЧтениеЭксель;
|
||||
С = Новый Структура;
|
||||
С.Вставить("ФИО", ФИО);
|
||||
С.Вставить("ДТ6Процент", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 58, ФИО));
|
||||
С.Вставить("ДТ4Процент", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 59, ФИО));
|
||||
С.Вставить("ПФСтраховая", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 60, ФИО));
|
||||
С.Вставить("ФССФОМС", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 61, ФИО));
|
||||
С.Вставить("НСПЗ", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 62, ФИО));
|
||||
С.Вставить("Итого", Ч.ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 63, ФИО));
|
||||
С.Вставить("НалоговаяБазаПоСВЗаМесяц", 0);
|
||||
С.Вставить("ИтогоФСС", 0);
|
||||
Возврат С;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция ОределитьГодЗагрузки(ЛистРасчет)
|
||||
ГодЗначение = ЗагрузкаДанныхИзExcel_ЧтениеЭксель.ПрочитатьЯчейкуЧисло(ЛистРасчет, 3, 1, "");
|
||||
Если ГодЗначение > 0 Тогда
|
||||
Возврат Цел(ГодЗначение);
|
||||
КонецЕсли;
|
||||
ГодЗначение = ЗагрузкаДанныхИзExcel_ЧтениеЭксель.ПрочитатьЯчейкуЧисло(ЛистРасчет, 4, 1, "");
|
||||
Если ГодЗначение > 2000 Тогда
|
||||
Возврат Цел(ГодЗначение);
|
||||
КонецЕсли;
|
||||
Возврат 0;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция ОпределитьОрганизацию(ЛистРасчет)
|
||||
Возврат СокрЛП(Строка(ЛистРасчет.Cells(4, 20).Value));
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция ОпределитьСтатьюФинансирования(ЛистРасчет)
|
||||
Возврат СокрЛП(Строка(ЛистРасчет.Cells(8, 20).Value));
|
||||
КонецФункции
|
||||
@@ -0,0 +1,17 @@
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<MetaDataObject xmlns="http://v8.1c.ru/8.3/MDClasses" xmlns:v8="http://v8.1c.ru/8.1/data/core">
|
||||
<CommonModule uuid="8844f26b-b375-4a06-accc-1f45c502fb29">
|
||||
<Properties>
|
||||
<Name>ЗагрузкаДанныхИзExcel_ЧтениеЭксель</Name>
|
||||
<Synonym>
|
||||
<v8:item>
|
||||
<v8:lang>ru</v8:lang>
|
||||
<v8:content>Чтение Excel (Клиент)</v8:content>
|
||||
</v8:item>
|
||||
</Synonym>
|
||||
<Comment/>
|
||||
<Global>false</Global>
|
||||
<Server>false</Server>
|
||||
</Properties>
|
||||
</CommonModule>
|
||||
</MetaDataObject>
|
||||
@@ -0,0 +1,68 @@
|
||||
// Клиентский модуль для COM-взаимодействия с Excel
|
||||
// Содержит только COM-вызовы
|
||||
|
||||
&НаКлиенте
|
||||
Функция ОткрытьФайлExcel(ПутьКФайлу)
|
||||
Попытка
|
||||
Excel = Новый COMОбъект("Excel.Application");
|
||||
Excel.Visible = Ложь;
|
||||
Excel.DisplayAlerts = Ложь;
|
||||
Книга = Excel.Workbooks.Open(ПутьКФайлу);
|
||||
Возврат Новый Структура("Книга, Excel", Книга, Excel);
|
||||
Исключение
|
||||
Сообщить("Не удалось открыть Excel: " + ОписаниеОшибки());
|
||||
Возврат Неопределено;
|
||||
КонецПопытки;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Процедура ЗакрытьExcel(КонтекстExcel, ВременныйФайл)
|
||||
Если КонтекстExcel = Неопределено Тогда Возврат; КонецЕсли;
|
||||
Попытка
|
||||
КонтекстExcel.Книга.Close(Ложь);
|
||||
КонтекстExcel.Excel.Quit();
|
||||
Исключение
|
||||
КонецПопытки;
|
||||
Если ЗначениеЗаполнено(ВременныйФайл) Тогда УдалитьФайлы(ВременныйФайл); КонецЕсли;
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
Функция ПрочитатьЯчейкуЧисло(Лист, Строка, Колонка, КонтекстОшибки)
|
||||
Попытка
|
||||
Значение = Лист.Cells(Строка, Колонка).Value;
|
||||
Если Значение = Неопределено ИЛИ Значение = "" Тогда Возврат 0; КонецЕсли;
|
||||
Возврат Число(Значение);
|
||||
Исключение
|
||||
Сообщить("Ошибка чтения числа: " + КонтекстОшибки + " | строка " + Строка + " колонка " + Колонка);
|
||||
Возврат 0;
|
||||
КонецПопытки;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция ПрочитатьЯчейкуСтрока(Лист, Строка, Колонка)
|
||||
Попытка
|
||||
Значение = Лист.Cells(Строка, Колонка).Value;
|
||||
Если Значение = Неопределено Тогда Возврат ""; КонецЕсли;
|
||||
Возврат СокрЛП("" + Значение);
|
||||
Исключение
|
||||
Возврат "";
|
||||
КонецПопытки;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция ИзвлечьИмяЛистаИзФормулы(Формула)
|
||||
Если Формула = Неопределено Тогда Возврат ""; КонецЕсли;
|
||||
Текст = СокрЛП("" + Формула);
|
||||
Если Не СтрНачинаетсяС(Текст, "='") Тогда Возврат ""; КонецЕсли;
|
||||
Поз = СтрНайти(Текст, "'!");
|
||||
Если Поз = 0 Тогда Возврат ""; КонецЕсли;
|
||||
Возврат Сред(Текст, 3, Поз - 3);
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция НайтиЛист(Книга, ИмяЛиста)
|
||||
Для Каждого Лист Из Книга.Sheets Цикл
|
||||
Если ВРег(Лист.Name) = ВРег(ИмяЛиста) Тогда Возврат Лист; КонецЕсли;
|
||||
КонецЦикла;
|
||||
Возврат Неопределено;
|
||||
КонецФункции
|
||||
+136
-133
@@ -1,134 +1,137 @@
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<ConfigDumpInfo xmlns="http://v8.1c.ru/8.3/xcf/dumpinfo" xmlns:xen="http://v8.1c.ru/8.3/xcf/enums" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" format="Hierarchical" version="2.21">
|
||||
<ConfigVersions>
|
||||
<Metadata name="Catalog.Организации" id="83abe7be-da90-47b4-8a9c-8c8d4551d3d9" configVersion="8befc98fc51fe6da94938cfbc91fe2c2ac73367c"/>
|
||||
<Metadata name="Catalog.СтатьиРасходовЗарплата" id="70851537-ebfa-455f-a91b-5fe3dae2a553" configVersion="9480e6d83feb612a4b195d7704e7bcc5ee257b28"/>
|
||||
<Metadata name="Catalog.СтатьиФинансированияЗарплата" id="bebddb4f-6439-4e57-82b7-6010127fcff2" configVersion="6c27c4dfeadb179aeea3157df36e0d10d721f345"/>
|
||||
<Metadata name="CommonPicture.Логотип" id="aa112233-4455-6677-8899-aabbccddeeff" configVersion="6f24d102553d8a92f749591fe9b03d4c92743c48"/>
|
||||
<Metadata name="CommonPicture.Логотип.Picture" id="aa112233-4455-6677-8899-aabbccddeeff.0" configVersion="ea37a29e5a8c705c4fbee54aca915b0475b94941"/>
|
||||
<Metadata name="Configuration.ЗагрузкаДанныхИзExcel" id="a1b2c3d4-e5f6-7890-abcd-ef1234567890" configVersion="cc150361937b8a864cc9c03e18a70edd080ea059"/>
|
||||
<Metadata name="Configuration.ЗагрузкаДанныхИзExcel.Logo" id="b1c2d3e4-f5a6-7890-abcd-ef1234567890.1" configVersion="109ee3c69dbf183be1b179891821b3a3aa92c610"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel" id="f1e2d3c4-b5a6-7890-abcd-ef1234567890" configVersion="bb3bfaf8f297b9423aa23978e67a3fbba59aa66b">
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.СуммаВаловогоДоходаСНачалаГода" id="018266a1-4a61-4579-8f3f-db8e7968f829"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ОблагаемыйДоходЗаМесяц" id="03e05328-7d4e-4c65-bcf0-e06f2f87584e"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Отпуск" id="03f3e152-1a35-4ee9-abf1-5069f70fa200"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.СкидкаДляСВЗаМесяц" id="0bc767bb-d1eb-454d-82a0-92232b738ec9"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ИтогоВыплачено" id="0ce65614-e10a-4246-9d95-dedbb50803d8"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.Attribute.ПутьКФайлу" id="11111111-1111-1111-1111-111111111111"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ИзРасчетаМесячногоОкладаДни" id="13b797d2-755f-4cf0-bbb4-60432eaac281"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ИтогоФСС" id="15bc92f0-0da1-407a-acf5-01aa528ec71c"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники.Attribute.Идентификатор" id="1a5f4127-13af-4aed-ab7e-970cbc2686ad"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.Итого" id="1b50e156-33a3-440d-b20b-56c481b18a82"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ИдентификаторСотрудника" id="1c8e3f54-20eb-4051-befa-f18e586af498"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ОблагаемыйДоходЗаГод" id="1de44479-7da3-41e2-ac53-d35a064863a2"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ИтогоФСС" id="21928e13-e66f-4a44-9288-bfa9e0e505f8"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.Attribute.МесяцЗагрузки" id="22222222-2222-2222-2222-222222222222"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.НачисленныйНДФЛЗаГод" id="22737acf-8634-407a-97bc-963ae92b0d76"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПремияРазовая" id="2666795f-5add-4e7a-9c5a-58b93ffb3624"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ИдентификаторСотрудника" id="2849bd1e-63dd-4a8c-a9b5-830150ff6d11"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.Attribute.Организация" id="2f194852-8fbc-446a-b652-1bdcb6faef41"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.СтимулирующиеВыплаты" id="31c52fa2-7b1f-46be-a56c-84da901d516e"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ФИО" id="33180586-8e17-4eaa-9c04-cae6f120d23f"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП" id="33333333-3333-3333-3333-333333333333"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники.Attribute.ЛицевойСчетВБанке" id="336deef2-1607-42df-a1e3-6cfe0e79549c"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПрофВзнос" id="354243c3-a181-462a-875f-0a31123f9244"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.НачисленоСНачалаГодаФСС" id="363bc4b6-4c10-4190-9e90-ed0d7ec092ed"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.НалоговаяБазаПоСВЗаМесяц" id="37aa20ad-2531-41d4-899b-340a006f3187"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.СкидкаДляНДФЛЗаМесяц" id="386c7a70-92ff-4ed9-ae3d-4c0509733a85"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Депонент" id="39bf3b1d-d6d3-4782-972a-f447de13c60e"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПусковыеОбсервация" id="3cd75289-abdd-447c-a222-988c17aa1135"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники.Attribute.ВидЗанятости" id="3e319f0b-7c76-4108-94fe-1ba74cb6adb9"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ВозвратВКассу" id="3fd7b866-c6bc-48e6-a088-4b22ee2fbdf6"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники.Attribute.ИНН" id="4115be54-1336-47c1-9cf0-6750822b6078"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПособиеДо3ЛетУдержание" id="42d86278-6a10-4844-a71e-3ec6ef0f4b26"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.КомпенсацияЗаОтпуск" id="4317904c-010b-45a0-b6a7-f97a4d6630cf"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов" id="44444444-4444-4444-4444-444444444444"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПрофВзносНачальный" id="4b0d42a9-135f-4102-832c-132e2d2c31da"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники.Attribute.СНИЛС" id="511523fd-3327-4379-9e0c-d59669ca9ccc"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПремияАванс" id="51fb61dc-2603-4494-a2c3-9c4a9570f94b"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ОплаченоСНачалаГодаНСПЗ" id="52b572c6-65aa-44cc-bee9-584170be4d2a"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ИзРасчетаМесячногоОкладаЧасы" id="537d54b1-8fa6-471a-bab6-0e5b42bbbd05"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники.Attribute.ФИО" id="54cfbf85-cfe0-4af3-9ad5-a3b7eb77d596"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.СтимулирующаяНадбавка" id="5b36b975-5b7f-4809-8470-61b12bac767f"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.НачисленоСНачалаГодаНСПЗ" id="5d0ab4f5-447e-49a5-af70-4dd9bc17805c"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ОплаченоСНачалаГодаФСС" id="5dd91c73-62c1-43af-8b86-8c5fe59301d5"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.СчетБК" id="5f69413c-9bd0-45d8-a9f5-0afaa33300f2"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ПФСтраховая" id="60b7d353-b0b8-48b9-a314-de4d1effd68f"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ДоплатаПраздничные" id="61a9a5a7-e85a-428b-be32-5141eee357a8"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.СкидкаДляНДФЛЗаГод" id="61e18cbf-6c63-4b6b-ae7f-7acd9a4f1205"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Касса2" id="6681f8b7-3658-42da-accc-f0a5c17fe08d"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ОтработаноДней" id="66904600-cf3a-46a5-b162-83aa428ca3c4"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ДТ6Процент" id="69808ef7-1694-436b-a575-37a54163566f"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.РабочиеЧасыПоТабелю" id="76403b94-9bcf-455c-949c-9c7988c9b36a"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.СтраховаяЧастьПФ" id="7796e786-a8c2-49be-bcd3-99f5d7d164de"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ЗарплатаЗаПервуюПоловину" id="782139cc-0e01-4c73-9e4e-fdf9e7e4b41f"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ФССИтого" id="78e61a6b-c37c-4109-999d-2193586f0a41"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПовышающийКоэффициент" id="7a513202-03f4-4d05-9226-bc8e52d73470"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.НСПЗИтого" id="7a8df190-bd25-4f46-97ce-4c1b4af01691"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ЗаСтаж" id="7af06b92-c38d-4ba3-ae79-e69f27b35a9d"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ФИО" id="7eef7e97-7e6f-4ef1-911a-12f30ffe3d08"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ОстатокНаНачало" id="81b1ea36-ea5d-497c-b3c4-631e5dd801e6"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.БезналичныеПеречисления" id="83d0c062-99a4-4f86-b614-643d0f1bd901"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ" id="8730b401-1ffa-4a2d-b8e0-baebadf78a3c"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.Attribute.СтатьФинансирования" id="88c70291-7773-4305-b39a-0826e6ece436"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ВсегоВычетовЗаМесяц" id="8945f1f2-78a2-4f13-b4e7-a8b8a0724251"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Должность" id="8b42d168-fe18-4b7a-9589-761770b3e5ee"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники" id="8bc2dbda-7cbd-4246-bb9e-5a93fb59cfea"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Аванс" id="8debf971-11fe-4b00-9b6c-06a7503ef65f"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ИтогоНДФЛЗаМесяц" id="90a11a6a-e634-43bb-993d-85eff7d4e4b1"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПоУходуЗаРебенкомИнвалидом" id="90b322c1-29ab-4d7f-8285-c978a7d65f9e"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ВыплатыПоУказу597" id="94665516-fb3a-408f-a19e-07702be752d3"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ДТ4Процент" id="98f60a1c-f7e9-434a-b020-d60f3dacd737"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ИдентификаторСотрудника" id="991afed3-d7df-4a95-b1aa-665377f86fd7"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Оклад" id="a0c2d3bd-6d9c-4a38-8903-44b3db223edb"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПремияУдержание" id="a10ac824-3b83-4478-be28-4da991405f9d"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ФССФОМС" id="a1e60d86-89ef-4708-aef6-3b53ae819ad7"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.КоличествоСтавок" id="a209a03e-c6e6-4dfb-b84d-2e22ea9bdc47"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ОтработаноДнейКалендарных" id="a7f73479-ac15-46b3-b576-bd9b2e3c81ec"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.БольничныйЛистЗаСчетПредприятия" id="aade0d1d-b0ac-43ef-be39-91acb49b02a7"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.НадбавкаЗаКатегорию" id="b00d744f-fdde-4122-8d67-c780485c1243"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники.Attribute.АдресРегистрации" id="b0d5a24f-4598-4567-8b11-f923d624fd06"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Родовые" id="b2e75b46-6e14-4bd2-9512-e236db7297f8"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.НадбавкаЗаВредность" id="b3b096d6-68b5-431f-8804-98623bd79660"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ДоплатаИнтенсивность" id="b688d8a5-83ec-4f70-bcea-6d4026824d7e"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ВыплатыВМежрасчетный" id="b724575e-f1cf-421a-9b09-2b0989a92f79"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ДоплатаНочные" id="b8119ef2-62b4-4d38-8048-8bea66dd25aa"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ИтогоУдержано" id="b8a678e1-4ada-47d1-8669-42720c87a8f5"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ДоплатаПрофактиву" id="bbfdedd2-840f-48e4-8781-b98bce4e3235"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПФСофинансирование" id="c2577564-40f1-4861-9e45-9830ebbf9625"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ВычетНаРаботникаЗаГод" id="c27112d9-65fd-4012-9c35-c09f9425011a"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ИсполнительныеДокументы" id="d4126cf4-8580-4770-8f86-4c761e80eb5c"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ИтогоНачислено" id="d72c9b29-b760-4fce-9cce-06bf007651d5"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ВидЗанятости" id="d845821a-437c-4922-8e22-6d7a2c6e3770"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.МесяцРасчета" id="d8a5615f-5b47-4b14-a301-3a1d47c11ba9"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.Attribute.СтатьЯРасходов" id="dd2c4848-a8ee-480b-a789-1f80a89d8c97"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ФИО" id="df18de6b-67b9-436a-8981-34827c8a4ba5"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ДоплатаДоМРОТ" id="df1deba3-9757-4f7b-9f9a-3b27bc313a49"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ВыходноеПособие" id="e0c40567-ef78-41ba-87bf-dcef01a8aee5"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ДоплатаСовместительство" id="e0c4b196-7209-46ca-a3d1-ad2afd2698df"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПрочиеКомандировочныйУчебныйОтпуск" id="e1b60f9a-786f-4f54-aabb-c2a2f02a83fc"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Касса1" id="e5a455b9-c2d1-4dde-ba21-094def8a5380"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ЧасыНочные" id="e6d6907c-6ced-4406-976e-61801acd52a1"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ВычетНаИждивенцевЗаМесяц" id="e7673e37-72e5-4a88-8309-1d8b766307ce"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Касса3" id="e8713344-2f36-4cb4-b7a3-c315e8781ef1"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ЧасыПраздничные" id="ebe68ea5-8a4b-46bc-9201-047fff300a54"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ДоплатаСовмещениеПроцент" id="ec41459d-f59b-4d61-884f-58bf83f83595"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ЧасыДежурства" id="ecce8898-999e-4b6d-94a2-4b36c4779102"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.НалоговаяБазаПоСВЗаМесяц" id="ef620600-a592-4764-9ce9-14140bc68937"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.НДФЛ" id="f3baeaef-c136-4eea-b1ac-374983bb9510"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.НСПЗ" id="f432a822-2e43-49fc-ba1d-f93f4d1787cd"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.НакопительнаяЧастьПФ" id="f43ed8ba-05b8-4426-9c66-6cb3fa483027"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.СуммаВаловогоДохода" id="f5ef73da-d182-4c6c-b3fb-61cb0aa2f4a2"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.РайонныйКоэффициент" id="f71ba835-d7cf-415e-a4da-6b0bea379753"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ВсегоНаРуки" id="f797071d-6e4e-4883-b10c-665c5c6b117d"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ВычетНаРаботникаЗаМесяц" id="fb3dd707-e1d6-4dd0-adb0-365953cc7b33"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.НалоговаяБазаСВЗаГод" id="fe83daa5-24f0-403e-a493-d206d6c83ed7"/>
|
||||
</Metadata>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.Form.Форма" id="e1f2d3c4-b5a6-7890-abcd-ef123456789d" configVersion="b21ce57e599484cf63928d9d55447cdf249a9495"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.Form.Форма.Form" id="e1f2d3c4-b5a6-7890-abcd-ef123456789d.0" configVersion="4b79064c8353c97175a57265293fab3efe338fee"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.ManagerModule" id="f1e2d3c4-b5a6-7890-abcd-ef1234567890.2" configVersion="1f800cd2d18e1c6109cc9135ca6588cd898ce7bd"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.ObjectModule" id="f1e2d3c4-b5a6-7890-abcd-ef1234567890.0" configVersion="45688db0e74bd391fe23887a2d523e05814c9b60"/>
|
||||
<Metadata name="Language.Русский" id="fa05057b-734b-49ef-8c58-5cc468580f33" configVersion="d445a81521243ad274dc3237022bcfeb0b640f59"/>
|
||||
<Metadata name="Subsystem.Зарплата" id="55555555-5555-5555-5555-555555555555" configVersion="55c502e5fb642df4c059ed63fea339204c4a2334"/>
|
||||
</ConfigVersions>
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<ConfigDumpInfo xmlns="http://v8.1c.ru/8.3/xcf/dumpinfo" xmlns:xen="http://v8.1c.ru/8.3/xcf/enums" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" format="Hierarchical" version="2.21">
|
||||
<ConfigVersions>
|
||||
<Metadata name="Catalog.Организации" id="83abe7be-da90-47b4-8a9c-8c8d4551d3d9" configVersion="8befc98fc51fe6da94938cfbc91fe2c2ac73367c"/>
|
||||
<Metadata name="Catalog.СтатьиРасходовЗарплата" id="70851537-ebfa-455f-a91b-5fe3dae2a553" configVersion="9480e6d83feb612a4b195d7704e7bcc5ee257b28"/>
|
||||
<Metadata name="Catalog.СтатьиФинансированияЗарплата" id="bebddb4f-6439-4e57-82b7-6010127fcff2" configVersion="6c27c4dfeadb179aeea3157df36e0d10d721f345"/>
|
||||
<Metadata name="CommonPicture.Логотип" id="aa112233-4455-6677-8899-aabbccddeeff" configVersion="6f24d102553d8a92f749591fe9b03d4c92743c48"/>
|
||||
<Metadata name="CommonPicture.Логотип.Picture" id="aa112233-4455-6677-8899-aabbccddeeff.0" configVersion="ea37a29e5a8c705c4fbee54aca915b0475b94941"/>
|
||||
<Metadata name="Configuration.ЗагрузкаДанныхИзExcel" id="a1b2c3d4-e5f6-7890-abcd-ef1234567890" configVersion="cc150361937b8a864cc9c03e18a70edd080ea059"/>
|
||||
<Metadata name="Configuration.ЗагрузкаДанныхИзExcel.Logo" id="b1c2d3e4-f5a6-7890-abcd-ef1234567890.1" configVersion="109ee3c69dbf183be1b179891821b3a3aa92c610"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel" id="f1e2d3c4-b5a6-7890-abcd-ef1234567890" configVersion="bb3bfaf8f297b9423aa23978e67a3fbba59aa66b">
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.СуммаВаловогоДоходаСНачалаГода" id="018266a1-4a61-4579-8f3f-db8e7968f829"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ОблагаемыйДоходЗаМесяц" id="03e05328-7d4e-4c65-bcf0-e06f2f87584e"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Отпуск" id="03f3e152-1a35-4ee9-abf1-5069f70fa200"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.СкидкаДляСВЗаМесяц" id="0bc767bb-d1eb-454d-82a0-92232b738ec9"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ИтогоВыплачено" id="0ce65614-e10a-4246-9d95-dedbb50803d8"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.Attribute.ПутьКФайлу" id="11111111-1111-1111-1111-111111111111"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ИзРасчетаМесячногоОкладаДни" id="13b797d2-755f-4cf0-bbb4-60432eaac281"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ИтогоФСС" id="15bc92f0-0da1-407a-acf5-01aa528ec71c"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники.Attribute.Идентификатор" id="1a5f4127-13af-4aed-ab7e-970cbc2686ad"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.Итого" id="1b50e156-33a3-440d-b20b-56c481b18a82"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ИдентификаторСотрудника" id="1c8e3f54-20eb-4051-befa-f18e586af498"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ОблагаемыйДоходЗаГод" id="1de44479-7da3-41e2-ac53-d35a064863a2"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ИтогоФСС" id="21928e13-e66f-4a44-9288-bfa9e0e505f8"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.Attribute.МесяцЗагрузки" id="22222222-2222-2222-2222-222222222222"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.НачисленныйНДФЛЗаГод" id="22737acf-8634-407a-97bc-963ae92b0d76"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПремияРазовая" id="2666795f-5add-4e7a-9c5a-58b93ffb3624"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ИдентификаторСотрудника" id="2849bd1e-63dd-4a8c-a9b5-830150ff6d11"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.Attribute.Организация" id="2f194852-8fbc-446a-b652-1bdcb6faef41"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.СтимулирующиеВыплаты" id="31c52fa2-7b1f-46be-a56c-84da901d516e"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ФИО" id="33180586-8e17-4eaa-9c04-cae6f120d23f"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП" id="33333333-3333-3333-3333-333333333333"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники.Attribute.ЛицевойСчетВБанке" id="336deef2-1607-42df-a1e3-6cfe0e79549c"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПрофВзнос" id="354243c3-a181-462a-875f-0a31123f9244"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.НачисленоСНачалаГодаФСС" id="363bc4b6-4c10-4190-9e90-ed0d7ec092ed"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.НалоговаяБазаПоСВЗаМесяц" id="37aa20ad-2531-41d4-899b-340a006f3187"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.СкидкаДляНДФЛЗаМесяц" id="386c7a70-92ff-4ed9-ae3d-4c0509733a85"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Депонент" id="39bf3b1d-d6d3-4782-972a-f447de13c60e"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПусковыеОбсервация" id="3cd75289-abdd-447c-a222-988c17aa1135"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники.Attribute.ВидЗанятости" id="3e319f0b-7c76-4108-94fe-1ba74cb6adb9"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ВозвратВКассу" id="3fd7b866-c6bc-48e6-a088-4b22ee2fbdf6"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники.Attribute.ИНН" id="4115be54-1336-47c1-9cf0-6750822b6078"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПособиеДо3ЛетУдержание" id="42d86278-6a10-4844-a71e-3ec6ef0f4b26"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.КомпенсацияЗаОтпуск" id="4317904c-010b-45a0-b6a7-f97a4d6630cf"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов" id="44444444-4444-4444-4444-444444444444"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПрофВзносНачальный" id="4b0d42a9-135f-4102-832c-132e2d2c31da"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники.Attribute.СНИЛС" id="511523fd-3327-4379-9e0c-d59669ca9ccc"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПремияАванс" id="51fb61dc-2603-4494-a2c3-9c4a9570f94b"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ОплаченоСНачалаГодаНСПЗ" id="52b572c6-65aa-44cc-bee9-584170be4d2a"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ИзРасчетаМесячногоОкладаЧасы" id="537d54b1-8fa6-471a-bab6-0e5b42bbbd05"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники.Attribute.ФИО" id="54cfbf85-cfe0-4af3-9ad5-a3b7eb77d596"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.СтимулирующаяНадбавка" id="5b36b975-5b7f-4809-8470-61b12bac767f"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.НачисленоСНачалаГодаНСПЗ" id="5d0ab4f5-447e-49a5-af70-4dd9bc17805c"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ОплаченоСНачалаГодаФСС" id="5dd91c73-62c1-43af-8b86-8c5fe59301d5"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.СчетБК" id="5f69413c-9bd0-45d8-a9f5-0afaa33300f2"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ПФСтраховая" id="60b7d353-b0b8-48b9-a314-de4d1effd68f"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ДоплатаПраздничные" id="61a9a5a7-e85a-428b-be32-5141eee357a8"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.СкидкаДляНДФЛЗаГод" id="61e18cbf-6c63-4b6b-ae7f-7acd9a4f1205"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Касса2" id="6681f8b7-3658-42da-accc-f0a5c17fe08d"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ОтработаноДней" id="66904600-cf3a-46a5-b162-83aa428ca3c4"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ДТ6Процент" id="69808ef7-1694-436b-a575-37a54163566f"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.РабочиеЧасыПоТабелю" id="76403b94-9bcf-455c-949c-9c7988c9b36a"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.СтраховаяЧастьПФ" id="7796e786-a8c2-49be-bcd3-99f5d7d164de"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ЗарплатаЗаПервуюПоловину" id="782139cc-0e01-4c73-9e4e-fdf9e7e4b41f"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ФССИтого" id="78e61a6b-c37c-4109-999d-2193586f0a41"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПовышающийКоэффициент" id="7a513202-03f4-4d05-9226-bc8e52d73470"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.НСПЗИтого" id="7a8df190-bd25-4f46-97ce-4c1b4af01691"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ЗаСтаж" id="7af06b92-c38d-4ba3-ae79-e69f27b35a9d"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ФИО" id="7eef7e97-7e6f-4ef1-911a-12f30ffe3d08"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ОстатокНаНачало" id="81b1ea36-ea5d-497c-b3c4-631e5dd801e6"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.БезналичныеПеречисления" id="83d0c062-99a4-4f86-b614-643d0f1bd901"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ" id="8730b401-1ffa-4a2d-b8e0-baebadf78a3c"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.Attribute.СтатьФинансирования" id="88c70291-7773-4305-b39a-0826e6ece436"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ВсегоВычетовЗаМесяц" id="8945f1f2-78a2-4f13-b4e7-a8b8a0724251"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Должность" id="8b42d168-fe18-4b7a-9589-761770b3e5ee"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники" id="8bc2dbda-7cbd-4246-bb9e-5a93fb59cfea"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Аванс" id="8debf971-11fe-4b00-9b6c-06a7503ef65f"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ИтогоНДФЛЗаМесяц" id="90a11a6a-e634-43bb-993d-85eff7d4e4b1"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПоУходуЗаРебенкомИнвалидом" id="90b322c1-29ab-4d7f-8285-c978a7d65f9e"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ВыплатыПоУказу597" id="94665516-fb3a-408f-a19e-07702be752d3"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ДТ4Процент" id="98f60a1c-f7e9-434a-b020-d60f3dacd737"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ИдентификаторСотрудника" id="991afed3-d7df-4a95-b1aa-665377f86fd7"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Оклад" id="a0c2d3bd-6d9c-4a38-8903-44b3db223edb"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПремияУдержание" id="a10ac824-3b83-4478-be28-4da991405f9d"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.ФССФОМС" id="a1e60d86-89ef-4708-aef6-3b53ae819ad7"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.КоличествоСтавок" id="a209a03e-c6e6-4dfb-b84d-2e22ea9bdc47"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ОтработаноДнейКалендарных" id="a7f73479-ac15-46b3-b576-bd9b2e3c81ec"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.БольничныйЛистЗаСчетПредприятия" id="aade0d1d-b0ac-43ef-be39-91acb49b02a7"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.НадбавкаЗаКатегорию" id="b00d744f-fdde-4122-8d67-c780485c1243"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.Сотрудники.Attribute.АдресРегистрации" id="b0d5a24f-4598-4567-8b11-f923d624fd06"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Родовые" id="b2e75b46-6e14-4bd2-9512-e236db7297f8"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.НадбавкаЗаВредность" id="b3b096d6-68b5-431f-8804-98623bd79660"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ДоплатаИнтенсивность" id="b688d8a5-83ec-4f70-bcea-6d4026824d7e"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ВыплатыВМежрасчетный" id="b724575e-f1cf-421a-9b09-2b0989a92f79"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ДоплатаНочные" id="b8119ef2-62b4-4d38-8048-8bea66dd25aa"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ИтогоУдержано" id="b8a678e1-4ada-47d1-8669-42720c87a8f5"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ДоплатаПрофактиву" id="bbfdedd2-840f-48e4-8781-b98bce4e3235"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПФСофинансирование" id="c2577564-40f1-4861-9e45-9830ebbf9625"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ВычетНаРаботникаЗаГод" id="c27112d9-65fd-4012-9c35-c09f9425011a"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ИсполнительныеДокументы" id="d4126cf4-8580-4770-8f86-4c761e80eb5c"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ИтогоНачислено" id="d72c9b29-b760-4fce-9cce-06bf007651d5"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ВидЗанятости" id="d845821a-437c-4922-8e22-6d7a2c6e3770"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.МесяцРасчета" id="d8a5615f-5b47-4b14-a301-3a1d47c11ba9"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.Attribute.СтатьЯРасходов" id="dd2c4848-a8ee-480b-a789-1f80a89d8c97"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ФИО" id="df18de6b-67b9-436a-8981-34827c8a4ba5"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ДоплатаДоМРОТ" id="df1deba3-9757-4f7b-9f9a-3b27bc313a49"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ВыходноеПособие" id="e0c40567-ef78-41ba-87bf-dcef01a8aee5"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ДоплатаСовместительство" id="e0c4b196-7209-46ca-a3d1-ad2afd2698df"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ПрочиеКомандировочныйУчебныйОтпуск" id="e1b60f9a-786f-4f54-aabb-c2a2f02a83fc"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Касса1" id="e5a455b9-c2d1-4dde-ba21-094def8a5380"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ЧасыНочные" id="e6d6907c-6ced-4406-976e-61801acd52a1"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ВычетНаИждивенцевЗаМесяц" id="e7673e37-72e5-4a88-8309-1d8b766307ce"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.Касса3" id="e8713344-2f36-4cb4-b7a3-c315e8781ef1"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ЧасыПраздничные" id="ebe68ea5-8a4b-46bc-9201-047fff300a54"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ДоплатаСовмещениеПроцент" id="ec41459d-f59b-4d61-884f-58bf83f83595"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ЧасыДежурства" id="ecce8898-999e-4b6d-94a2-4b36c4779102"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.НалоговаяБазаПоСВЗаМесяц" id="ef620600-a592-4764-9ce9-14140bc68937"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.НДФЛ" id="f3baeaef-c136-4eea-b1ac-374983bb9510"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.НСПЗ" id="f432a822-2e43-49fc-ba1d-f93f4d1787cd"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.НакопительнаяЧастьПФ" id="f43ed8ba-05b8-4426-9c66-6cb3fa483027"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.СуммаВаловогоДохода" id="f5ef73da-d182-4c6c-b3fb-61cb0aa2f4a2"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.РайонныйКоэффициент" id="f71ba835-d7cf-415e-a4da-6b0bea379753"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеРасчетаЗП.Attribute.ВсегоНаРуки" id="f797071d-6e4e-4883-b10c-665c5c6b117d"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеНДФЛ.Attribute.ВычетНаРаботникаЗаМесяц" id="fb3dd707-e1d6-4dd0-adb0-365953cc7b33"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.TabularSection.ДанныеСтраховыхВзносов.Attribute.НалоговаяБазаСВЗаГод" id="fe83daa5-24f0-403e-a493-d206d6c83ed7"/>
|
||||
</Metadata>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.Form.Форма" id="e1f2d3c4-b5a6-7890-abcd-ef123456789d" configVersion="b21ce57e599484cf63928d9d55447cdf249a9495"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.Form.Форма.Form" id="e1f2d3c4-b5a6-7890-abcd-ef123456789d.0" configVersion="4b79064c8353c97175a57265293fab3efe338fee"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.ManagerModule" id="f1e2d3c4-b5a6-7890-abcd-ef1234567890.2" configVersion="1f800cd2d18e1c6109cc9135ca6588cd898ce7bd"/>
|
||||
<Metadata name="DataProcessor.ЗагрузкаДанныхИзExcel.ObjectModule" id="f1e2d3c4-b5a6-7890-abcd-ef1234567890.0" configVersion="45688db0e74bd391fe23887a2d523e05814c9b60"/>
|
||||
<Metadata name="Language.Русский" id="fa05057b-734b-49ef-8c58-5cc468580f33" configVersion="d445a81521243ad274dc3237022bcfeb0b640f59"/>
|
||||
<Metadata name="Subsystem.Зарплата" id="55555555-5555-5555-5555-555555555555" configVersion="55c502e5fb642df4c059ed63fea339204c4a2334"/>
|
||||
<Metadata name="CommonModule.ЗагрузкаДанныхИзExcel_ЧтениеЭксель" id="b393308e-13c2-4dfc-9045-3293b4af20c2" configVersion="a9cc68ae2ca9454697c22bb7a7ca6120"/>
|
||||
<Metadata name="CommonModule.ЗагрузкаДанныхИзExcel_МаппингДанных" id="45ce4b90-17e1-4977-8a5d-e2342603c7eb" configVersion="b343ef1b5f3a47228dda8e9d6979129d"/>
|
||||
<Metadata name="CommonModule.ЗагрузкаДанныхИзExcel_ЗаписьВРегистры" id="04ba0cd9-1384-4364-ab99-07b6f60cab13" configVersion="48b309c2a7264f18b4e7026856c0726e"/>
|
||||
</ConfigVersions>
|
||||
</ConfigDumpInfo>
|
||||
+5
-2
@@ -56,7 +56,7 @@
|
||||
<ScriptVariant>Russian</ScriptVariant>
|
||||
<DefaultRoles/>
|
||||
<Vendor>ООО "Профи-Софт", код партнера 42575-13, г.Байконур.</Vendor>
|
||||
<Version>3.0.0.71</Version>
|
||||
<Version>3.0.0.75</Version>
|
||||
<Caption/>
|
||||
<ShortCaption/>
|
||||
<DefaultLanguage>Language.Русский</DefaultLanguage>
|
||||
@@ -95,6 +95,9 @@
|
||||
<Catalog>СтатьиРасходовЗарплата</Catalog>
|
||||
<Catalog>СтатьиФинансированияЗарплата</Catalog>
|
||||
<DataProcessor>ЗагрузкаДанныхИзExcel</DataProcessor>
|
||||
</ChildObjects>
|
||||
<CommonModule>ЗагрузкаДанныхИзExcel_ЧтениеЭксель</CommonModule>
|
||||
<CommonModule>ЗагрузкаДанныхИзExcel_МаппингДанных</CommonModule>
|
||||
<CommonModule>ЗагрузкаДанныхИзExcel_ЗаписьВРегистры</CommonModule>
|
||||
</ChildObjects>
|
||||
</Configuration>
|
||||
</MetaDataObject>
|
||||
@@ -26,7 +26,6 @@
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
Состояние("Инициализация...", 0);
|
||||
Прогресс = 0;
|
||||
СтатусЗагрузки = "Подготовка...";
|
||||
ПрочитатьExcelНаКлиенте();
|
||||
КонецПроцедуры
|
||||
@@ -37,304 +36,37 @@
|
||||
Сообщить("Нет данных для записи!");
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
ЗаписатьДанныеНаСервере(Объект._ГодЗагрузки, Объект._ОрганизацияНаименование, Объект._СтатьяФинансированияНаименование, Объект._СтатьяРасходовКод);
|
||||
ЗагрузкаДанныхИзExcel_ЗаписьВРегистры.ЗаписатьДанные(Объект._ГодЗагрузки, Объект._ОрганизацияНаименование, Объект._СтатьяФинансированияНаименование, Объект._СтатьяРасходовКод);
|
||||
Сообщить("Данные записаны!");
|
||||
КонецПроцедуры
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#Область ЧтениеExcel_Домен
|
||||
|
||||
&НаКлиенте
|
||||
Функция ОткрытьФайлExcel(ПутьКФайлу)
|
||||
Попытка
|
||||
Excel = Новый COMОбъект("Excel.Application");
|
||||
Excel.Visible = Ложь;
|
||||
Excel.DisplayAlerts = Ложь;
|
||||
Книга = Excel.Workbooks.Open(ПутьКФайлу);
|
||||
Возврат Новый Структура("Книга, Excel", Книга, Excel);
|
||||
Исключение
|
||||
Сообщить("Не удалось открыть Excel: " + ОписаниеОшибки());
|
||||
Возврат Неопределено;
|
||||
КонецПопытки;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Процедура ЗакрытьExcel(КонтекстExcel, ВременныйФайл)
|
||||
Если КонтекстExcel = Неопределено Тогда Возврат; КонецЕсли;
|
||||
Попытка
|
||||
КонтекстExcel.Книга.Close(Ложь);
|
||||
КонтекстExcel.Excel.Quit();
|
||||
Исключение
|
||||
КонецПопытки;
|
||||
Если ЗначениеЗаполнено(ВременныйФайл) Тогда УдалитьФайлы(ВременныйФайл); КонецЕсли;
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
Функция ПрочитатьЯчейкуЧисло(Лист, Строка, Колонка, КонтекстОшибки)
|
||||
Попытка
|
||||
Значение = Лист.Cells(Строка, Колонка).Value;
|
||||
Если Значение = Неопределено ИЛИ Значение = "" Тогда Возврат 0; КонецЕсли;
|
||||
Возврат Число(Значение);
|
||||
Исключение
|
||||
Сообщить("Ошибка чтения числа: " + КонтекстОшибки + " | строка " + Строка + " колонка " + Колонка);
|
||||
Возврат 0;
|
||||
КонецПопытки;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция ПрочитатьЯчейкуСтрока(Лист, Строка, Колонка)
|
||||
Попытка
|
||||
Значение = Лист.Cells(Строка, Колонка).Value;
|
||||
Если Значение = Неопределено Тогда Возврат ""; КонецЕсли;
|
||||
Возврат СокрЛП("" + Значение);
|
||||
Исключение
|
||||
Возврат "";
|
||||
КонецПопытки;
|
||||
КонецФункции
|
||||
|
||||
// Извлекает имя листа из формулы вида ='ИмяЛиста'!C2
|
||||
&НаКлиенте
|
||||
Функция ИзвлечьИмяЛистаИзФормулы(Формула)
|
||||
Если Формула = Неопределено Тогда Возврат ""; КонецЕсли;
|
||||
Текст = СокрЛП("" + Формула);
|
||||
Если Не СтрНачинаетсяС(Текст, "='") Тогда Возврат ""; КонецЕсли;
|
||||
Поз = СтрНайти(Текст, "'!");
|
||||
Если Поз = 0 Тогда Возврат ""; КонецЕсли;
|
||||
Возврат Сред(Текст, 3, Поз - 3);
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция НайтиЛист(Книга, ИмяЛиста)
|
||||
Для Каждого Лист Из Книга.Sheets Цикл
|
||||
Если ВРег(Лист.Name) = ВРег(ИмяЛиста) Тогда Возврат Лист; КонецЕсли;
|
||||
КонецЦикла;
|
||||
Возврат Неопределено;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция НомерМесяцаВТекст(НомерМесяца)
|
||||
Массив = Новый Массив;
|
||||
Массив.Добавить("Январь"); Массив.Добавить("Февраль");
|
||||
Массив.Добавить("Март"); Массив.Добавить("Апрель");
|
||||
Массив.Добавить("Май"); Массив.Добавить("Июнь");
|
||||
Массив.Добавить("Июль"); Массив.Добавить("Август");
|
||||
Массив.Добавить("Сентябрь"); Массив.Добавить("Октябрь");
|
||||
Массив.Добавить("Ноябрь"); Массив.Добавить("Декабрь");
|
||||
Если НомерМесяца >= 1 И НомерМесяца <= 12 Тогда
|
||||
Возврат Массив[НомерМесяца - 1];
|
||||
КонецЕсли;
|
||||
Возврат "";
|
||||
КонецФункции
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#Область ЧтениеДанныхСотрудника_Домен
|
||||
|
||||
&НаКлиенте
|
||||
Функция НайтиЛистСотрудника(Книга, ЛистРасчет, НомерСтроки)
|
||||
Формула = ЛистРасчет.Cells(НомерСтроки, 1).Formula;
|
||||
Если ЗначениеЗаполнено(Формула) Тогда
|
||||
ИмяЛиста = ИзвлечьИмяЛистаИзФормулы(Формула);
|
||||
Если ЗначениеЗаполнено(ИмяЛиста) Тогда
|
||||
Возврат НайтиЛист(Книга, ИмяЛиста);
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
ФИО = ПрочитатьЯчейкуСтрока(ЛистРасчет, НомерСтроки, 1);
|
||||
Если ЗначениеЗаполнено(ФИО) Тогда
|
||||
Возврат НайтиЛист(Книга, ФИО);
|
||||
КонецЕсли;
|
||||
Возврат Неопределено;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция СтрокаМесяцаНаЛистеСотрудника()
|
||||
Смещение = Объект.МесяцЗагрузки;
|
||||
Если Не ЗначениеЗаполнено(Смещение) Тогда Смещение = 1; КонецЕсли;
|
||||
Возврат 35 + Смещение;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция ПрочитатьКарточкуСотрудника(ЛистСотрудника)
|
||||
Данные = Новый Структура;
|
||||
Данные.Вставить("ФИО", ПрочитатьЯчейкуСтрока(ЛистСотрудника, 2, 3));
|
||||
Данные.Вставить("ИНН", "");
|
||||
Данные.Вставить("СНИЛС", "");
|
||||
Данные.Вставить("ЛицевойСчетВБанке", ПрочитатьЯчейкуСтрока(ЛистСотрудника, 3, 4));
|
||||
Данные.Вставить("ВидЗанятости", ПрочитатьЯчейкуСтрока(ЛистСотрудника, 5, 1));
|
||||
Данные.Вставить("АдресРегистрации", "");
|
||||
Возврат Данные;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция ПрочитатьРасчетныеДанныеИзРасчета(ЛистРасчет, Ном, ФИО)
|
||||
С = Новый Структура;
|
||||
С.Вставить("ФИО", ФИО);
|
||||
С.Вставить("Должность", ПрочитатьЯчейкуСтрока(ЛистРасчет, Ном, 2));
|
||||
С.Вставить("СчетБК", ПрочитатьЯчейкуСтрока(ЛистРасчет, Ном, 3));
|
||||
С.Вставить("ВидЗанятости", ПрочитатьЯчейкуСтрока(ЛистРасчет, Ном, 4));
|
||||
С.Вставить("Оклад", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 8, ФИО));
|
||||
С.Вставить("КоличествоСтавок", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 7, ФИО));
|
||||
С.Вставить("ОтработаноДней", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 6, ФИО));
|
||||
С.Вставить("ЧасыДежурства", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 9, ФИО));
|
||||
С.Вставить("ЧасыНочные", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 10, ФИО));
|
||||
С.Вставить("ЧасыПраздничные", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 11, ФИО));
|
||||
С.Вставить("РабочиеЧасыПоТабелю", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 12, ФИО));
|
||||
С.Вставить("ИзРасчетаМесячногоОкладаДни", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 13, ФИО));
|
||||
С.Вставить("ДоплатаСовместительство", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 14, ФИО));
|
||||
С.Вставить("ДоплатаСовмещениеПроцент", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 15, ФИО));
|
||||
С.Вставить("ДоплатаИнтенсивность", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 16, ФИО));
|
||||
С.Вставить("ИзРасчетаМесячногоОкладаЧасы", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 17, ФИО));
|
||||
С.Вставить("ДоплатаНочные", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 18, ФИО));
|
||||
С.Вставить("ДоплатаПраздничные", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 19, ФИО));
|
||||
С.Вставить("ЗаСтаж", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 20, ФИО));
|
||||
С.Вставить("НадбавкаЗаКатегорию", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 21, ФИО));
|
||||
С.Вставить("НадбавкаЗаВредность", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 22, ФИО));
|
||||
С.Вставить("ПовышающийКоэффициент", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 23, ФИО));
|
||||
С.Вставить("СтимулирующиеВыплаты", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 24, ФИО));
|
||||
С.Вставить("СтимулирующаяНадбавка", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 25, ФИО));
|
||||
С.Вставить("РайонныйКоэффициент", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 26, ФИО));
|
||||
С.Вставить("ВыплатыПоУказу597", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 27, ФИО));
|
||||
С.Вставить("ПремияРазовая", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 28, ФИО));
|
||||
С.Вставить("БольничныйЛистЗаСчетПредприятия", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 29, ФИО));
|
||||
С.Вставить("ДоплатаПрофактиву", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 30, ФИО));
|
||||
С.Вставить("ПусковыеОбсервация", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 31, ФИО));
|
||||
С.Вставить("Отпуск", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 32, ФИО));
|
||||
С.Вставить("КомпенсацияЗаОтпуск", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 33, ФИО));
|
||||
С.Вставить("ПрочиеКомандировочныйУчебныйОтпуск", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 34, ФИО));
|
||||
С.Вставить("ВыходноеПособие", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 35, ФИО));
|
||||
С.Вставить("ПоУходуЗаРебенкомИнвалидом", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 36, ФИО));
|
||||
С.Вставить("ДоплатаДоМРОТ", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 37, ФИО));
|
||||
С.Вставить("Родовые", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 38, ФИО));
|
||||
// Итоги
|
||||
С.Вставить("ИтогоНачислено", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 39, ФИО));
|
||||
С.Вставить("НДФЛ", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 40, ФИО));
|
||||
С.Вставить("ПрофВзнос", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 41, ФИО));
|
||||
С.Вставить("ИсполнительныеДокументы", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 42, ФИО));
|
||||
С.Вставить("Аванс", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 43, ФИО));
|
||||
С.Вставить("ПФСофинансирование", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 44, ФИО));
|
||||
С.Вставить("ПремияУдержание", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 45, ФИО));
|
||||
С.Вставить("Касса1", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 46, ФИО));
|
||||
С.Вставить("Касса2", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 47, ФИО));
|
||||
С.Вставить("Касса3", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 48, ФИО));
|
||||
С.Вставить("ПособиеДо3ЛетУдержание", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 49, ФИО));
|
||||
С.Вставить("БезналичныеПеречисления", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 50, ФИО));
|
||||
С.Вставить("ВозвратВКассу", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 51, ФИО));
|
||||
С.Вставить("Депонент", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 52, ФИО));
|
||||
С.Вставить("ОстатокНаНачало", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 54, ФИО));
|
||||
С.Вставить("ВсегоНаРуки", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 55, ФИО));
|
||||
// TODO: ЗарплатаЗаПервуюПоловину, ПремияАванс, ВыплатыВМежрасчетный — колонки не определены
|
||||
// Сейчас перезаписывают ПФСофинансирование/ПремияУдержание/Касса1 (кол. 44/45/46)
|
||||
С.Вставить("ЗарплатаЗаПервуюПоловину", 0);
|
||||
С.Вставить("ПремияАванс", 0);
|
||||
С.Вставить("ВыплатыВМежрасчетный", 0);
|
||||
// Расчёт итогов
|
||||
С.Вставить("ИтогоУдержано",
|
||||
С.НДФЛ + С.ПрофВзнос + С.ИсполнительныеДокументы + С.ПФСофинансирование
|
||||
+ С.ПремияУдержание + С.ПособиеДо3ЛетУдержание + С.Депонент);
|
||||
С.Вставить("ИтогоВыплачено",
|
||||
С.Аванс + С.Касса1 + С.Касса2 + С.Касса3
|
||||
+ С.БезналичныеПеречисления + С.ВозвратВКассу);
|
||||
Возврат С;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция ПрочитатьНДФЛСоЛиста(ЛистСотрудника, ФИО)
|
||||
Если ЛистСотрудника = Неопределено Тогда Возврат Неопределено; КонецЕсли;
|
||||
ЕстьБлок = Ложь;
|
||||
Для Стр = 30 По 32 Цикл
|
||||
Текст = НРег(ПрочитатьЯчейкуСтрока(ЛистСотрудника, Стр, 1));
|
||||
Если СтрНайти(Текст, "ндфл") > 0 ИЛИ СтрНайти(Текст, "взнос") > 0 Тогда
|
||||
ЕстьБлок = Истина; Прервать;
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
Если Не ЕстьБлок Тогда
|
||||
Если СтрНайти(НРег(ПрочитатьЯчейкуСтрока(ЛистСотрудника, 36, 1)), "январь") = 0 Тогда
|
||||
Возврат Неопределено;
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
СД = СтрокаМесяцаНаЛистеСотрудника();
|
||||
НДФЛ = Новый Структура;
|
||||
НДФЛ.Вставить("ФИО", ФИО);
|
||||
НДФЛ.Вставить("МесяцРасчета", ПрочитатьЯчейкуСтрока(ЛистСотрудника, СД, 1));
|
||||
НДФЛ.Вставить("СуммаВаловогоДохода", ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 4, ФИО));
|
||||
НДФЛ.Вставить("СуммаВаловогоДоходаСНачалаГода", ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 6, ФИО));
|
||||
НДФЛ.Вставить("СкидкаДляНДФЛЗаМесяц", ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 8, ФИО));
|
||||
НДФЛ.Вставить("СкидкаДляНДФЛЗаГод", ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 9, ФИО));
|
||||
НДФЛ.Вставить("СкидкаДляСВЗаМесяц", ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 10, ФИО));
|
||||
НДФЛ.Вставить("ВычетНаРаботникаЗаМесяц", ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 12, ФИО));
|
||||
НДФЛ.Вставить("ВычетНаРаботникаЗаГод", 0);
|
||||
НДФЛ.Вставить("ВычетНаИждивенцевЗаМесяц", ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 13, ФИО));
|
||||
НДФЛ.Вставить("ВсегоВычетовЗаМесяц", ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 14, ФИО));
|
||||
НДФЛ.Вставить("ОблагаемыйДоходЗаМесяц", 0);
|
||||
НДФЛ.Вставить("ОблагаемыйДоходЗаГод", ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 15, ФИО));
|
||||
НДФЛ.Вставить("НачисленныйНДФЛЗаГод", ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 16, ФИО));
|
||||
НДФЛ.Вставить("ИтогоНДФЛЗаМесяц", ПрочитатьЯчейкуЧисло(ЛистСотрудника, СД, 18, ФИО));
|
||||
Возврат НДФЛ;
|
||||
КонецФункции
|
||||
|
||||
&НаКлиенте
|
||||
Функция ПрочитатьВзносыИзРасчета(ЛистРасчет, Ном, ФИО)
|
||||
СВ = ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 63, ФИО);
|
||||
Если СВ <= 0 Тогда Возврат Неопределено; КонецЕсли;
|
||||
Стр = Новый Структура;
|
||||
Стр.Вставить("ФИО", ФИО);
|
||||
Стр.Вставить("ДТ6Процент", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 58, ФИО));
|
||||
Стр.Вставить("ДТ4Процент", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 59, ФИО));
|
||||
Стр.Вставить("ПФСтраховая", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 60, ФИО));
|
||||
Стр.Вставить("ФССФОМС", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 61, ФИО));
|
||||
Стр.Вставить("НСПЗ", ПрочитатьЯчейкуЧисло(ЛистРасчет, Ном, 62, ФИО));
|
||||
Стр.Вставить("Итого", СВ);
|
||||
Возврат Стр;
|
||||
КонецФункции
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#Область ОсновнаяПроцедура_Домен
|
||||
#Область ОсновнаяПроцедура
|
||||
|
||||
&НаКлиенте
|
||||
Процедура ПрочитатьExcelНаКлиенте()
|
||||
Состояние("Копирование файла...", 5);
|
||||
ВременныйФайл = КаталогВременныхФайлов() + "temp_" + Формат(ТекущаяДата(), "ДФ=yyyyMMddHHmmss") + ".xls";
|
||||
КопироватьФайл(Объект.ПутьКФайлу, ВременныйФайл);
|
||||
КонтекстExcel = ОткрытьФайлExcel(ВременныйФайл);
|
||||
Если КонтекстExcel = Неопределено Тогда УдалитьФайлы(ВременныйФайл); Возврат; КонецЕсли;
|
||||
КонтекстExcel = ЗагрузкаДанныхИзExcel_ЧтениеЭксель.ОткрытьФайлExcel(Объект.ПутьКФайлу);
|
||||
Если КонтекстExcel = Неопределено Тогда Возврат; КонецЕсли;
|
||||
|
||||
ЛистРасчет = НайтиЛист(КонтекстExcel.Книга, "Расчет");
|
||||
ЛистРасчет = ЗагрузкаДанныхИзExcel_ЧтениеЭксель.НайтиЛист(КонтекстExcel.Книга, "Расчет");
|
||||
Если ЛистРасчет = Неопределено Тогда
|
||||
Сообщить("Лист Расчет не найден!");
|
||||
ЗакрытьExcel(КонтекстExcel, ВременныйФайл);
|
||||
Сообщить("Лист 'Расчет' не найден!");
|
||||
ЗагрузкаДанныхИзExcel_ЧтениеЭксель.ЗакрытьExcel(КонтекстExcel, Неопределено);
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
// Месяц и год
|
||||
МесяцЗначение = ЛистРасчет.Cells(4, 1).Value;
|
||||
Если ЗначениеЗаполнено(МесяцЗначение) Тогда
|
||||
Попытка
|
||||
Объект.МесяцЗагрузки = Число(МесяцЗначение);
|
||||
Исключение
|
||||
Объект.МесяцЗагрузки = 0;
|
||||
КонецПопытки;
|
||||
КонецЕсли;
|
||||
ГодЗначение = ЛистРасчет.Cells(3, 1).Value;
|
||||
Если ЗначениеЗаполнено(ГодЗначение) Тогда
|
||||
Попытка
|
||||
Объект._ГодЗагрузки = Число(ГодЗначение);
|
||||
Исключение
|
||||
Объект._ГодЗагрузки = 0;
|
||||
КонецПопытки;
|
||||
Иначе
|
||||
Объект._ГодЗагрузки = 0;
|
||||
КонецЕсли;
|
||||
МесяцТекст = НомерМесяцаВТекст(Объект.МесяцЗагрузки) + " " + Объект._ГодЗагрузки;
|
||||
Организация = СокрЛП(Строка(ЛистРасчет.Cells(4, 20).Value));
|
||||
СтатьяФинансирования = СокрЛП(Строка(ЛистРасчет.Cells(8, 20).Value));
|
||||
СтатьяРасходов = "211";
|
||||
// Сохраняем строковые значения для передачи на сервер
|
||||
Объект._ОрганизацияНаименование = Организация;
|
||||
Объект._СтатьяФинансированияНаименование = СтатьяФинансирования;
|
||||
Объект._СтатьяРасходовКод = СтатьяРасходов;
|
||||
// Строка начала данных
|
||||
// Определяем параметры из Excel
|
||||
Объект._ГодЗагрузки = Строка(ЗагрузкаДанныхИзExcel_МаппингДанных.ОпределитьГодЗагрузки(ЛистРасчет));
|
||||
Объект._ОрганизацияНаименование = ЗагрузкаДанныхИзExcel_МаппингДанных.ОпределитьОрганизацию(ЛистРасчет);
|
||||
Объект._СтатьяФинансированияНаименование = ЗагрузкаДанныхИзExcel_МаппингДанных.ОпределитьСтатьюФинансирования(ЛистРасчет);
|
||||
Объект._СтатьяРасходовКод = "211";
|
||||
Объект.МесяцЗагрузки = Число(ЛистРасчет.Cells(4, 1).Value);
|
||||
|
||||
ГодЗагрузки = Объект._ГодЗагрузки;
|
||||
МесяцТекст = ЗагрузкаДанныхИзExcel_МаппингДанных.НомерМесяцаВТекст(Объект.МесяцЗагрузки) + " " + ГодЗагрузки;
|
||||
|
||||
// Определяем начальную строку данных
|
||||
НачальнаяСтрока = 0;
|
||||
Для Ном = 17 По 30 Цикл
|
||||
Формула = ЛистРасчет.Cells(Ном, 1).Formula;
|
||||
@@ -354,7 +86,7 @@
|
||||
КонецЕсли;
|
||||
Если НачальнаяСтрока = 0 Тогда
|
||||
Сообщить("Данные не найдены!");
|
||||
ЗакрытьExcel(КонтекстExcel, ВременныйФайл);
|
||||
ЗагрузкаДанныхИзExcel_ЧтениеЭксель.ЗакрытьExcel(КонтекстExcel, Неопределено);
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
@@ -376,23 +108,22 @@
|
||||
Если СтрНачинаетсяС(ВРег(ФИОТекст), "ИТОГО") Тогда Прервать; КонецЕсли;
|
||||
Если СтрНачинаетсяС(ВРег(ФИОТекст), "СОТРУДНИК") ИЛИ СтрНачинаетсяС(ВРег(ФИОТекст), "ФАМИЛИЯ") Тогда Продолжить; КонецЕсли;
|
||||
|
||||
ЛистСотрудника = НайтиЛистСотрудника(КонтекстExcel.Книга, ЛистРасчет, Ном);
|
||||
ЛистСотрудника = ЗагрузкаДанныхИзExcel_МаппингДанных.НайтиЛистСотрудника(КонтекстExcel.Книга, ЛистРасчет, Ном);
|
||||
Если ЛистСотрудника = Неопределено Тогда Продолжить; КонецЕсли;
|
||||
|
||||
ФИО = ПрочитатьЯчейкуСтрока(ЛистСотрудника, 2, 3);
|
||||
ФИО = ЗагрузкаДанныхИзExcel_ЧтениеЭксель.ПрочитатьЯчейкуСтрока(ЛистСотрудника, 2, 3);
|
||||
Если Не ЗначениеЗаполнено(ФИО) Тогда ФИО = ФИОТекст; КонецЕсли;
|
||||
Если Не ЗначениеЗаполнено(ФИО) Тогда Продолжить; КонецЕсли;
|
||||
|
||||
Счетчик = Счетчик + 1;
|
||||
Состояние("Загрузка: " + ФИО, 20 + 70 * Счетчик / 50);
|
||||
|
||||
Строка = ПрочитатьРасчетныеДанныеИзРасчета(ЛистРасчет, Ном, ФИО);
|
||||
Строка = ЗагрузкаДанныхИзExcel_МаппингДанных.ПрочитатьРасчетныеДанные(ЛистРасчет, Ном, ФИО);
|
||||
Строка.Вставить("ИдентификаторСотрудника", Счетчик);
|
||||
Строка.Вставить("ОтработаноДнейКалендарных", ЗагрузкаДанныхИзExcel_ЧтениеЭксель.ПрочитатьЯчейкуЧисло(ЛистСотрудника, ЗагрузкаДанныхИзExcel_МаппингДанных.СтрокаМесяцаНаЛистеСотрудника(), 4, ФИО));
|
||||
|
||||
Если ЛистСотрудника <> Неопределено Тогда
|
||||
СтрокаМесяца = СтрокаМесяцаНаЛистеСотрудника();
|
||||
Строка.Вставить("ОтработаноДнейКалендарных", ПрочитатьЯчейкуЧисло(ЛистСотрудника, СтрокаМесяца, 4, ФИО));
|
||||
Карточка = ПрочитатьКарточкуСотрудника(ЛистСотрудника);
|
||||
Карточка = ЗагрузкаДанныхИзExcel_МаппингДанных.ПрочитатьКарточкуСотрудника(ЛистСотрудника);
|
||||
Если ЗначениеЗаполнено(Карточка.ФИО) Тогда Строка.Вставить("ФИО", Карточка.ФИО); КонецЕсли;
|
||||
КонецЕсли;
|
||||
|
||||
@@ -400,17 +131,16 @@
|
||||
|
||||
// Сотрудники
|
||||
Если ЛистСотрудника <> Неопределено Тогда
|
||||
ДанныеСотр = ПрочитатьКарточкуСотрудника(ЛистСотрудника);
|
||||
ДанныеСотр = ЗагрузкаДанныхИзExcel_МаппингДанных.ПрочитатьКарточкуСотрудника(ЛистСотрудника);
|
||||
Иначе
|
||||
ДанныеСотр = Новый Структура("ФИО, ИНН, СНИЛС, ЛицевойСчетВБанке, ВидЗанятости, АдресРегистрации",
|
||||
ФИО, "", "", "", "", "");
|
||||
ДанныеСотр = Новый Структура("ФИО, ИНН, СНИЛС, ЛицевойСчетВБанке, ВидЗанятости, АдресРегистрации", ФИО, "", "", "", "", "");
|
||||
КонецЕсли;
|
||||
ДанныеСотр.Вставить("Идентификатор", Счетчик);
|
||||
МассивСотрудников.Добавить(ДанныеСотр);
|
||||
|
||||
// НДФЛ
|
||||
Если ЛистСотрудника <> Неопределено Тогда
|
||||
ДанныеНДФЛ = ПрочитатьНДФЛСоЛиста(ЛистСотрудника, ФИО);
|
||||
ДанныеНДФЛ = ЗагрузкаДанныхИзExcel_МаппингДанных.ПрочитатьНДФЛСоЛиста(ЛистСотрудника, ФИО);
|
||||
Если ДанныеНДФЛ <> Неопределено Тогда
|
||||
ДанныеНДФЛ.Вставить("ИдентификаторСотрудника", Счетчик);
|
||||
МассивНДФЛ.Добавить(ДанныеНДФЛ);
|
||||
@@ -418,18 +148,21 @@
|
||||
КонецЕсли;
|
||||
|
||||
// Страховые взносы
|
||||
СтрВзносов = ПрочитатьВзносыИзРасчета(ЛистРасчет, Ном, ФИО);
|
||||
СтрВзносов = ЗагрузкаДанныхИзExcel_МаппингДанных.ПрочитатьВзносыИзРасчета(ЛистРасчет, Ном, ФИО);
|
||||
Если СтрВзносов <> Неопределено Тогда
|
||||
СтрВзносов.Вставить("ИдентификаторСотрудника", Счетчик);
|
||||
МассивВзносов.Добавить(СтрВзносов);
|
||||
КонецЕсли;
|
||||
|
||||
КонецЦикла;
|
||||
|
||||
ЗакрытьExcel(КонтекстExcel, ВременныйФайл);
|
||||
ЗагрузкаДанныхИзExcel_ЧтениеЭксель.ЗакрытьExcel(КонтекстExcel, Неопределено);
|
||||
Состояние("Заполнение таблиц...", 95);
|
||||
|
||||
ЗаполнитьТаблицыНаСервере(МассивДанных, МассивВзносов, МассивНДФЛ, МассивСотрудников);
|
||||
СтатусЗагрузки = "Готово! " + МассивДанных.Количество() + " сотр., " + МассивНДФЛ.Количество() + " записей НДФЛ";
|
||||
Сообщить(СтатусЗагрузки);
|
||||
ОбновитьОтображениеДанных();
|
||||
|
||||
СтатусЗагрузки = "Загружено: " + Счетчик + " сотрудников";
|
||||
Состояние("Готово", 100);
|
||||
КонецПроцедуры
|
||||
|
||||
#КонецОбласти
|
||||
@@ -438,263 +171,7 @@
|
||||
|
||||
&НаСервере
|
||||
Процедура ЗаполнитьТаблицыНаСервере(МассивДанных, МассивВзносов, МассивНДФЛ, МассивСотрудников)
|
||||
Объект.ДанныеРасчетаЗП.Очистить();
|
||||
Для Каждого Эл Из МассивДанных Цикл
|
||||
Строка = Объект.ДанныеРасчетаЗП.Добавить();
|
||||
ЗаполнитьЗначенияСвойств(Строка, Эл);
|
||||
КонецЦикла;
|
||||
Объект.ДанныеСтраховыхВзносов.Очистить();
|
||||
Для Каждого Эл Из МассивВзносов Цикл
|
||||
Строка = Объект.ДанныеСтраховыхВзносов.Добавить();
|
||||
ЗаполнитьЗначенияСвойств(Строка, Эл);
|
||||
КонецЦикла;
|
||||
Объект.ДанныеНДФЛ.Очистить();
|
||||
Для Каждого Эл Из МассивНДФЛ Цикл
|
||||
Строка = Объект.ДанныеНДФЛ.Добавить();
|
||||
ЗаполнитьЗначенияСвойств(Строка, Эл);
|
||||
КонецЦикла;
|
||||
Объект.Сотрудники.Очистить();
|
||||
Для Каждого Эл Из МассивСотрудников Цикл
|
||||
Строка = Объект.Сотрудники.Добавить();
|
||||
ЗаполнитьЗначенияСвойств(Строка, Эл);
|
||||
КонецЦикла;
|
||||
КонецПроцедуры
|
||||
|
||||
&НаСервере
|
||||
Процедура ЗаписатьДанныеНаСервере(Знач ГодЗагрузкиПараметр, ОрганизацияНаименование, СтатьяФинансированияНаименование, СтатьяРасходовКод)
|
||||
// Определяем период
|
||||
ГодЧисло = Число(ГодЗагрузкиПараметр);
|
||||
МесяцЧисло = Цел(Объект.МесяцЗагрузки);
|
||||
Если ГодЧисло = 0 Тогда ГодЧисло = Год(ТекущаяДата()); КонецЕсли;
|
||||
Если МесяцЧисло < 1 Или МесяцЧисло > 12 Тогда
|
||||
Сообщить("Ошибка: месяц загрузки = " + МесяцЧисло + ", год = " + ГодЧисло);
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
Период = Дата(ГодЧисло, МесяцЧисло, 1);
|
||||
|
||||
// Разрешаем ссылки из строковых значений
|
||||
Организация = Справочники.Организации.НайтиПоНаименованию(СокрЛП(ОрганизацияНаименование), Истина);
|
||||
Если Не ЗначениеЗаполнено(Организация) Тогда
|
||||
Сообщить("Не найдена организация: """ + ОрганизацияНаименование + """");
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
СтатьяФинансирования = Неопределено;
|
||||
Если ЗначениеЗаполнено(СтатьяФинансированияНаименование) Тогда
|
||||
СтатьяФинансирования = Справочники.СтатьиФинансированияЗарплата.НайтиПоНаименованию(СокрЛП(СтатьяФинансированияНаименование), Истина);
|
||||
КонецЕсли;
|
||||
|
||||
СтатьяРасходов = Неопределено;
|
||||
Если ЗначениеЗаполнено(СтатьяРасходовКод) Тогда
|
||||
СтатьяРасходов = Справочники.СтатьиРасходовЗарплата.НайтиПоКоду(СокрЛП(СтатьяРасходовКод));
|
||||
КонецЕсли;
|
||||
|
||||
// Создаём документ ПереносДанных
|
||||
ДокПеренос = Документы.ПереносДанных.СоздатьДокумент();
|
||||
ДокПеренос.Дата = Период;
|
||||
|
||||
// Сопоставление сотрудников
|
||||
СоответствиеСотрудников = Новый Соответствие;
|
||||
Для Каждого Эл Из Объект.Сотрудники Цикл
|
||||
СоответствиеСотрудников.Вставить(Эл.Идентификатор, Эл.ФИО);
|
||||
КонецЦикла;
|
||||
|
||||
// Кэш сотрудников: Идентификатор -> (Сотрудник, ФизическоеЛицо)
|
||||
// Приоритет поиска: ИНН → СНИЛС → ФИО
|
||||
КэшСотрудников = Новый Соответствие;
|
||||
Для Каждого Эл Из Объект.Сотрудники Цикл
|
||||
СотрСсылка = Неопределено;
|
||||
|
||||
// 1. Поиск по ИНН (уникальный идентификатор)
|
||||
Если ЗначениеЗаполнено(Эл.ИНН) Тогда
|
||||
СотрСсылка = Справочники.Сотрудники.НайтиПоРеквизиту("ИНН", СокрЛП(Эл.ИНН));
|
||||
КонецЕсли;
|
||||
|
||||
// 2. Поиск по СНИЛС
|
||||
Если Не ЗначениеЗаполнено(СотрСсылка) И ЗначениеЗаполнено(Эл.СНИЛС) Тогда
|
||||
ФЛ = Справочники.ФизическиеЛица.НайтиПоРеквизиту("СтраховойНомерПФР", СокрЛП(Эл.СНИЛС));
|
||||
Если ЗначениеЗаполнено(ФЛ) Тогда
|
||||
СотрСсылка = Справочники.Сотрудники.НайтиПоРеквизиту("ФизическоеЛицо", ФЛ, Истина);
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
|
||||
// 3. Поиск по ФИО (fallback)
|
||||
Если Не ЗначениеЗаполнено(СотрСсылка) И ЗначениеЗаполнено(Эл.ФИО) Тогда
|
||||
СотрСсылка = Справочники.Сотрудники.НайтиПоНаименованию(СокрЛП(Эл.ФИО), Истина);
|
||||
КонецЕсли;
|
||||
|
||||
Если ЗначениеЗаполнено(СотрСсылка) Тогда
|
||||
КэшСотрудников.Вставить(Эл.Идентификатор, Новый Структура("Сотрудник, ФизическоеЛицо", СотрСсылка, СотрСсылка.ФизическоеЛицо));
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
|
||||
// Сопоставление организаций и статей
|
||||
// ============================================
|
||||
// Регистр 1: НачисленияУдержанияПоСотрудникам
|
||||
// ============================================
|
||||
Для Каждого Строка Из Объект.ДанныеРасчетаЗП Цикл
|
||||
ИД = Строка.ИдентификаторСотрудника;
|
||||
ДанныеСотр = КэшСотрудников.Получить(ИД);
|
||||
Если ДанныеСотр = Неопределено Тогда Продолжить; КонецЕсли;
|
||||
ФизЛицо = ДанныеСотр.ФизическоеЛицо;
|
||||
СотрудникСсылка = ДанныеСотр.Сотрудник;
|
||||
|
||||
// Начисления (Оклад, доплаты, надбавки и т.д.)
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "Оклад", Строка.Оклад, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ДоплатаСовместительство", Строка.ДоплатаСовместительство, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ДоплатаНочные", Строка.ДоплатаНочные, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ДоплатаПраздничные", Строка.ДоплатаПраздничные, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "НадбавкаЗаКатегорию", Строка.НадбавкаЗаКатегорию, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "НадбавкаЗаВредность", Строка.НадбавкаЗаВредность, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ПовышающийКоэффициент", Строка.ПовышающийКоэффициент, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "СтимулирующаяВыплата", Строка.СтимулирующиеВыплаты, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "РайонныйКоэффициент", Строка.РайонныйКоэффициент, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ПремияРазовая", Строка.ПремияРазовая, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "Отпуск", Строка.Отпуск, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "КомпенсацияЗаНеиспользованныйОтпуск", Строка.КомпенсацияЗаОтпуск, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ВыходноеПособие", Строка.ВыходноеПособие, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "Родовые", Строка.Родовые, Перечисления.ГруппыНачисленияУдержанияВыплаты.Начислено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
|
||||
// Удержания
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "НДФЛ", Строка.НДФЛ, Перечисления.ГруппыНачисленияУдержанияВыплаты.Удержано, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ПрофВзнос", Строка.ПрофВзнос, Перечисления.ГруппыНачисленияУдержанияВыплаты.Удержано, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ИсполнительныйДокумент", Строка.ИсполнительныеДокументы, Перечисления.ГруппыНачисленияУдержанияВыплаты.Удержано, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
|
||||
// Выплаты
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "Оклад", Строка.Аванс, Перечисления.ГруппыНачисленияУдержанияВыплаты.Выплачено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "Оклад", Строка.ЗарплатаЗаПервуюПоловину, Перечисления.ГруппыНачисленияУдержанияВыплаты.Выплачено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "Касса1", Строка.Касса1, Перечисления.ГруппыНачисленияУдержанияВыплаты.Выплачено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "БезналичноеПеречисление", Строка.БезналичныеПеречисления, Перечисления.ГруппыНачисленияУдержанияВыплаты.Выплачено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ПремияАванс", Строка.ПремияАванс, Перечисления.ГруппыНачисленияУдержанияВыплаты.Выплачено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
ЗаписатьНачисление(ДокПеренос, Строка, "ВыплатыВМежрасчетный", Строка.ВыплатыВМежрасчетный, Перечисления.ГруппыНачисленияУдержанияВыплаты.Выплачено, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка);
|
||||
КонецЦикла;
|
||||
|
||||
// Регистр 2: ОтработанноеВремяПоСотрудникам
|
||||
// ============================================
|
||||
ВидРасчётаОклад = ПланыВидовРасчета.Начисления.НайтиПоНаименованию("Оклад", Истина);
|
||||
Для Каждого Строка Из Объект.ДанныеРасчетаЗП Цикл
|
||||
ДанныеСотр = КэшСотрудников.Получить(Строка.ИдентификаторСотрудника);
|
||||
Если ДанныеСотр = Неопределено Тогда Продолжить; КонецЕсли;
|
||||
Если Строка.ОтработаноДней > 0 Или Строка.РабочиеЧасыПоТабелю > 0 Тогда
|
||||
Движение = ДокПеренос.Движения.ОтработанноеВремяПоСотрудникам.Добавить();
|
||||
Движение.Период = Период;
|
||||
Движение.Организация = Организация;
|
||||
Движение.ФизическоеЛицо = ДанныеСотр.ФизическоеЛицо;
|
||||
Движение.Сотрудник = ДанныеСотр.Сотрудник;
|
||||
Движение.Начисление = ВидРасчётаОклад;
|
||||
Движение.ОтработаноДней = Строка.ОтработаноДней;
|
||||
Движение.ОтработаноЧасов = Строка.РабочиеЧасыПоТабелю;
|
||||
Движение.ОплаченоДней = Строка.ОтработаноДней;
|
||||
Движение.ОплаченоЧасов = Строка.РабочиеЧасыПоТабелю;
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
|
||||
// ============================================
|
||||
// Регистр 3: СведенияОДоходахНДФЛ
|
||||
// ============================================
|
||||
Для Каждого Строка Из Объект.ДанныеНДФЛ Цикл
|
||||
ДанныеСотр = КэшСотрудников.Получить(Строка.ИдентификаторСотрудника);
|
||||
Если ДанныеСотр = Неопределено Тогда Продолжить; КонецЕсли;
|
||||
Движение = ДокПеренос.Движения.СведенияОДоходахНДФЛ.Добавить();
|
||||
Движение.Период = Период;
|
||||
Движение.ГоловнаяОрганизация = Организация;
|
||||
Движение.Организация = Организация;
|
||||
Движение.ФизическоеЛицо = ДанныеСотр.ФизическоеЛицо;
|
||||
Движение.МесяцНалоговогоПериода = Период;
|
||||
Движение.СуммаДохода = Строка.СуммаВаловогоДохода;
|
||||
Движение.СуммаВычета = Строка.СкидкаДляНДФЛЗаМесяц + Строка.ВычетНаРаботникаЗаМесяц + Строка.ВычетНаИждивенцевЗаМесяц;
|
||||
КонецЦикла;
|
||||
|
||||
// ============================================
|
||||
// Регистр 4: СтраховыеВзносыПоФизическимЛицам
|
||||
// ============================================
|
||||
Для Каждого Строка Из Объект.ДанныеСтраховыхВзносов Цикл
|
||||
ДанныеСотр = КэшСотрудников.Получить(Строка.ИдентификаторСотрудника);
|
||||
Если ДанныеСотр = Неопределено Тогда Продолжить; КонецЕсли;
|
||||
Движение = ДокПеренос.Движения.СтраховыеВзносыПоФизическимЛицам.Добавить();
|
||||
Движение.Период = Период;
|
||||
Движение.Организация = Организация;
|
||||
Движение.ФизическоеЛицо = ДанныеСотр.ФизическоеЛицо;
|
||||
Движение.Сотрудник = ДанныеСотр.Сотрудник;
|
||||
Движение.ПФРДоПредельнойВеличины = Строка.ДТ6Процент;
|
||||
Движение.ПФРСтраховая = Строка.ПФСтраховая;
|
||||
Движение.ФФОМС = Строка.ФССФОМС;
|
||||
Движение.ФССНесчастныеСлучаи = Строка.НСПЗ;
|
||||
КонецЦикла;
|
||||
|
||||
// ============================================
|
||||
// Регистр 5: ПредоставленныеСтандартныеИСоциальныеВычетыНДФЛ
|
||||
// Вычеты на детей (стандартные и социальные)
|
||||
// Пока нет данных в ТЧ для этого регистра - пропускаем
|
||||
// ============================================
|
||||
|
||||
// ============================================
|
||||
// Регистр 8: ДанныеОВремениДляРасчетаСреднегоОбщий
|
||||
// Dimensions: Сотрудник, ПорядокРасчета
|
||||
// Resources: ОтработаноДней, ОтработаноЧасов, ОтработаноДнейКалендарных
|
||||
// ============================================
|
||||
ДвиженияСреднего = ДокПеренос.Движения.ДанныеОВремениДляРасчетаСреднегоОбщий;
|
||||
Для Каждого Строка Из Объект.ДанныеРасчетаЗП Цикл
|
||||
ДанныеСотр = КэшСотрудников.Получить(Строка.ИдентификаторСотрудника);
|
||||
Если ДанныеСотр = Неопределено Тогда Продолжить; КонецЕсли;
|
||||
Если Строка.ОтработаноДней <> 0 Или Строка.ОтработаноДнейКалендарных <> 0 Тогда
|
||||
Движение = ДвиженияСреднего.Добавить();
|
||||
Движение.Период = Период;
|
||||
Движение.Сотрудник = ДанныеСотр.Сотрудник;
|
||||
Движение.ОтработаноДней = Строка.ОтработаноДней;
|
||||
Движение.ОтработаноЧасов = Строка.РабочиеЧасыПоТабелю;
|
||||
Движение.ОтработаноДнейКалендарных = Строка.ОтработаноДнейКалендарных;
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
|
||||
ДокПеренос.Записать();
|
||||
|
||||
Сообщить("Данные записаны. Документ: " + ДокПеренос.Ссылка);
|
||||
КонецПроцедуры
|
||||
|
||||
// Вспомогательная процедура для записи начисления/удержания/выплаты
|
||||
&НаСервере
|
||||
Процедура ЗаписатьНачисление(ДокПеренос, Строка, ВидРасчета, Сумма, Группа, Период, Организация, СтатьяФинансирования, СтатьяРасходов, ФизЛицо, СотрудникСсылка)
|
||||
Если Сумма = 0 Тогда Возврат; КонецЕсли;
|
||||
|
||||
// Определяем суффикс ПВР по статье финансирования
|
||||
Суффикс = "";
|
||||
Если СтатьяФинансирования <> Неопределено Тогда
|
||||
НаименованиеСтатьи = СокрЛП(СтатьяФинансирования.Наименование);
|
||||
Если СтрНайти(НаименованиеСтатьи, "\u041e\u041c\u0421") > 0 Тогда
|
||||
Суффикс = " (\u041e\u041c\u0421)";
|
||||
ИначеЕсли СтрНайти(НаименованиеСтатьи, "\u041f\u0414") > 0 Тогда
|
||||
Суффикс = " (\u041f\u0414)";
|
||||
ИначеЕсли СтрНайти(НаименованиеСтатьи, "\u0411\u044e\u0434\u0436\u0435\u0442") > 0 Или СтрНайти(НаименованиеСтатьи, "\u0441\u0443\u0431") > 0 Тогда
|
||||
Суффикс = "";
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
|
||||
// Ищем ПВР сначала с суффиксом, потом без
|
||||
ВидРасчёта = Неопределено;
|
||||
Если ЗначениеЗаполнено(Суффикс) Тогда
|
||||
ВидРасчёта = ПланыВидовРасчета.Начисления.НайтиПоНаименованию(ВидРасчета + Суффикс, Истина);
|
||||
КонецЕсли;
|
||||
Если ВидРасчёта = Неопределено Тогда
|
||||
ВидРасчёта = ПланыВидовРасчета.Начисления.НайтиПоНаименованию(ВидРасчета, Истина);
|
||||
КонецЕсли;
|
||||
|
||||
Если ВидРасчёта = Неопределено Тогда
|
||||
Сообщить("Не найден ПВР: " + ВидРасчета + Суффикс);
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
Движение = ДокПеренос.Движения.НачисленияУдержанияПоСотрудникам.Добавить();
|
||||
Движение.Период = Период;
|
||||
Движение.Организация = Организация;
|
||||
Движение.ФизическоеЛицо = ФизЛицо;
|
||||
Движение.Сотрудник = СотрудникСсылка;
|
||||
Движение.НачислениеУдержание = ВидРасчёта;
|
||||
Движение.Сумма = Сумма;
|
||||
Движение.ГруппаНачисленияУдержанияВыплаты = Группа;
|
||||
Движение.СтатьяФинансирования = СтатьяФинансирования;
|
||||
Движение.СтатьяРасходов = СтатьяРасходов;
|
||||
Движение.Сторно = Ложь;
|
||||
ЗагрузкаДанныхИзExcel_ЗаписьВРегистры.ЗаполнитьТЧ(МассивДанных, МассивВзносов, МассивНДФЛ, МассивСотрудников, Объект.ДанныеРасчетаЗП, Объект.ДанныеСтраховыхВзносов, Объект.ДанныеНДФЛ, Объект.Сотрудники);
|
||||
КонецПроцедуры
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
Reference in New Issue
Block a user