Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
13 дек 2024, 23:31

работа со строкой в 1с

Автор Дмитрий1991, 05 дек 2014, 15:13

0 Пользователей и 1 гость просматривают эту тему.

Дмитрий1991

здравствуйте допустим есть строка   

ST00011|Name=ООО УК "Пермтрансжелезобетон"|PersonalAcc=40702810000000410073|BankName=ОАО АКБ "ПРОИНВЕСТБАНК"|BIC=045773764|CorrespAcc=30101810700000000764|payerAddress=617050, Пермский край, Краснокамский р-н, Оверята п, Строителей ул, дом № 6, кв. 8|PayeeINN=5916016336|Purpose=Оплата за ЖКУ|persAcc=477|paymPeriod=102014|Sum=55774|lastName=Латышева Екатерина Даниловна

как из этой строки взять значение которому равен persAcc= то есть в данном случае 477 но оно может и менятся

дфтын

Найти(Строка,Чтоищем) - позиция первого вхождения
Сред(строка, начало позиции, сколько символов)

Дмитрий1991

дак не известно сколько символов может 3 или 4 надо взять

cska-fanat-kz

1. находим позицию "persAcc="
2. отсекаем строку начиная (с этой позиции + 8 (длина "persAcc="))
3. в строке из п.2 ищем символ "|"
4. все что до этого символа - искомая строка
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Дмитрий1991

алгоритм я понял а как функциями зделать

Добавлено: 05 дек 2014, 16:03


Цитата: cska-fanat-kz от 05 дек 2014, 15:28
1. находим позицию "persAcc="
2. отсекаем строку начиная (с этой позиции + 8 (длина "persAcc="))
3. в строке из п.2 ищем символ "|"
4. все что до этого символа - искомая строка

я сделал так

с=найти(ТекущийШтрихКод,"persAcc=")
ТекущийШтрихКод=лев(ТекущийШтрихКод,с-1);
с=найти(ТекущийШтрихКод,"|");
в=найти(ТекущийШтрихКод,"=");

а как взять что между ними

Sinsinmin

ПозицияПоиска = СтрНайти(ТекущийШтрихКод, "persAcc=");
СтрокаПоиска = Сред(ТекущийШтрихКод, ПозицияПоиска+8);
ПозицияПоиска = СтрНайти(СтрокаПоиска, "|");
ИскомаяСтрока = Лев(СтрокаПоиска, ПозицияПоиска-1);

Вроде как то так.

cska-fanat-kz

Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск