Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
14 дек 2024, 08:53

Проблема с переносом данных

Автор matildaozr, 10 ноя 2011, 15:02

0 Пользователей и 1 гость просматривают эту тему.

matildaozr

делаю правила для переноса данных из Бух 8.2 (не бюджет) в самописную конфигурацию (в "Конвертации данных").
В приемнике-справочнике "Сотрудники" есть реквизит Оклад. Надо как-то выцепить из регистра сведений значение оклада сотрудника и запихать его в этот реквизит-приемник. Бьюсь второй день((
Вот примерный код:
Отбор = Новый Структура("ФизЛицо", Источник.ФизЛицо);
ЗначениеОклад = РегистрыСведений.ПлановыеНачисленияРаботниковОрганизаций.Выбрать(Отбор);
Значение =  ЗначениеОклад.Размер;

честно сказать, уже совсем запуталась, что и куда(

Андрей Федотов


matildaozr

а вот что такое регистратор я пока не разобралась(
только начинаю изучать 1С и вот задание дали((( и сроки поджимают

matildaozr

может кому-то понадобится при написании правил с самописную конфу:
выборка email контрагента
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
|КонтактнаяИнформация.Представление
|ИЗ
|РегистрСведений.КонтактнаяИнформация КАК КонтактнаяИнформация
|ГДЕ
|КонтактнаяИнформация.Тип = ЗНАЧЕНИЕ(перечисление.ТипыКонтактнойИнформации.АдресЭлектроннойПочты)
|и КонтактнаяИнформация.Объект = &Контрагент";
Запрос.УстановитьПараметр("Контрагент", Источник.ГоловнойКонтрагент);
РезультатЗапроса = Запрос.Выполнить();
Выборка = РезультатЗапроса.Выбрать();
Выборка.Выбрать();
Если Выборка.Следующий() Тогда
Значение = выборка.Представление;
Иначе
Значение = "";
КонецЕсли;

выборка Гражданства сотрудника
Отбор = Новый Структура("ФизЛицо", Источник.ФизЛицо);
ЗначениеГражданства = РегистрыСведений.ГражданствоФизЛиц.ПолучитьПоследнее(ТекущаяДата(),Отбор);
Значение = строка(ЗначениеГражданства.Страна);

Оклад сотрудника (мне нужно было тупо выдернуть сумму оклада по дням на текущий момент)
ВидОтбора = ПланыВидовРасчета.ОсновныеНачисленияОрганизаций.НайтиПоКоду("00001");
Отбор = Новый Структура("Сотрудник, ВидРасчетаИзмерение", Источник, ВидОтбора);
ЗначениеОкл = РегистрыСведений.ПлановыеНачисленияРаботниковОрганизаций.ПолучитьПоследнее(ТекущаяДата(),Отбор);
Значение = ЗначениеОкл.Размер;

Фамилия сотрудника (аналогично имя, отчество)
Отбор = Новый Структура("ФизЛицо", Источник.ФизЛицо);
ЗначениеФамилии = РегистрыСведений.ФИОФизЛиц.ПолучитьПоследнее(ТекущаяДата(),Отбор);
Значение = строка(ЗначениеФамилии.Фамилия);

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск