|
1с8.2 Зарплата и управление персоналом паспортные данные сотрудника как получить | ☑ | ||
---|---|---|---|---|
0
VBMADD
04.06.14
✎
13:35
|
Привет братьям по разуму.
Чета не удается мне получить паспортные данные сотрудника. Может кто подскажет где собака порылась... //=============================================== СпрСотрудники = Справочники.СотрудникиОрганизаций; ВыборкаСотрудник = СпрСотрудники.Выбрать(); СпрМСП = Справочники.МедицинскиеСтраховыеПолисы; i=0; Пока i <=10 Цикл ВыборкаСотрудник.Следующий(); Паспорт = СпрМСП.НайтиПоРеквизиту("Физлицо",ВыборкаСотрудник.Наименование); Сообщить("Паспорт = " + Паспорт.УдостоверениеЛичности); //=============================================== Спасибо всем, кто откликнулся. |
|||
1
VBMADD
04.06.14
✎
13:40
|
Может не там ищу, где вообще они(паспортные данные) храняться
|
|||
2
EvgeniuXP
04.06.14
✎
13:50
|
а запросом?
|
|||
3
VBMADD
04.06.14
✎
13:57
|
(2) Мил человек, подскажи как, очень надо...
|
|||
4
VBMADD
04.06.14
✎
13:59
|
Очень надо в отчет вставить паспортные данные сотрудника.
Никак не соображу как их достать... |
|||
5
echo77
04.06.14
✎
14:02
|
ОбщегоНазначения.ПолучитьПаспортныеДанныеСтрокой()
// Процедура возвращает паспортные данные физлица в виде строки // // Параметры: // ФизЛицо - ссылка на элемент справочника "Физические лица",по которму необходимо // получить паспортные данные. // // Возвращаемое значение: // Строка с данными об удостоверении личности физичского лица // Функция ПолучитьПаспортныеДанныеСтрокой(ФизЛицо) Экспорт СтруктураПаспортныхДанных = РегистрыСведений.ПаспортныеДанныеФизЛиц.ПолучитьПоследнее(РабочаяДата, Новый Структура("ФизЛицо",ФизЛицо)); ВидДокумента = СтруктураПаспортныхДанных.ДокументВид; Серия = СтруктураПаспортныхДанных.ДокументСерия; Номер = СтруктураПаспортныхДанных.ДокументНомер; ДатаВыдачи = СтруктураПаспортныхДанных.ДокументДатаВыдачи; КемВыдан = СтруктураПаспортныхДанных.ДокументКемВыдан; НомерПодразделения = СтруктураПаспортныхДанных.ДокументКодПодразделения; Если НЕ (НЕ ЗначениеЗаполнено(ДатаВыдачи) И НЕ ЗначениеЗаполнено(ВидДокумента) И НЕ ЗначениеЗаполнено(Серия + Номер + КемВыдан + НомерПодразделения)) Тогда Возврат ?(ВидДокумента.Пустая(),"","" + ВидДокумента + ", ") + "Серия: " + Серия + ", № " + Номер + ", Выдан: " + Формат(ДатаВыдачи,"ДФ='дд ММММ гггг'") + " года, " + КемВыдан + "; № подр. " + НомерПодразделения; Иначе Возврат "Отсутствуют данные об удостоверении личности." КонецЕсли; КонецФункции // ПолучитьПаспортныеДанныеСтрокой() |
|||
6
TARPV
04.06.14
✎
14:02
|
(4) Запрос к регистру сведений ПаспортныеДанныеФизЛиц
|
|||
7
echo77
04.06.14
✎
14:04
|
или ОбщегоНазначения.ДанныеФизЛица()
|
|||
8
VBMADD
04.06.14
✎
14:19
|
Зарплата и кадры бюджетного учреждения, редакция 1.0 (1.0.71.1)
В модулях ОбщегоНазначения не нашел ни ДанныеФизЛица(), ни ПолучитьПаспортныеДанныеСтрокой() где еще поискать? |
|||
9
VBMADD
04.06.14
✎
14:20
|
Ура, нашел...
|
|||
10
VBMADD
04.06.14
✎
14:27
|
не не то, нашел ОбщегоНазначенияЗК.ПолучитьСвязанныеДанныеФизлица()
(6) пож-ста напиши код запроса |
|||
11
VBMADD
04.06.14
✎
14:42
|
Братцы, все перекопал ну нет функций ни ДанныеФизЛица(), ни ПолучитьПаспортныеДанныеСтрокой()
С запросами как обращаться не знаю, ну кто-нибудь подсобите бедному крестьянину... |
|||
12
piter3
04.06.14
✎
14:48
|
(11) врешь
|
|||
13
piter3
04.06.14
✎
14:49
|
хотя с у четом (8)
СтруктураПаспортныхДанных = РегистрыСведений.ПаспортныеДанныеФизЛиц.ПолучитьПоследнее(РабочаяДата, Новый Структура("ФизЛицо",ФизЛицо)); ВидДокумента = СтруктураПаспортныхДанных.ДокументВид; Серия = СтруктураПаспортныхДанных.ДокументСерия; Номер = СтруктураПаспортныхДанных.ДокументНомер; ДатаВыдачи = СтруктураПаспортныхДанных.ДокументДатаВыдачи; КемВыдан = СтруктураПаспортныхДанных.ДокументКемВыдан; НомерПодразделения = СтруктураПаспортныхДанных.ДокументКодПодразделения; Если НЕ (НЕ ЗначениеЗаполнено(ДатаВыдачи) И НЕ ЗначениеЗаполнено(ВидДокумента) И НЕ ЗначениеЗаполнено(Серия + Номер + КемВыдан + НомерПодразделения)) Тогда Возврат ?(ВидДокумента.Пустая(),"","" + ВидДокумента + ", ") + "Серия: " + Серия + ", № " + Номер + ", Выдан: " + Формат(ДатаВыдачи,"ДФ='дд ММММ гггг'") + " года, " + КемВыдан + "; № подр. " + НомерПодразделения; Иначе Возврат "Отсутствуют данные об удостоверении личности." КонецЕсли; |
|||
14
VBMADD
04.06.14
✎
15:20
|
(13) Спасибо, дай тебе бог всех благ земных...
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |