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

COM соединение, передача данных из базы в базу 1С

Автор DeSjeT, 27 окт 2010, 14:45

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

DeSjeT

Здравствуйте, такая проблема возникла, Я из одной базы, перекидываю данные в другую, а именно в "Корректировка учет по НДФЛ > Страховые взносы > Исчисления взносов ПФР..." (ЗиК 1.0).

Код работает нормально, все данные переносит, ПФР, ФСС, Месяц, и т.д., ВСЁ, кроме Сотрудника(Сотрудник там - Справочник.Физические лица)
И да, людей которых пытаюсь передать из базы в базу, есть и там, и там.

Вот код чтобы легче было меня понять


МенедженДокумента = Открытие.Документы.НДФЛиЕСНДоходыИНалоги;

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

Пока Выборка.Следующий() Цикл 

Состояние("Копирование - "+Выборка.ФизЛицоНаименование);
Таблица = Документ.СтраховыеВзносы.Добавить();


//Обратите внимание вот сюда, тут загвоздка у меня
Таблица.ФизЛицо = Выборка.ФизЛицоНаименование;



Таблица.МесяцРасчетногоПериода = Выборка.Месяц;
Таблица.ПФРСтраховая = Выборка.ПФРСтраховая;
Таблица.ПФРСтраховаяЕНВД = Выборка.ПФРСтраховаяЕНВД;
Таблица.ПФРНакопительная = Выборка.ПФРНакопительная;
Таблица.ПФРНакопительнаяЕНВД = Выборка.ПФРНакопительнаяЕНВД;
Таблица.ПФРПоДополнительномуТарифу = Выборка.ПФРПоДополнительномуТарифу;
Таблица.ТФОМС = Выборка.ТФОМС;
Таблица.ФСС = Выборка.ФСС;
Таблица.ФССНесчастныеСлучаи = Выборка.ФССНесчастныеСлучаи;
Таблица.ФФОМС = Выборка.ФФОМС;

Документ.Записать();

КонецЦикла;


Я пытался в запросе и ссылку дёргать, и передать а таблицу, и наименование, не фурычит, что же я не так делаю? :)

progmikon

//Обратите внимание вот сюда, тут загвоздка у меня
  Таблица.ФизЛицо = Выборка.ФизЛицоНаименование;
ФизЛицоНаименование это строка?

DeSjeT

Я пытался и строкой, написать что вроде

Таблица.ФизЛицо = "Такойто Такойто Такойтович";

И ссылкой, и наименованием, ну да, пожалуй Наименование в ФизЛице, это строка тоже.

progmikon

Если у вас Выборка.ФизЛицоНаименование это строка, и вы добавляете новую строку в ТЧ другой базы, наверное нужно сделать так

Таблица.ФизЛицо = Справочники.ФизическиеЛица.НайтиПоНаименованию(Выборка.ФизЛицоНаименование);

DeSjeT

Ох как Вы мне помогли, спасибо огромное! Я вам тыркнул на "СПАСИБО" :)

progmikon


DenPlus

А так будет правильнее?

Таблица.ФизЛицо = Справочники.ФизическиеЛица.НайтиПоНаименованию(Выборка.ФизЛицоНаименование, Истина);

Ну, чтобы не перепутались десять "Ивановых".

progmikon

Если вы используете второй параметр, то будет искаться по точному соответствию.

DenPlus

Ну да, совершенно верно. Однажды, я так лоханулся при конвертации данных, забыв использовать этот второй параметр. 150 "Елен" стали одной "Еленой".

DeSjeT

О, хорошо что тему не закрыл, сейчас подкорректирую код.
Спасибо!

Теги:

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

Рейтинг@Mail.ru

Поиск