Имя: Пароль:
1C
 
Ограничение на длину строки
0 Дотошный
 
26.01.06
18:59
Без особой надежды на ответ, всё же спрошу.
Столкнулся с такой ситуацией: при выгрузке данных в текстовый файл заметил такую особенность - строка разбивается при выполнении метода Текст.ДобавитьСтроку() на части, длина которых ограничена 128 знаками IMHO. А мне этого как бы не надо :)
Соответственно, при считывании из файла и обработке считанного получаю ошибки.
Сейчас пытаюсь это дело обойти, но может быть у кого-нибудь встречалась подобная проблема?
1 Волшебник
 
модератор
26.01.06
19:02
Покажи программный код.
2 Дотошный
 
26.01.06
19:05
Да код-то простой:
Товар = Группа+"|"+Родитель+"|"+Код+"|"+Наименование+"|"+БазоваяЕдиниуа+"|"+ОсновнаяЕдиница+"|"+Коэффициент+"|"+Свойство+"|"+Артикул+"|"+Весовой+"|"+Вес+"|"+ВидНоменклатуры+"|"+Комментарий+"|"+ПолноеНаименование+"|"+СтавкаНДС+"|"+СтавкаНП;
Текст.ДобавитьСтроку(Товар);

Встречается достаточно длинное значение переменной Комментарий.
3 Волшебник
 
модератор
26.01.06
19:11
ограничение именно 128 знаков?
4 mikecool
 
26.01.06
19:13
(2) Может у тебя комментарий с символами конца строки? (вводится комментарий наверное в многострочном тексте)
5 Дотошный
 
26.01.06
19:15
(3) Нет. Сейчас просмотрел файл выгрузки - везде по разному.
И по-моему (4) прав. Уже проверяю...
6 Дотошный
 
26.01.06
19:17
(4) Yes, CR+LF
Тщательней надо бы... (С) Жванецкий
Сорри за беспокойство...
7 smaharbA
 
26.01.06
19:19
Есть очч хитрый способ обойти ограничение...
8 mikecool
 
26.01.06
19:20
(7) ты не в бота превратился? ;-)
уже не в первой ветке вижу посты о хитром способе...
9 Волшебник
 
модератор
26.01.06
19:21
(7) Неужели СтрЗаменить?
10 smaharbA
 
26.01.06
19:24
(8)(9) нет, нет...
Вот посмотрите и подумайте, почему так сделано...
...
   WSHShell=СоздатьОбъект("WScript.Shell");
   fso=СоздатьОбъект("scripting.filesystemobject");
   f=fso.OpenTextFile(КаталогВременныхФайлов()+"Запрос.txt",2,-1);
   Для к=1 По Метаданные.Документ() Цикл
       f.write("Документ."+Метаданные.Документ(к).Идентификатор+".ТекущийДокумент"+?(к=Метаданные.Документ(),"",","));
   КонецЦикла;
   f.close();
   f=fso.OpenTextFile(КаталогВременныхФайлов()+"Запрос.txt",1,0);
   ДокиЗапроса=f.ReadAll();
   f.close();
   Запрос = СоздатьОбъект("Запрос");
   ТекстЗапроса =
   "//{{ЗАПРОС(Сформировать)
   |Период с ДатаНач по ДатаКон;
   |ОбрабатыватьДокументы все;
   |Док = "+ДокиЗапроса+";
   |Группировка Док;
   |";
11 у лю 427
 
26.01.06
19:28
Eagles    Hotel California
Компьютеры — прекрасное средство для решения проблем, которых до их появления не было.