Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

Работа со строками.

MaxTi
читатель
офлайн
Дата регистрации: 10.02.2010
Сообщений: 52
Пост №1
 
18.02.2010 11:07

Помогите решить задачку<br>есть строка "111111 аааааааа" как мне вытянуть из этой строки символы стоящие до первого пробела(111111), чтобы записать их в другую строку

Вьюн
читатель
офлайн
Дата регистрации: 14.01.2007
Сообщений: 657
Пост №2
 
18.02.2010 11:16

"Строка1 = "111111 аааааааа"<br>позиция = Найти(Строка1," ")<br>Если позиция > 0 Тогда<br> Строка2 = Лев(Строка1,позиция-1);<br>Иначе<br> Строка2 = Строка1;<br>КонецЕсли<br>"

MaxTi
читатель
офлайн
Дата регистрации: 10.02.2010
Сообщений: 52
Пост №3
 
18.02.2010 11:48

"ага получилось<br><br>Процедура Сформировать()<br> Спр=СоздатьОбъект("Справочник.Номенклатура");<br> Спр.ВыбратьЭлементы();<br> Пока Спр.ПолучитьЭлемент()=1 Цикл<br> Строка1= Спр.Наименование;<br> позиция = Найти(Строка1," ");<br> Если позиция > 0 Тогда<br> Спр.Артикул = Лев(Строка1,позиция-1);<br> Иначе<br> Спр.Артикул = Строка1;<br> КонецЕсли;<br> Спр.Записать(); <br> КонецЦикла;<br>КонецПроцедуры<br><br>А как добавить условие такого рода: обычно строки содержат в первой части до пробела символы состоящие из верхнего регистра, но есть строки содержащие в первой части до пробела символы состоящие из верхнего и нижнего регистра?<br>т.е. есть строка "ААААА ааааа" такие нужно обрабатывать, а бывают строки "Ааааа ааааа" и "ааааа ааааа" их ненужно обрабатывать, их нужно пропускать?"

zak555 (398843952)
читатель
офлайн
Дата регистрации: 27.03.2008
Сообщений: 4656
Пост №4
 
18.02.2010 11:54

"> ага получилось<br>> <br>> Процедура Сформировать()<br>> Спр=СоздатьОбъект("Справочник.Номенклатура");<br>> Спр.ВыбратьЭлементы();<br>> Пока Спр.ПолучитьЭлемент()=1 Цикл<br>> Строка1= Спр.Наименование;<br>> позиция = Найти(Строка1," ");<br>> Если позиция > 0 Тогда<br>> Спр.Артикул = Лев(Строка1,позиция-1);<br>> Иначе<br>> Спр.Артикул = Строка1;<br>> КонецЕсли;<br>> Спр.Записать(); <br>> КонецЦикла;<br>> КонецПроцедуры<br><br>в выборке лучше не записывать !<br><br>> А как добавить условие такого рода: обычно строки содержат в первой части до пробела символы состоящие из верхнего регистра, но есть строки содержащие в первой части до пробела символы состоящие из верхнего и нижнего регистра?<br>> т.е. есть строка "ААААА ааааа" такие нужно обрабатывать, а бывают строки "Ааааа ааааа" и "ааааа ааааа" их ненужно обрабатывать, их нужно пропускать?<br><br>делай их все в нижний регистр и анализируй далее, т.е.<br><br>АнализируемаяСтрочка = "Ааааа ааааа";<br>Найти(НРег(АнализируемаяСтрочка ), "ааааа ааааа") будет отличное от 0 !<br><br>"

BelikovS
читатель
офлайн
Дата регистрации: 05.03.2007
Сообщений: 1701
Пост №5
 
18.02.2010 13:27

"> АнализируемаяСтрочка = "Ааааа ааааа";<br>> Найти(НРег(АнализируемаяСтрочка ), "ааааа ааааа") будет отличное от 0 !<br>> <br>Ему надо обработать те кто в верхнем регистре:<br>АнализируемаяСтрочка = "Ааааа"; //Эта будет пропущена<br>Если (ВРег(АнализируемаяСтрочка) = АнализируемаяСтрочка) Тогда<br> //Обрабатываем<br>КонецЕсли;<br>"

MaxTi
читатель
офлайн
Дата регистрации: 10.02.2010
Сообщений: 52
Пост №6
 
18.02.2010 16:49

спасибо все заработало как нужно

zak555 (398843952)
читатель
офлайн
Дата регистрации: 27.03.2008
Сообщений: 4656
Пост №7
 
18.02.2010 17:09

"тогда всё в один регистр<br><br>АнализируемаяСтрочка = "Ааааа ааааа";<br>Найти(НРег(АнализируемаяСтрочка ), НРег("ааааа аАааа")) > 0"

Показывать по 10 20 40 сообщений

Читают тему:

Быстрый переход
Для технических специалистов
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация