![]() |
|
Загрузка данных в регистр сведений | ☑ | ||
---|---|---|---|---|
0
Woiager1984
19.01.12
✎
22:19
|
Подскажите пытаюсь загрузить данные из текстового файла в регистр сведений лицевые счета сотрудников:
Процедура КнопкаСформироватьНажатие(Кнопка) Перем Стр; Стр= ""; ФизЛица = Справочники.ФизическиеЛица; СпрУчреждение = Справочники.Организации; СпрБанк = Справочники.Контрагенты; НайденнаяСсылкаБанк = СпрБанк.НайтиПоНаименованию("Сбер банк",Истина,,); НайденныйБанк = НайденнаяСсылкаБанк.ПолучитьОбъект(); СпрУчреждение = Справочники.Организации.Выбрать(); Пока СпрУчреждение.Следующий() Цикл Организация = СпрУчреждение.Ссылка; КонецЦикла; Текст = Новый ЧтениеТекста; Текст.Открыть(ИмяФайла); НаборЗаписей = РегистрыСведений.ЛицевыеСчетаРаботниковОрганизации.СоздатьНаборЗаписей(); Пока Стр <> Неопределено Цикл // строки читаются до символа перевода строки Стр = Текст.ПрочитатьСтроку(); //Есть строка с данными. Запишем эти данные в 1С Позиция = Найти(Стр,";"); Сотр=Лев(Стр,Позиция-1); //строка "Адрес прописка" или что то такое ЛС=Сред(Стр,Позиция+1); //ЗначениеПоУмолчанию - ЛОЖЬ НайденнаяСсылка = ФизЛица.НайтиПоНаименованию(Сотр,Истина,,); Если НайденнаяСсылка=ФизЛица.ПустаяСсылка() Тогда //Сообщить("Не найден сотрудник "+ФИО+", ИНН "+ИНН+". Адрес и телефон не перенесен!"); Иначе//Нашли нужного сотрудника ФизЛицо = НайденнаяСсылка.ПолучитьОбъект(); НоваяЗапись=НаборЗаписей.Добавить(); НоваяЗапись.Организация=Организация; НоваяЗапись.Банк=НайденныйБанк; НоваяЗапись.ФизЛицо=ФизЛицо; НоваяЗапись.НомерЛицевогоСчета=ЛС; КонецЕсли; КонецЦикла; НаборЗаписей.Записать(); Текст.Закрыть(); КонецПроцедуры но выдает ошибку: {Форма.ФормаОтчета.Форма(51)}: Ошибка при вызове метода контекста (Записать) НаборЗаписей.Записать(); по причине: Запись с такими ключевыми полями существует! : ЛицевыеСчетаРаботниковОрганизации: ГОУ СПО АО "Архангельский колледж культуры", , (Регистр сведений: Лицевые счета сотрудников; Номер строки: 2) Не подскажите? |
|||
1
shuhard
19.01.12
✎
22:22
|
(0) а чё тут подсказывать - Запись с такими ключевыми полями существует!
|
|||
2
Woiager1984
19.01.12
✎
22:23
|
Открываю регистр,пусто?))
|
|||
3
shuhard
19.01.12
✎
22:27
|
(2) бу га га,
у тебя в наборе записей дубли |
|||
4
Woiager1984
19.01.12
✎
22:31
|
Из файла удаляю все строки кроме первой,тоже самое?
|
|||
5
Woiager1984
19.01.12
✎
22:32
|
Можно ли как-то открыть набор записей для просмотра,как в 7.7 в таблице функция выбратьстроку()???
|
|||
6
n1cr0s
19.01.12
✎
22:36
|
(5) Точку останова поставь
|
|||
7
shuhard
19.01.12
✎
22:36
|
(3) НаборЗаписей = РегистрыСведений.ЛицевыеСчетаРаботниковОрганизации.СоздатьНаборЗаписей();
НаборЗаписей.Прочитать(); ТЗ=НаборЗаписей.Выгрузить(); ТЗ.ВыбратьСтроку("Тут кто-то решил что я пустой ?"); |
|||
8
hhhh
19.01.12
✎
22:50
|
(5) вот это что за бред???
ФизЛицо = НайденнаяСсылка.ПолучитьОбъект(); Коллекцию приколов создаешь? |
|||
9
Woiager1984
19.01.12
✎
22:57
|
А как найти в справочнике ФЛ сотрудника по наименованию?
|
|||
10
Woiager1984
19.01.12
✎
22:57
|
(7) воспользовался,но в таблице одна строка всего??
|
|||
11
timurhv
19.01.12
✎
23:37
|
Врешь ты, у тебя конфигуратор говорит что как минимум 2 :)
|
|||
12
chepsoid
20.01.12
✎
06:24
|
остановись посмотри что записываешь, где то двоятся данные у тебя...
|
|||
13
kosts
20.01.12
✎
06:46
|
В наборе нужно установить отбор, а то могут удаляться другие ранее сохраненные записи.
|
|||
14
kosts
20.01.12
✎
06:48
|
(8) Везде пишет объект вместо ссылки...
Значения остаются пустыми во всех записях и по этому совпадают... |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |