v8: Как получить артикул из наименования

1С v8

24.07.13

✎

10:50

Добрый день, подскажите как получить номер до пробела. Например в названии номенклатуры идет "90915YZZE1 фильтр масляный", так вот как получить просто номер 90915YZZE1?

1 Господин ПЖ

24.07.13

✎

10:52

стрзаменить

2 Господин ПЖ

24.07.13

✎

10:52

или там найти()

3 Fish

гуру

24.07.13

✎

10:52

Смотри в СП Функции работы со значениями типа Строка

4 1Сергей

24.07.13

✎

10:53

Лев(Стр, Найти(Стр, " ")-1)

5 Ork

24.07.13

✎

10:53

(4) А если пробел первый?

6 George Wheels

24.07.13

✎

10:55

Как-то нелогично в названии номера указывать.

7 1Сергей

24.07.13

✎

10:56

(5) вернёт "" - как и надо

8 Aleksey

24.07.13

✎

10:56

(6) а где его указывать? По сути это артикул

9 Капитан О

24.07.13

✎

10:56

(5) "", задача выполнена

10 Капитан О

24.07.13

✎

10:57

(8) а прямо в артикуле и указывай

11 Aleksey

24.07.13

✎

10:57

(10) подбирать неудобно

12 1Сергей

24.07.13

✎

11:00

(11) о, сколько нам открытий чудных... :)

13 Лефмихалыч

модератор

24.07.13

✎

11:01

everybody stand back!


 
RE = New COMObject("VBScript.RegExp");
 
RE.Global    = истина;
 
RE.IgnoreCase    = истина;
 
RE.Multiline    = истина;
 
RE.Pattern = "^[\w|\d]+";
 

 
Строка = "90915YZZE1 фильтр масляный";
 

 
Сообщить(RE.Execute(Строка).item(0).value);

14 Grobik

24.07.13

✎

11:03

(5) Скорее всего думаю, артикул программно подставляется а не из наименования. Т.ч. первый пробел будет после него.

15 Лефмихалыч

модератор

24.07.13

✎

11:03

даже лучше так
RE.Pattern = "^\s*([\w|\d]+)";
чтобы пофиг было, сколько пробелов вначале и есть ли они вообще

16 spapin87

24.07.13

✎

11:09

(8)Так бухгалтера так делают почему-то, вот и хочу разделить на артикул и наименование.

17 MiniMuk

24.07.13

✎

11:11

Вывести строку, попросить пользователя вбить артикул, проверить есть ли вбитый артикул в строке если да записать артикул, из наименования его удалить. Перейти к следующему?

18 Ork

24.07.13

✎

11:14

(14) Это я как бы намекал на предварительное применение СокрЛП().

19 Ork

24.07.13

✎

11:14

+ (18) Для повышения надежности.

20 MiniMuk

24.07.13