|
Выгрузка в CSV | ☑ | ||
---|---|---|---|---|
0
Gen833
22.01.14
✎
12:19
|
Выгружает как (Товар №;Наименование 1;Наименование 2;Цена;Срок хранения;Вес тары;Код;Код группы;Сообщение №;Логотип;Начало продаж;Количество;Сумма;Вес)
НовыйФайл.ДобавитьСтроку (Строка("Товар №")+";"+Строка("Наименование 1")+";"+Строка("Наименование 2")+";"+Строка("Цена")+";"+Строка("Срок хранения") +";"+Строка("Вес тары")+";"+Строка("Код")+";"+Строка("Код группы")+";"+Строка("Сообщение №")+";" +Строка("Логотип")+";"+Строка("Начало продаж")+";"+Строка("Количество")+";"+Строка("Сумма")+";"+Строка("Вес")+";"); А мне надо чтоб выгружало так : ("Товар №";"Наименование 1";"Наименование 2";Цена;"Срок хранения";"Вес тары";Код;"Код группы";"Сообщение №";Логотип;"Начало продаж";Количество;Сумма;Вес) Че-то не пойму как этот знак добавить ("). |
|||
1
Wobland
22.01.14
✎
12:20
|
задублируй
|
|||
2
zak555
22.01.14
✎
12:21
|
"""
или кодисмвола |
|||
3
zak555
22.01.14
✎
12:21
|
+ не используй текст -- используй xml
|
|||
4
Gen833
22.01.14
✎
12:25
|
Дублирую - ошибка вылазит, можно наглядно посмотреть (код).
|
|||
5
Gen833
22.01.14
✎
12:32
|
Дело ясное, что дело темное :(
|
|||
6
Wobland
22.01.14
✎
12:35
|
(4) взгляни на этот строковый литерал длиной в один символ: """"
|
|||
7
kosts
22.01.14
✎
12:37
|
(0)
Прогнозирую такой файл
|
|||
8
Gen833
22.01.14
✎
12:47
|
Не-а
короче вот код весь код: Процедура ВыгрузитьCSV(Товары); ИмяФайла = Весы.ПутьCSV + "\tov1.csv"; //СоздатьФайл НовыйФайл = Новый ТекстовыйДокумент; НовыйФайл.ДобавитьСтроку(Строка("Товары")); НовыйФайл.ДобавитьСтроку (Строка("Товар №")+";"+Строка(Наименование 1)+"";""+Строка("Наименование 2")+";"+Строка("Цена")+";"+Строка("Срок хранения") +";"+Строка("Вес тары")+";"+Строка("Код")+";"+Строка("Код группы")+";"+Строка("Сообщение №")+";" +Строка("Логотип")+";"+Строка("Начало продаж")+";"+Строка("Количество")+";"+Строка("Сумма")+";"+Строка("Вес")+";"); Для каждого СтрокаТовары Из Товары Цикл Если ЗначениеЗаполнено(СтрокаТовары.Цена) Тогда НомерТовара = СтрокаТовары.PLU; Цена = СтрокаТовары.цена; Имя1 = СтрокаТовары.Товар; Имя2 =СтрокаТОвары.Товар; Цена = Формат (СтрокаТовары.цена,"ЧЦ=6; ЧДЦ=2; ЧРД=."); срокГодности="0"; Тара="0"; Код = Формат (СтрокаТовары.Артикул,"ЧГ=0"); НомСообщ = "0"; ГрКод = "0"; НовыйФайл.ДобавитьСтроку(Строка(НомерТовара) +";"+Строка(Имя1) +";" + СокрЛП(Имя2) +";" + Строка(Цена) +";" + Строка(срокГодности) +";"+ Строка(Тара) +";" + Строка(код) +";" + Строка(ГрКод) +";" + Строка(НомСообщ) +";" + "0"+";" + Строка(ТекущаяДата())+ ";"+ "0"+";"+ "0"+";"+ "0"+";"); КонецЕсли; КонецЦикла; НовыйФайл.Записать(ИмяФайла,КодировкаТекста.ANSI); Сообщить("Файл сформирован. Выгружено "+ Товары.Количество()+ " элементов"); КонецПроцедуры |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |