0
anisa8310
29.10.12
✎
15:33
|
1С:Предприятие 8.2 (8.2.15.319)
Зарплата и Управление Персоналом, редакция 2.5 (2.5.54.1)
(Кадровый учет-Учет не выходов-Остатки отпусков)
Нужно в эту форму списка-добавить колонку,в какую процедуру нужно лезть? там модуль РаботаСДиалогами, Но процедура не понятно какая
Заранее всех благодарю
|
|
1
anisa8310
29.10.12
✎
15:50
|
Кажется нашла, в модуле "ОстаткиОтпусков"
Функция ОстатокОтпускаСотрудникаНаДату(Знач Сотрудник, Знач ДатаОстатков = '00010101', Знач ЭтоРасчетПриУвольнении = Ложь, ПорядокРасчетаОсновногоОтпуска = Неопределено) Экспорт
Если Не ЗначениеЗаполнено(Сотрудник) Тогда
Возврат 0;
КонецЕсли;
Если Не ЗначениеЗаполнено(ДатаОстатков) Тогда
ДатаОстатков = ОбщегоНазначения.ПолучитьРабочуюДату();
КонецЕсли;
ТаблицаДанных = ОписаниеТаблицыДанных();
Строка = ТаблицаДанных.Добавить();
Строка.Сотрудник = Сотрудник;
Строка.ДатаОстатков = НачалоДня(ДатаОстатков);
Строка.ЭтоРасчетПриУвольнении = ЭтоРасчетПриУвольнении;
Если ЭтоРасчетПриУвольнении Тогда
Строка.ПорядокРасчетаОсновногоОтпуска = ПорядокРасчетаОсновногоОтпуска;
КонецЕсли;
Результат = ОстаткиОтпусков(ТаблицаДанных)[0];
ОстаткиВРазрезеРабочихЛетИВидовОтпусков = Новый Массив;
Для Каждого РабочийГод Из Результат.ДанныеРасчета Цикл
Если РабочийГод.ОсталосьДнейОтпускаСУчетомВсехОтпусков = 0 Тогда
Продолжить;
КонецЕсли;
ОстаткиВРазрезеРабочихЛетИВидовОтпусков.Добавить(Новый Структура("ВидЕжегодногоОтпуска, ОсталосьДней, РабочийГодС, РабочийГодПо, ПоследнийРабочийГод",
РабочийГод.ВидЕжегодногоОтпуска, РабочийГод.ОсталосьДнейОтпускаСУчетомВсехОтпусков, РабочийГод.ДатаНачала, РабочийГод.ДатаОкончания, РабочийГод.ПоследнийРабочийГод));
КонецЦикла;
Возврат Новый Структура("ОстатокНаДату, РабочийГодС, РабочийГодПо, Примечание, ОстаткиВРазрезеВидовОтпусков, ОстаткиВРазрезеРабочихЛетИВидовОтпусков",
Результат.ОстатокНаДату, Результат.РабочийГодС, Результат.РабочийГодПо, Результат.Примечание, Результат.ОстатокНаДатуПоВидамЕжегодныхОтпусков, ОстаткиВРазрезеРабочихЛетИВидовОтпусков);
КонецФункции
|
|