|
Значение не является значением объектного типа (Документ) | ☑ | ||
---|---|---|---|---|
0
GreenDay1986
19.11.11
✎
12:52
|
Для СчФизЛиц = 0 По СписФизЛиц.Количество() -1 Цикл
//Кепка Лицевой стороны Область = Макет.ПолучитьОбласть("КепкаЛицевойСтороны"); Работник = СписФизЛиц[СчФизЛиц]; КадрДанные = ПолучитьКадровыеДанные(Работник); ДатаПеремещения = ""; ДолжностьПеремещения = ""; ПодразделениеПеремещения = ""; ДатаПриема = ""; ДолжностьПриема = ""; ПодразделениеПриема = ""; Пока КадрДанные.Следующий() Цикл СтрокаРаботникиОрганизации = КадрДанные.Документ.РаботникиОрганизации.Найти(Работник,"ФизЛицо"); Если КадрДанные.ВидДокумента = "ПриемНаРаботуВОрганизацию" Тогда ДатаПриема = Формат(КадрДанные.Документ.Дата,"ДФ=dd.MM.yyyy; ДЛФ=DD; ДП='Пустая дата'"); ДолжностьПриема = СтрокаРаботникиОрганизации.Должность.Наименование; ПодразделениеПриема = СтрокаРаботникиОрганизации.ПодразделениеОрганизации.Наименование; КонецЕсли; Если КадрДанные.ВидДокумента = "КадровоеПеремещениеОрганизаций" Тогда ДатаПеремещения = Формат(КадрДанные.Документ.Дата,"ДФ=dd.MM.yyyy; ДЛФ=DD; ДП='Пустая дата'"); ДолжностьПеремещения = СтрокаРаботникиОрганизации.Должность.Наименование; ПодразделениеПеремещения = СтрокаРаботникиОрганизации.ПодразделениеОрганизации.Наименование; КонецЕсли; п =1; |
|||
1
Пришел в тапках
19.11.11
✎
12:54
|
посмотри в отладчике
|
|||
2
Любопытная
19.11.11
✎
12:55
|
Не вижу, как ошибка в заголовке относится к тексту в сообщении.
На каком месте ошибка хоть? |
|||
3
GreenDay1986
19.11.11
✎
12:55
|
{Форма.ЛичнаяКарточкаВыдачиСредствИндивидуальнойЗащиты.Форма(370)}: Значение не является значением объектного типа (Документ)
СтрокаРаботникиОрганизации = КадрДанные.Документ.РаботникиОрганизации.Найти(Работник,"ФизЛицо"); |
|||
4
Любопытная
19.11.11
✎
12:58
|
Ну так посмотри, что у тебя в КадрДанные
|
|||
5
GreenDay1986
19.11.11
✎
13:06
|
адрДанные = ПолучитьКадровыеДанные(Работник);
Функция ПолучитьКадровыеДанные(Физлицо) Перем СвойствоИнфоПоОрганизации; МестаРаботыИСостоянияФизлица = ПолучитьМестаРаботыИСостоянияРаботника(Физлицо); КадровыеДанные = Новый Соответствие; КадровыеДанныеПриемНаРаботу = Новый Соответствие; КадровыеДанные.Очистить(); КадровыеДанныеПриемНаРаботу.Очистить(); // Формирование КадровыДанных по местам работы работника Для Каждого МестоРаботы Из МестаРаботыИСостоянияФизлица Цикл Если МестоРаботы.ВидРегистра = "РаботникиОрганизаций" Тогда ИнфоПоКадрамОрганизации = Новый Структура( "Наименование, |ПриемНаРаботуВОрганизацию, |КадровоеПеремещениеОрганизаций, |ОтпускаОрганизаций, |КомандировкиОрганизаций, |УвольнениеИзОрганизаций, |АнкетаЗастрахованногоЛица, |ЗаявлениеОбОбменеДубликатеСтраховогоСвидетельства", МестоРаботы.ОбособленноеПодразделениеНаименование, Новый Массив, Новый Массив, Новый Массив, Новый Массив, Новый Массив, Новый Массив, Новый Массив); КадровыеДанные[МестоРаботы.ОбособленноеПодразделение] = ИнфоПоКадрамОрганизации; КонецЕсли; КонецЦикла; |
|||
6
GreenDay1986
21.11.11
✎
08:47
|
У кого - нить есть соображения?
|
|||
7
Смешной 1С
21.11.11
✎
08:50
|
В КадрДанные нет Документ
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |