Имя: Пароль:
1C
1С v8
ЗиУП. Начисление з/п на основании табеля
0 егаис
 
11.06.13
10:09
Процедура ОбработкаЗаполнения(Основание)

   ТипОснования = ТипЗнч(Основание);
   Если ТипОснования = Тип("ДокументСсылка.ТабельУчетаРабочегоВремениОрганизации") Тогда

       // Заполним реквизиты из стандартного набора.
       ЗаполнениеДокументов.ЗаполнитьШапкуДокументаПоОснованию(ЭтотОбъект, Основание);
       
       ПериодРегистрации = Основание.ДатаНачалаПериода;
       ПериодНачисления = Основание.ДатаНачалаПериода;
       ПериодНачисленияДатаНачала = НачалоДня(Основание.ДатаНачалаПериода);
       ПериодНачисленияДатаОкончания = КонецДня(Основание.ДатаОкончанияПериода);
       ВидОперации = Перечисления.ВидыОперацийНачислениеЗарплатыРаботникамОрганизаций.ПолныйРасчет;
       
       Сотрудники = Новый Массив;

       Для Каждого Строка Из Основание.ОтработанноеВремя Цикл
           Сотрудники.Добавить(Строка.Сотрудник);
       КонецЦикла;    
       ВыполнитьАвтозаполнение(ПериодНачисленияДатаНачала, ПериодНачисленияДатаОкончания, , , , Сотрудники);
КонецЕсли;
КонецПроцедуры // ОбработкаЗаполнения()

Хоть тресни, не заполняет и все!
Какой шайтан танец нужно выполнить, кто извращался с сие?
1 егаис
 
11.06.13
10:16
пытался и запрос подсунуть, аналогично тому когда заполняешь документ списком.
       Запрос = Новый Запрос;
       Запрос.Текст  =
       "ВЫБРАТЬ РАЗРЕШЕННЫЕ РАЗЛИЧНЫЕ
       |    РаботникиОрганизации.Сотрудник КАК Сотрудник,
       |    РаботникиОрганизации.Сотрудник.Наименование КАК ФИО,
       |    РаботникиОрганизации.Сотрудник.Физлицо КАК Физлицо,
       |    ВЫБОР
       |        КОГДА РаботникиОрганизации.ПериодЗавершения <= &ДатаАктуальности
       |                И РаботникиОрганизации.ПериодЗавершения <> ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0)
       |            ТОГДА РаботникиОрганизации.ГрафикРаботыЗавершения
       |        ИНАЧЕ РаботникиОрганизации.ГрафикРаботы
       |    КОНЕЦ КАК ГрафикРаботы,
       |    ВЫБОР
       |        КОГДА РаботникиОрганизации.ПериодЗавершения <= &ДатаАктуальности
       |                И РаботникиОрганизации.ПериодЗавершения <> ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0)
       |            ТОГДА РаботникиОрганизации.ЗанимаемыхСтавокЗавершения
       |        ИНАЧЕ РаботникиОрганизации.ЗанимаемыхСтавок
       |    КОНЕЦ КАК ЗанимаемыхСтавок,
       |    ВЫБОР
       |        КОГДА РаботникиОрганизации.ПериодЗавершения <= &ДатаАктуальности
       |                И РаботникиОрганизации.ПериодЗавершения <> ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0)
       |            ТОГДА РаботникиОрганизации.ДолжностьЗавершения
       |        ИНАЧЕ РаботникиОрганизации.Должность
       |    КОНЕЦ КАК Должность,
       |    ВЫБОР
       |        КОГДА РаботникиОрганизации.ПериодЗавершения <= &ДатаАктуальности
       |                И РаботникиОрганизации.ПериодЗавершения <> ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0)
       |            ТОГДА РаботникиОрганизации.ПодразделениеОрганизацииЗавершения
       |        ИНАЧЕ РаботникиОрганизации.ПодразделениеОрганизации
       |    КОНЕЦ КАК Подразделение
       |ПОМЕСТИТЬ ВТСписокРаботников
       |ИЗ
       |    РегистрСведений.РаботникиОрганизаций.СрезПоследних(&ДатаАктуальности, Организация = &ГоловнаяОрганизация) КАК РаботникиОрганизации
       |ГДЕ
       |    (ВЫБОР
       |                КОГДА РаботникиОрганизации.ПериодЗавершения <= &ДатаАктуальности
       |                        И РаботникиОрганизации.ПериодЗавершения <> ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0)
       |                    ТОГДА РаботникиОрганизации.ПричинаИзмененияСостоянияЗавершения
       |                ИНАЧЕ РаботникиОрганизации.ПричинаИзмененияСостояния
       |            КОНЕЦ <> ЗНАЧЕНИЕ(Перечисление.ПричиныИзмененияСостояния.Увольнение)
       |            ИЛИ РаботникиОрганизации.Период > &ДатаУволенных)
       |    И ВЫБОР
       |            КОГДА РаботникиОрганизации.ПериодЗавершения <= &ДатаАктуальности
       |                    И РаботникиОрганизации.ПериодЗавершения <> ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0)
       |                ТОГДА РаботникиОрганизации.ОбособленноеПодразделениеЗавершения
       |            ИНАЧЕ РаботникиОрганизации.ОбособленноеПодразделение
       |        КОНЕЦ = &Параметр1
       |    И РаботникиОрганизации.Сотрудник В(&Параметр3)
       |
       |ОБЪЕДИНИТЬ ВСЕ
       |
       |ВЫБРАТЬ РАЗЛИЧНЫЕ
       |    ДоговорНаВыполнениеРаботСФизЛицом.Сотрудник,
       |    ДоговорНаВыполнениеРаботСФизЛицом.Сотрудник.Наименование,
       |    ДоговорНаВыполнениеРаботСФизЛицом.Сотрудник.Физлицо,
       |    NULL,
       |    NULL,
       |    NULL,
       |    ДоговорНаВыполнениеРаботСФизЛицом.ПодразделениеОрганизации
       |ИЗ
       |    Документ.ДоговорНаВыполнениеРаботСФизЛицом КАК ДоговорНаВыполнениеРаботСФизЛицом
       |ГДЕ
       |    ДоговорНаВыполнениеРаботСФизЛицом.ДатаНачала <= &ДатаАктуальности
       |    И ДоговорНаВыполнениеРаботСФизЛицом.ДатаОкончания >= &ДатаУволенных
       |    И ДоговорНаВыполнениеРаботСФизЛицом.Проведен
       |    И ДоговорНаВыполнениеРаботСФизЛицом.Организация = &Параметр2
       |    И ДоговорНаВыполнениеРаботСФизЛицом.Сотрудник В(&Параметр4)
       |
       |ИНДЕКСИРОВАТЬ ПО
       |    Сотрудник";
       
       Запрос.УстановитьПараметр("ГоловнаяОрганизация",Организация);
       Запрос.УстановитьПараметр("ДатаУволенных",ПериодНачисленияДатаНачала);
       Запрос.УстановитьПараметр("ДатаАктуальности",ПериодНачисленияДатаОкончания);
       Запрос.УстановитьПараметр("ДатаАктуальности_Год",Год(ПериодНачисленияДатаОкончания));
       Запрос.УстановитьПараметр("ДатаАктуальности_День",День(ПериодНачисленияДатаОкончания));
       Запрос.УстановитьПараметр("ДатаАктуальности_Месяц",Месяц(ПериодНачисленияДатаОкончания));
       Запрос.УстановитьПараметр("Параметр1",Организация);
       Запрос.УстановитьПараметр("Параметр2",Организация);
       Запрос.УстановитьПараметр("Параметр3",Сотрудники);
       Запрос.УстановитьПараметр("Параметр4",Сотрудники);
       
       Автозаполнение(Запрос);


Все равно не выходит каменный цветочек ((
2 Godofsin
 
11.06.13
10:20
Продолжайте наблюдения (с)
3 егаис
 
11.06.13
10:21
Если нечего сказать по существу, не надо трололо
4 фросия
 
11.06.13
10:35
Для Каждого Строка Из
"Строка" зарезервированное слово, используй лучше СтрокаТаблицы, СтрокаТаб

это конечно не причина ошибки, но все же
5 фросия
 
11.06.13
10:38
и вообще, посмотри какого типа переменную нужно подпихнуть в процедуру Автозаполнение() может там таблица значений нужна, а ты пихаешь то массив, то вообще запрос.
6 фросия
 
11.06.13
10:39
погляди как конструктор ввода на основании заполняет реквизиты. мож подойдет