1
miner
19.12.12
✎
16:55
|
Вот что-то вроде этого требовалось:) спасибо всем за внимание.
[Code]
Пока мЛицевыеСчета.ПолучитьСтроку() = 1 Цикл
Сотр = мЛицевыеСчета.Ссылка.ТекущийЭлемент();
//Оклад сотрудника
Окл = Сотр.Оклад.Получить(ДатаОкончания);
ТаблицаНачисл = "";
глВидРасчетаДействует(Сотр.ТекущийЭлемент(),,ДатаОкончания,ДатаОкончания,ТаблицаНачисл);
Проц = 0;
Для К=1 По ТаблицаНачисл.КоличествоСтрок() Цикл
ТаблицаНачисл.ПолучитьСтрокуПоНомеру(К);
ВР = ТаблицаНачисл.Расчет.Расчет;
Док = ТаблицаНачисл.Документ;
//Номер строки
Стр = ТаблицаНачисл.Строка;
Начало = ТаблицаНачисл.Начало;
Окончание = ТаблицаНачисл.Окончание;
Процент = 0;
Если Док.Вид() = "НачисленияУдержанияСписком" Тогда
Док.ПолучитьСтрокуПоНомеру(Стр);
Процент = Док.Величина;
Начало = Док.Начало;
Окончание = Док.Окончание;
ИначеЕсли Док.Вид() = "НачисленияУдержанияСотрудника" Тогда
Процент = Док.Величина;
Начало = Док.Начало;
Окончание = Док.Окончание;
КонецЕсли;
КонецЦикла;
[/Code]
|
|