Здравствуйте! Подскажите пожалуйста как разобрать адрес из КЛАДР так, чтобы название улицы и тип улицы были раздельно. Например:
"Партизанская ул" преобразовывалось бы в "Партизанская"  и "ул"

Вот мой код для отсечения самого названия:

Улица = "";
                    Для А = 0 По СтрДлина(ПредставлениеУлица) Цикл
                        Символ = НРег(Сред(ПредставлениеУлица, А, 1));
                        Если Символ<>" " Тогда
                            Улица = Улица + Символ;
                        КонецЕсли;
                    КонецЦикла;




В итоге получается переменная типа: "партизанскаяул". Заранее спасибо.

> ПредставлениеУлица

откуда берёшь ?

и что за конфа ?

Улица может из двух слов быть

И даже из трех

В "ПредставлениеУлица" - что? "Партизанская" или "Партизанская ул"?

В самом кладр уже есть сокращение.
Значит надо выделить не из КЛАДР, а из представления адреса.
Верно?

(1) Из запроса. Конфа 1с 8.2 ЗуП
(3) Может я вот как раз и думаю как это лучше реализовать. В таком виде этот код название из 2 слов не обработает.
(5) "Партизанская ул"

Вариантов два (если я правильно предполагаю):
1) Либо изучите реквизиты (и реквизиты родителей - см. структуру кладра - есть ли возможность выдернуть информацию оттуда ?)
2) Писать парсер строки предусмотрев все возможные варианты

там вроде есть файл с сокращениями (ул, пр, ..) вот на него и ориентируйся

(7) Какой тип у "ПредставлениеУлица"? Как он формируется?
Полностью согласна с (8): сначала изучается структура Кладра'а, а потом - делай, что хошь и как хошь :)

(9) Да есть. Список сокращений я получаю. Меня интересует почему мой код возвращает слитный результат. И как предусмотреть название из 2 или 3 слов...

+(10) Согласна с (8) п. 1.

(10) Строка - тип ПредставленияУлица.
Формируется так:
.....
|    КонтактнаяИнформация.Поле6,
.....
ПредставлениеУлица=Выборка.Поле6;

(13) Найди, открой и посмотри в общих модулях ФормированиеАдреса или ПредставлениеАдреса (что-то в этом роде).

Если мне не изменяет память - улица, проспект, переулок - там завязан код поля "Улица".

это ты хочешь чтобы юзеры руками это не делали или что ?

Улица = "";
Стр = СтрЗаменить(ПредставлениеУлица, " ", Символы.ПС);
Для к = 1 по СтрЧислоСтрок(Стр) - 1 Цикл
 Улица =?(к=1,""," ") + СТрПОлучитьСтроку(Стр, к);
КонецЦикла;

подсказка



Функция глАдресСоответствуетТребованиямМНС(Адрес) Экспорт
   
   АдресСписком = глРазложить(Адрес);
   
   Если      СтрКоличествоСтрок(Адрес) <> 1 Тогда     // недолжно быть переводов строк
       Возврат 0;
   ИначеЕсли СтрЧислоВхождений(Адрес, ",") <> 9 Тогда // должно быть 9 запятых
       Возврат 0;
   ИначеЕсли СтрДлина(АдресСписком.ПолучитьЗначение(1))  > 3  Тогда   // код страны не > 3 символов
       Возврат 0;
   ИначеЕсли СтрДлина(АдресСписком.ПолучитьЗначение(2))  > 6  Тогда   // индекс не > 6 символов
       Возврат 0;
   ИначеЕсли СтрДлина(АдресСписком.ПолучитьЗначение(3))  > 50 Тогда   // наим.региона не > 50 символов
       Возврат 0;
   ИначеЕсли СтрДлина(АдресСписком.ПолучитьЗначение(4))  > 50 Тогда   // наим.района не > 50 символов
       Возврат 0;
   ИначеЕсли СтрДлина(АдресСписком.ПолучитьЗначение(5))  > 50 Тогда   // наим.города не > 50 символов
       Возврат 0;
   ИначеЕсли СтрДлина(АдресСписком.ПолучитьЗначение(6))  > 50 Тогда   // наим.нас.пункта не > 50 символов
       Возврат 0;
   ИначеЕсли СтрДлина(АдресСписком.ПолучитьЗначение(7))  > 50 Тогда   // наим.улицы не > 50 символов
       Возврат 0;
   ИначеЕсли СтрДлина(АдресСписком.ПолучитьЗначение(8))  > 10  Тогда   // номер дома не > 10 символов
       Возврат 0;
   ИначеЕсли СтрДлина(АдресСписком.ПолучитьЗначение(9))  > 10  Тогда   // номер корпуса не > 10 символов
       Возврат 0;
   ИначеЕсли СтрДлина(АдресСписком.ПолучитьЗначение(10)) > 10  Тогда   // номер квартиры не > 10 символов
       Возврат 0;
       
   Иначе
       Возврат 1;
       
   КонецЕсли;
   
КонецФункции // глАдресСоответствуетТребованиямМНС()