Выгрузка содержимого файла в справочник

[Feitosa]

Есть файл test.csv в нем 3 строки :

000000001;1;Kill agency;Kill mad dog;500;22.11.2011 0:00:00;Ivanov;1
000000002;2;Clean service;Clean home;1 000;23.11.2011 0:00:00;Petrov;2
000000003;3;Transport ink;Odessa kiev;300;25.11.2011 0:00:00;Sidorov;3

Ну и код :

Код Выделить Развернуть

Текст = Новый ТекстовыйДокумент;
// открытие файла
Текст.Прочитать("D:/test.csv");
// перебор строк текстового документа
Для НомерСтроки=1 по Текст.КоличествоСтрок() Цикл
// получить строку файла с указанным номером
Стр = Текст.ПолучитьСтроку(НомерСтроки);
// «распарсивание» строки
// ищем позицию символа-разделителя
Позиция = Найти (Стр,";");
// создаем новый элемент справочника
Спр=Справочники.Accounts.СоздатьЭлемент();

Спр.Код = Лев(Стр, Найти(Стр, ";")-1);
Стр = Прав(Стр, СтрДлина(Стр) - Найти(Стр, ";"));

Спр.id = Лев(Стр, Найти(Стр, ";")-1);
Стр = Прав(Стр, СтрДлина(Стр) - Найти(Стр, ";"));

Спр.firm_id = Лев(Стр, Найти(Стр, ";")-1);
Стр = Прав(Стр, СтрДлина(Стр) - Найти(Стр, ";"));

Спр.servise_id = Лев(Стр, Найти(Стр, ";")-1);
Стр = Прав(Стр, СтрДлина(Стр) - Найти(Стр, ";"));

Спр.summ = Лев(Стр, Найти(Стр, ";")-1);
Стр = Прав(Стр, СтрДлина(Стр) - Найти(Стр, ";"));

Спр.date_of = Лев(Стр, Найти(Стр, ";")-1);
Стр = Прав(Стр, СтрДлина(Стр) - Найти(Стр, ";"));

Спр.user_id = Лев(Стр, Найти(Стр, ";")-1);
Стр = Прав(Стр, СтрДлина(Стр) - Найти(Стр, ";"));

Спр.doc_no = Стр;

Спр.Записать();

КонецЦикла;

Вписывает только код, id, сумму, дату и №дока.(вообщем только числа), а вот поля СТРОКА пустые! Помогите что в коде нето ???

[Dethmontt]

Спр.firm_id - тип какой?

[Feitosa]

Спр.firm_id - тип какой?

firm_id - строка (там должно быть название фирмы)

[has]

А отладчик что говорит?

[Feitosa]

Сделал такую замутку:

Код Выделить Развернуть

Пр = Строка(Лев(Стр, Найти(Стр, ";")-1));
Сообщить(Тип(Пр));
Спр.firm_id = Пр;
Стр = Прав(Стр, СтрДлина(Стр) - Найти(Стр, ";"));

Пишет :

Код Выделить Развернуть

{Справочник.Accounts.Форма.ФормаСписка(36)}: Тип не определен (Kill agency)
Сообщить(Тип(Пр));

[has]

а какой тип у Стр в самом начале? может есть переменная такая же еще где. Попробуй не Стр назвать, а как нибудь по другому. Стр123 например, ну чтобы такой переменной точно не было

[chuevsf]

Ваша проблема подробно разобрана в книжке по программированию в 1С версии 8.
Даже пример подробный есть. Может стоит почитать сначала книжку?

[Feitosa]

дайте ссылку

[chuevsf]

дайте ссылку

https://forum-baza.ru/index.php?topic=1444.0

[Feitosa]

а какой тип у Стр в самом начале? может есть переменная такая же еще где. Попробуй не Стр назвать, а как нибудь по другому. Стр123 например, ну чтобы такой переменной точно не было

Поменял но ничего не изменилось