Как обойти список значений в цикле

[Pavel779]

Получил список значений, выгрузил его в массив элементов.

Обхожу его в цикле и надо чтоб весь список элементов был записан в переменную.

А уменя получается, что в переменную записывается лишь последний элемент массива элементов.

Помогите разобраться!!!!!!!!!!!!!!

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

&НаКлиенте
Процедура Прочитать(Команда)

       
       ПрочитатьНаСервере();


КонецПроцедуры

&НаСервере
Процедура  ПрочитатьНаСервере()

       ФИО = " ";
       
       СписокЗначений = Новый СписокЗначений;

       СписокЗначений.Добавить("Асбест+");
       СписокЗначений.Добавить("ООО");

       МассивЭлементов = СписокЗначений.ВыгрузитьЗначения();


       Для каждого ФИО Из МассивЭлементов Цикл


               СписокЗначений.Добавить(ФИО);

 
       КонецЦикла

       НовыйЭлемент =  Справочники.Контрагенты.СоздатьЭлемент();

       НовыйЭлемент.Наименование = ПолноеИмя;

       НовыйЭлемент.Записать();



КонецПроцедуры

[MuI_I_Ika]

А какая переменная так и не написали.

У вас переменная СписокЗначений заполняется 2 раза. Первый раз вы добавляете просто значения, а потом добавляете значения из массива.

[MuI_I_Ika]

А если речь про переменную ФИО, то она будет заполнена последним значением из массива. КОнкретизируйте, что вы хотите в результате получить.

[Pavel779]

Возможно я что то в цикле не так сделал.
Мне надо чтоб МассивЭлементов был записан в переменную ФИО

[MuI_I_Ika]

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

&НаКлиенте
Процедура Прочитать(Команда)

       
        ПрочитатьНаСервере();


КонецПроцедуры

&НаСервере
Процедура  ПрочитатьНаСервере()

        ФИО = " ";
       
        СписокЗначений = Новый СписокЗначений;

        СписокЗначений.Добавить("Асбест+");
        СписокЗначений.Добавить("ООО");

        МассивЭлементов = СписокЗначений.ВыгрузитьЗначения();

        ФИО = МассивЭлементов;

        НовыйЭлемент =  Справочники.Контрагенты.СоздатьЭлемент();

        НовыйЭлемент.Наименование = ПолноеИмя;

        НовыйЭлемент.Записать();

КонецПроцедуры

[cska-fanat-kz]

ПолноеНаименование = "";

Для каждого ЭлСписка Из СЗ Цикл
      ПолноеНаименование = ПолноеНаименование + ЭлСписка.Значение + " ";
КонецЦикла;

НовыйЭлемент = Справочники.Контрагенты.СоздатьЭлемент();
НовыйЭлемент.Наименование = СокрЛП(ПолноеНаименование);
НовыйЭлемент.Записать();

[Pavel779]

Вот как решил:

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

&НаКлиенте
Процедура Прочитать(Команда)


ПрочитатьНаСервере();


КонецПроцедуры

&НаСервере
Процедура ПрочитатьНаСервере()

ФИО = "";

СписокЗначений = Новый СписокЗначений;

СписокЗначений.Добавить("Асбест+");
СписокЗначений.Добавить("ООО");


Для Счетчик = 0 По СписокЗначений.Количество()-1 Цикл

ФИО = ФИО+СписокЗначений.Получить(Счетчик);


КонецЦикла;

НовыйЭлемент =  Справочники.Контрагенты.СоздатьЭлемент();

НовыйЭлемент.Наименование = ФИО;

НовыйЭлемент.Записать();



КонецПроцедуры



[Pavel779]

И последний здесь вопрос. У меня в справочнике получается "Наименование" сплошным текстом.
Кто знает как между этими двумя значениями добавить "Пробел".

[Klyacksa]

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

ФИО = ФИО+" "+СписокЗначений.Получить(Счетчик);

[cska-fanat-kz]

Лучше все таки ИМХО цикл Для каждого...