СправочникОС. При переносе данных из DOSовской программы в 1С в каждой карточке ОС в поле Полное наименование слились инв.№ и наименование(например 11510011 Автобус ПАЗ - 3205), поле инв.№ заполнено как и положено соотв.номером, подскажите, как программно в каждой карточке ОС убрать лишние символы в начале наименования и оставить просто Автобус ПАЗ - 3205.
Древовидный
Печать
Искать в теме:
russ1971
читатель
офлайн
Дата регистрации: 30.09.2005
Сообщений: 100
Сообщений: 100
Пост №1 11.04.2006 12:02
pavlika
читатель
офлайн
Дата регистрации: 25.12.2004
Сообщений: 528
Сообщений: 528
Пост №2 11.04.2006 12:50
делаешь выборку, берешь наименование, находишь первый пробел и отрезаешь левые символы + этот пробел .. что-то похожее на Имя = Прав(Имя,СтрДлина(Имя)-Найти(Имя," "))<br>
russ1971
читатель
офлайн
Дата регистрации: 30.09.2005
Сообщений: 100
Сообщений: 100
Пост №3 11.04.2006 14:00
"Нашел вариант попроще.Наименование в отличии от ПолнНаимен в СправочникеОС без инв.№,поэтому <br>Процедура Сформировать()<br>СпрОС=СоздатьОбъект("Справочник.ОсновныеСредства");<br>СпрОС.ВыбратьЭлементы(); <br>Пока СпрОС.ПолучитьЭлемент() = 1 Цикл <br>ПолнНаимен=СпрОС.ПолучитьАтрибут("ПолнНаимен");<br>СпрОС.ПолнНаимен=СпрОС.Наименование;<br>СпрОС.Записать();<br>Сообщить(СпрОС.ПолнНаимен); <br>КонецЦикла;<br>КонецПроцедуры"
Daedal
читатель
офлайн
Дата регистрации: 20.09.2004
Сообщений: 632
Сообщений: 632
Пост №4 12.04.2006 04:52
Но если учесть, что длина инв. номера скорее всего одинаковая, то 'Найти(Имя," ")' теряет всякий смысл и<br>можно заменитьчислом = длина кода + 1
Читают тему:
Мероприятия
|
26 апреля 2024 года — Форум пользователей «1С:Документооборота» |
1C:Лекторий: 7 мая 2024 года — Бесплатная онлайн-лекция о новом в 1С:ЗУП (версии 3.1.27-3.1.29): поддержка изменений по налогам и взносам, СЭДО, регистрация в органе статистики и другие изменения 1C:Лекторий: 14 мая 2024 года — Бесплатная онлайн-лекция об учете в 1С:БГУ 8 (ред. 2) невостребованной кредиторами задолженности. Серия 1С:Консалтинг для госсектора |