Имя: Пароль:
1C
1С v8
Два штрих кода в одной ячейке ексель файла
,
0 Christina_
 
26.04.12
12:03
есть екселевский файл, в одной его ячейке содержится два штрих-кода, мне нужно сначала прочесть один штрих-код и выполнить поиск в базе, если нет совпадений. прочесть второй штрих-код...как это можно сделать?
1 Wobland
 
26.04.12
12:04
ну они же как-то разделяются промеж себя, не?
2 Christina_
 
26.04.12
12:06
пробелом
3 Wobland
 
26.04.12
12:08
(2) стр=СтрЗаменить(ячейка, " ", Символы.ПС)
СтрПолучитьСтроку(стр, 1) - первый, СтрПолучитьСтроку(стр, 2) - второй
4 Zmich
 
26.04.12
12:14
// РеквШтрихКод - прочитанный из Экселя штрихкод
СпрПоискЕдиницы = СоздатьОбъект("Справочник.Единицы");
Если СпрПоискЕдиницы.НайтиПоРеквизиту("Штрихкод", РеквШтрихкод, 1) <> 0 Тогда
//... не уникален
КонецЕсли;
5 Wobland
 
26.04.12
12:14
(4) сгинь, семёрочник. тут ШК в РС живут ;)
6 Zmich
 
26.04.12
12:16
(5). У нее этот вопрос в семерочной теме был:
Многострочная часть
поэтому и отвечаю тут
7 Zmich
 
26.04.12
12:20
Вот код для 8-ки.

   Запрос = Новый Запрос;
   Запрос.Текст =
       "ВЫБРАТЬ
       |    Штрихкоды.Владелец
       |ИЗ
       |    РегистрСведений.Штрихкоды КАК Штрихкоды
       |ГДЕ
       |    Штрихкоды.Штрихкод = &Штрихкод
       |    И Штрихкоды.ТипШтрихкода = ЗНАЧЕНИЕ(ПланВидовХарактеристик.ТипыШтрихкодов.EAN13)";

   Запрос.УстановитьПараметр("Штрихкод", НомерШтрихКода);

   Результат = Запрос.Выполнить();
   
   Если Результат.Пустой() Тогда
       Сообщить("Штрих-код уникален!");
   КонецЕсли;
8 Christina_
 
26.04.12
13:25
извините, что сразу не указала. у меня 7
9 Christina_
 
26.04.12
13:26
спасибо, сейчас попробую
10 Christina_
 
26.04.12
13:50
не получается что-то...
11 Капитан О
 
26.04.12
13:59
(10) значит, что-то делаешь не так
12 Christina_
 
02.05.12
11:43
Мне нужно через стр.длинну прочесть 13 цифр, потом пробел, потом еще 13, если не подошли первые 13..как это в коде записать?????
13 Zmich
 
02.05.12
11:52
(12). Лев(Стр, 13), Сред(Стр, 15, 13)
14 Christina_
 
02.05.12
13:01
Спасибо!!!!!
Независимо от того, куда вы едете — это в гору и против ветра!