При выгрузке в ЦСВ добавляет все товары в первую строку

1С v8

20.01.14

✎

16:10

При выгрузке в ЦСВ добавляет все товары в первую строку т. е. товар№строки;№1;цена,ПЛУ;№строки;№2;цена,ПЛУ;№строки;№3;цена,ПЛУ; и тд.

мне надо так:
№строки;№1;цена,ПЛУ;
№строки;№2;цена,ПЛУ;
№строки;№3;цена,ПЛУ;

Процедура ВыгрузитьCSV(Товары);

        ИмяФайла = Весы.ПутьCSV + "\tov1.csv";
        //СоздатьФайл
        НовыйФайл = Новый ЗаписьТекста(ИмяФайла,КодировкаТекста.ANSI);
        Стр="";

                Для каждого СтрокаТовары Из Товары Цикл
                    Если ЗначениеЗаполнено(СтрокаТовары.Цена) Тогда
                        НомерТовара  = СтрокаТовары.PLU;
                        Цена = СтрокаТовары.цена;
                        Имя1 = СтрокаТовары.Товар;
                        Имя2 =СтрокаТОвары.Товар;
                        Цена = СтрокаТовары.цена;
                        срокГодности="0";
                        Тара="0";
                        Код = Формат (СтрокаТовары.Артикул,"ЧГ=0");
                        НомСообщ = "0";
                        ГрКод = "0";
                        НовыйФайл.Записать(Строка(НомерТовара) +";"+Строка(Имя1) +";" + СокрЛП(Имя2) +";" + Строка(цел(Цена)) +";"
                        + Строка(срокГодности) +";"+ Строка(Тара) +";"  + Строка(код) +";"  + Строка(ГрКод) +";"
                        + Строка(НомСообщ) +";" + "0"+";" + Строка(ТекущаяДата())+ ";"  + "0"+";0;;");
            КонецЕсли;
        КонецЦикла;

            Сообщить("Файл сформирован. Выгружено "+ Товары.Количество()+ " элементов");
            НовыйФайл.Закрыть();

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

1 Gen833

20.01.14

✎

16:11

№строки;№1;цена,ПЛУ
№строки;№2;цена,ПЛУ
№строки;№3;цена,ПЛУ

вот так

2 Steel_Wheel

20.01.14

✎

16:13

+ Символы.ПС добавь внутрь если

3 Gen833

20.01.14

✎

16:16

№строки;Товар№1;цена,ПЛУ
№строки;Товар№2;цена,ПЛУ
№строки;ТОвар№3;цена,ПЛУ

4 Gen833

20.01.14

✎

16:21

помогли мне, вот решение

Процедура ВыгрузитьCSV(Товары);

        ИмяФайла = Весы.ПутьCSV + "\tov1.csv";
        //СоздатьФайл
        НовыйФайл = Новый ТекстовыйДокумент; ;
                Для каждого СтрокаТовары Из Товары Цикл
                    Если ЗначениеЗаполнено(СтрокаТовары.Цена) Тогда
                        НомерТовара  = СтрокаТовары.PLU;
                        Цена = СтрокаТовары.цена;
                        Имя1 = СтрокаТовары.Товар;
                        Имя2 =СтрокаТОвары.Товар;
                        Цена = СтрокаТовары.цена;
                        срокГодности="0";
                        Тара="0";
                        Код = Формат (СтрокаТовары.Артикул,"ЧГ=0");
                        НомСообщ = "0";
                        ГрКод = "0";
                        НовыйФайл.ДобавитьСтроку(Строка(НомерТовара) +";"+Строка(Имя1) +";" + СокрЛП(Имя2) +";" + Строка(цел(Цена)) +";"
                        + Строка(срокГодности) +";"+ Строка(Тара) +";"  + Строка(код) +";"  + Строка(ГрКод) +";"
                        + Строка(НомСообщ) +";" + "0"+";" + Строка(ТекущаяДата())+ ";"  + "0"+";0;;");
            КонецЕсли;
        КонецЦикла;
            НовыйФайл.Записать(ИмяФайла,КодировкаТекста.ANSI);
            Сообщить("Файл сформирован. Выгружено "+ Товары.Количество()+ " элементов");
            НовыйФайл.Закрыть();

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