|   |   | 
| 
 | перенос значений | ☑ | ||
|---|---|---|---|---|
| 0
    
        Triton_11 02.04.14✎ 09:22 | 
        У меня есть текстовый документ там данные     
 Конфеты;Черный;16;5 Булочки;Сладкий;900;25 Печенье;Соленый;958;12 Шоколад;Горький;6;14 Куртка;Синтипон;3;30 Брюки;Коричневый;24;20 И есть табличное поле Номенклатура Характеристики Количестов Цена Необходимо все данные из текстового документа внести в табличное поле Как это можно сделать | |||
| 1
    
        Ненавижу 1С гуру 02.04.14✎ 09:24 | 
        программируя, но данные в файле - гаўно     | |||
| 2
    
        Triton_11 02.04.14✎ 09:27 | 
        я знаю что программируя но как     | |||
| 3
    
        salvator 02.04.14✎ 09:30 | 
        (2) Вообще никаких идей?     | |||
| 4
    
        Triton_11 02.04.14✎ 09:31 | 
        (3) да     | |||
| 5
    
        Fedor-1971 02.04.14✎ 09:31 | 
        (2) Посмотри в сторону ЧтениеТекста, дальше разбираешь строку и организуешь поиск нужных значений. Отрабатываешь возможность повтора наименования. 
 Как-то так. | |||
| 6
    
        Любопытная 02.04.14✎ 09:32 | 
        синтипон это новый материал какой-то?     | |||
| 7
    
        Triton_11 02.04.14✎ 09:33 | 
        (5) я понял что  с помошью чтения текста я думаю что надо организовать цикл но как это сделать прогграмно покажите     | |||
| 8
    
        Tateossian 02.04.14✎ 09:37 | 
        Откуда вы беретесь? Ладно, понимаю, какие-то нетривиальные вопросы. Но, организовать последовательный доступ к файлу в цикле, не - мы этого не знаем.     | |||
| 9
    
        Fedor-1971 02.04.14✎ 09:46 | 
        (7) студент? Не, по ходу, бухгалтер и зачем Красная Буква Я нам неведомо?
 например, так: тек=новый ЧтениеТекста("load.txt",КодировкаТекста.ANSI); стр=тек.ПрочитатьСтроку(); Пока стр<>Неопределено цикл КонецЦикла; | |||
| 10
    
        Triton_11 02.04.14✎ 10:44 | 
        это бесконечный цикл нужен работаюший     | |||
| 11
    
        chelentano 02.04.14✎ 10:45 | 
        (10) я тебе работающий код - ты мне свою зарплату, пойдёт?     | |||
| 12
    
        Triton_11 02.04.14✎ 10:47 | 
        (11) сойдет     | |||
| 13
    
        chelentano 02.04.14✎ 10:51 | 
        (12)
 тек=новый ЧтениеТекста("load.txt",КодировкаТекста.ANSI); стр=тек.ПрочитатьСтроку(); Пока стр<>Неопределено цикл Сообщить(Стр); Стр = тек.ПрочитатьСтроку(); КонецЦикла; жду денег | |||
| 14
    
        Triton_11 02.04.14✎ 11:42 | 
        У меня есть текстовый документ там данные     
 Конфеты;Черный;16;5 Булочки;Сладкий;900;25 Печенье;Соленый;958;12 Шоколад;Горький;6;14 Куртка;Синтипон;3;30 Брюки;Коричневый;24;20 Как можно вместо ; точки с запятой было - тире | |||
| 15
    
        chelentano 02.04.14✎ 11:43 | 
        (14) "Продолжайте наблюдения" (c)     | |||
| 16
    
        barrgand 02.04.14✎ 11:49 | 
        (14) Аллергия на ; ?     | |||
| 17
    
        Triton_11 02.04.14✎ 11:53 | 
        я понял через СтрЗаменить     | |||
| 18
    
        Triton_11 02.04.14✎ 11:53 | 
        нет не аллергия     | |||
| 19
    
        Fedor-1971 02.04.14✎ 11:57 | 
        (10) Выпал в осадок!!! честно, честно. Дружа, тебе денюх не хватит с такими вопросами.
 (14) а чем ; плохо? в чём принципиальная разница ; и -? | |||
| 20
    
        Triton_11 02.04.14✎ 12:02 | 
        (19) Fedor-1971 извини не обижайся     | |||
| 21
    
        Triton_11 02.04.14✎ 12:36 | 
        Процедура КнопкаВыполнитьНажатие(Кнопка)
 Тек = Новый ЧтениеТекста("C:\pos.rep"); стр = Тек.ПрочитатьСтроку(); Пока стр <> неопределено Цикл Стр = тек.ПрочитатьСтроку(); Стр1 = СтрЗаменить(Стр,";",Символы.ПС); Пока Стр1 = Символы.ПС Цикл Д = Товары.Добавить(); Д.Номенклатура = Стр1; КонецЦикла; КонецЦикла; КонецПроцедуры Как можно сделать в этом цикле чтобы элементы со значения Стр1 Добавлялись в табличное поле: табличное поле Номенклатура Характеристики Количестов Цена | |||
| 22
    
        Fedor-1971 02.04.14✎ 12:50 | 
        (21) ты реально не понимаешь или шлангом прикидываешься?
 1. ты теряешь первую строку файла 2. если уж заменил ; на ПС так и используй стрПолучитьСтроку(строка, номер) - а как придумай сам. К стати с (13) рассчитался или просто так балабонил? По ходу думать лень или знаний не хватает. Повышай общий уровень образованности. За сим откланиваюсь. | |||
| 23
    
        Triton_11 02.04.14✎ 12:57 | 
        Спасибо Федор сделал     | |||
| 24
    
        Леша1с 02.04.14✎ 14:13 | 
        А тема названа-то как красиво - "перенос значений"...
 поэтично... а на практике - голое неумение прочитать тектсовый файл... (0) справку откройте по ЧтениеТекста(). Только если файл >1 МБ, будут проблемы со временем обработки. | 
| Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |