Часы из начисления в ЖР
18.12.2007
21:16
#1
"Привет Всем!
В ЗиК в док НачисленияУдержанияСписком в табличной части добавил реквизит часы, нужно было отразить для ряда начислений регистрацию времени.
Что нужно сделать чтобы эти часы попали в ЖурналРасчетовЗарплата???
Направте в нужном направлении пожалуйста. Заранее Всем Спасибо!
Добавил в обработке проведения
ЖурналРасчетовЗарплата = СоздатьОбъект("ЖурналРасчетов.Зарплата");
ЖурналРасчетовЗарплата.УстановитьРеквизит("Часы",Ч асы);
ЖурналРасчетовЗарплата.ВвестиРасчет(Сотрудник,Расч *** ,Начало,Окончание,Сумма);
Это все вроде понятно но при попытке провести док выдает сообщение, ошибку
ЖурналРасчетовЗарплата.ВвестиРасчет(Сотрудник,Расч *** ,Начало,Окончание,Сумма);
{Документ.НачисленияУдержанияСписком.Модуль Документа(271)}: Объект расчета не найден!
Документ не проведен
Перепробовал разные варианты не пойму в чем проблема???
"
В ЗиК в док НачисленияУдержанияСписком в табличной части добавил реквизит часы, нужно было отразить для ряда начислений регистрацию времени.
Что нужно сделать чтобы эти часы попали в ЖурналРасчетовЗарплата???
Направте в нужном направлении пожалуйста. Заранее Всем Спасибо!
Добавил в обработке проведения
ЖурналРасчетовЗарплата = СоздатьОбъект("ЖурналРасчетов.Зарплата");
ЖурналРасчетовЗарплата.УстановитьРеквизит("Часы",Ч асы);
ЖурналРасчетовЗарплата.ВвестиРасчет(Сотрудник,Расч *** ,Начало,Окончание,Сумма);
Это все вроде понятно но при попытке провести док выдает сообщение, ошибку
ЖурналРасчетовЗарплата.ВвестиРасчет(Сотрудник,Расч *** ,Начало,Окончание,Сумма);
{Документ.НачисленияУдержанияСписком.Модуль Документа(271)}: Объект расчета не найден!
Документ не проведен
Перепробовал разные варианты не пойму в чем проблема???
"
19.12.2007
12:55
#2
"> В ЗиК в док НачисленияУдержанияСписком в табличной части добавил реквизит часы, нужно было отразить для ряда начислений регистрацию времени.
> Что нужно сделать чтобы эти часы попали в ЖурналРасчетовЗарплата???
Не советую эти часы добавлять в ЖР, т.к. там они могут использоваться для проверки баланса рабочего времени (при суммированном учете), для чего в конфигурации есть группа расчетов "УчитыватьДни". Кроме того, в ТК не предусмотрена оплата каких-либо доплат, надбавок и пр. по отработанному времени, отличающемуся от основного. В таких случаях работника принимают на работу по совместительству. Или для учета часов по доплатам написать обработку, просматривающую документы, а не ЖР.
> Добавил в обработке проведения
> ЖурналРасчетовЗарплата = СоздатьОбъект("ЖурналРасчетов.Зарплата");
> ЖурналРасчетовЗарплата.УстановитьРеквизит("Часы",Ч асы);
> ЖурналРасчетовЗарплата.ВвестиРасчет(Сотрудник,Расч *** ,Начало,Окончание,Сумма);
> Это все вроде понятно но при попытке провести док выдает сообщение, ошибку
>
> ЖурналРасчетовЗарплата.ВвестиРасчет(Сотрудник,Расч *** ,Начало,Окончание,Сумма);
> {Документ.НачисленияУдержанияСписком.Модуль Документа(271)}: Объект расчета не найден!
Надо посмотреть отладчиком, м.б. действительно "Расч *** в этом месте не определен. Кстати, почему переменная с пробелом и программа не ругается? М.б. вирусы?"
> Что нужно сделать чтобы эти часы попали в ЖурналРасчетовЗарплата???
Не советую эти часы добавлять в ЖР, т.к. там они могут использоваться для проверки баланса рабочего времени (при суммированном учете), для чего в конфигурации есть группа расчетов "УчитыватьДни". Кроме того, в ТК не предусмотрена оплата каких-либо доплат, надбавок и пр. по отработанному времени, отличающемуся от основного. В таких случаях работника принимают на работу по совместительству. Или для учета часов по доплатам написать обработку, просматривающую документы, а не ЖР.
> Добавил в обработке проведения
> ЖурналРасчетовЗарплата = СоздатьОбъект("ЖурналРасчетов.Зарплата");
> ЖурналРасчетовЗарплата.УстановитьРеквизит("Часы",Ч асы);
> ЖурналРасчетовЗарплата.ВвестиРасчет(Сотрудник,Расч *** ,Начало,Окончание,Сумма);
> Это все вроде понятно но при попытке провести док выдает сообщение, ошибку
>
> ЖурналРасчетовЗарплата.ВвестиРасчет(Сотрудник,Расч *** ,Начало,Окончание,Сумма);
> {Документ.НачисленияУдержанияСписком.Модуль Документа(271)}: Объект расчета не найден!
Надо посмотреть отладчиком, м.б. действительно "Расч *** в этом месте не определен. Кстати, почему переменная с пробелом и программа не ругается? М.б. вирусы?"
20.12.2007
09:22
#3
А вы уверенны , что дело в расчете. Сообщение ведь о том, что объект не найдет, а это сотрудник.
Удачи.
Удачи.
21.12.2007
05:49
#4
"Если ПустоеЗначение(Сотрудник)=1 Тогда
Продолжить
КонецЕсли;
Если НерегистрируемоеВНачисленииУдержании = 1 Тогда
ЖурналРасчетовЗарплата = СоздатьОбъект("ЖурналРасчетов."+?(Дополнительный = 1,"Дополнительный","Зарплата"));
ДатаН = ?(Расчет.ВходитВГруппу(ГруппаРасчетов.НерегистрируемыеВНачисленииУдержании)=0,?(Начало=Дата(0),ДатаДок,Начало),ДатаДок);
ДатаК = ?(Расчет.ВходитВГруппу(ГруппаРасчетов.НерегистрируемыеВНачисленииУдержании)=0,?(Окончание=Дата(0),ДатаДок,Окончание),ДатаДок);
Если ЖурналРасчетовЗарплата.ВыбратьПериодПоОбъекту(Сотрудник,ЖурналРасчетовЗарплата.КонецТекущегоПериода()) = 1 Тогда
ЖурналРасчетовЗарплата.УстановитьРеквизит("НомерСтрокиДокумента", НомерСтроки);
ЖурналРасчетовЗарплата.ВвестиРасчет(Сотрудник,Расчет,ДатаН,ДатаК,Сумма);
Иначе
ЖурналРасчетовЗарплата.Новая();
ЖурналРасчетовЗарплата.УстановитьРеквизит("Объект", Сотрудник);
ЖурналРасчетовЗарплата.УстановитьРеквизит("ВидРасч", Расчет);
ЖурналРасчетовЗарплата.УстановитьРеквизит("Документ", ТекущийДокумент());
ЖурналРасчетовЗарплата.УстановитьРеквизит("РодительскийДокумент", ТекущийДокумент());
ЖурналРасчетовЗарплата.УстановитьРеквизит("ДатаНачала", ДатаН);
ЖурналРасчетовЗарплата.УстановитьРеквизит("ДатаОкончания", ДатаК);
ЖурналРасчетовЗарплата.УстановитьРеквизит("Часы", Часы);
ЖурналРасчетовЗарплата.УстановитьРеквизит("НомерСтрокиДокумента", НомерСтроки);
ЖурналРасчетовЗарплата.Записать();
КонецЕсли;
Если Дополнительный = 0 Тогда
Если ОблагаетсяПоСтавке35 = 1 Тогда // ввод записей по другим ставкам
......................
С ошибкой разобрался, а часов нет. Что не так?"
Продолжить
КонецЕсли;
Если НерегистрируемоеВНачисленииУдержании = 1 Тогда
ЖурналРасчетовЗарплата = СоздатьОбъект("ЖурналРасчетов."+?(Дополнительный = 1,"Дополнительный","Зарплата"));
ДатаН = ?(Расчет.ВходитВГруппу(ГруппаРасчетов.НерегистрируемыеВНачисленииУдержании)=0,?(Начало=Дата(0),ДатаДок,Начало),ДатаДок);
ДатаК = ?(Расчет.ВходитВГруппу(ГруппаРасчетов.НерегистрируемыеВНачисленииУдержании)=0,?(Окончание=Дата(0),ДатаДок,Окончание),ДатаДок);
Если ЖурналРасчетовЗарплата.ВыбратьПериодПоОбъекту(Сотрудник,ЖурналРасчетовЗарплата.КонецТекущегоПериода()) = 1 Тогда
ЖурналРасчетовЗарплата.УстановитьРеквизит("НомерСтрокиДокумента", НомерСтроки);
ЖурналРасчетовЗарплата.ВвестиРасчет(Сотрудник,Расчет,ДатаН,ДатаК,Сумма);
Иначе
ЖурналРасчетовЗарплата.Новая();
ЖурналРасчетовЗарплата.УстановитьРеквизит("Объект", Сотрудник);
ЖурналРасчетовЗарплата.УстановитьРеквизит("ВидРасч", Расчет);
ЖурналРасчетовЗарплата.УстановитьРеквизит("Документ", ТекущийДокумент());
ЖурналРасчетовЗарплата.УстановитьРеквизит("РодительскийДокумент", ТекущийДокумент());
ЖурналРасчетовЗарплата.УстановитьРеквизит("ДатаНачала", ДатаН);
ЖурналРасчетовЗарплата.УстановитьРеквизит("ДатаОкончания", ДатаК);
ЖурналРасчетовЗарплата.УстановитьРеквизит("Часы", Часы);
ЖурналРасчетовЗарплата.УстановитьРеквизит("НомерСтрокиДокумента", НомерСтроки);
ЖурналРасчетовЗарплата.Записать();
КонецЕсли;
Если Дополнительный = 0 Тогда
Если ОблагаетсяПоСтавке35 = 1 Тогда // ввод записей по другим ставкам
......................
С ошибкой разобрался, а часов нет. Что не так?"
Читают тему
(гостей: 1)