Как выбрать, не вводя с клавиатуры, элемент справочника, по виду ?
08.06.2005
14:56
#1
Например из справочника "Прочие доходы и расходы" надо
выбрать "****вексел****" (но точный выбор мне неизвестен)
с видом "Поступления и расходы от выбытия иных активов"
для формирования проводок по НУ Н09 и Н08?
выбрать "****вексел****" (но точный выбор мне неизвестен)
с видом "Поступления и расходы от выбытия иных активов"
для формирования проводок по НУ Н09 и Н08?
08.06.2005
16:21
#2
"Думаю можно так.
ЧтоИщем="вексел";
ФлагПоиска=0;
Спр=СоздатьОбъект("Справочник.Такойто");
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент() Цикл
Если Найти(Спр.Наименование,ЧтоИщем)>0 Тогда
флагПоиска=1;
Прервать;
КонецЕсли;
КонецЦикла;
Если ФлагПоиска=1 Тогда
// Нашли
Иначе
// не нашли
КонецЕсли;"
ЧтоИщем="вексел";
ФлагПоиска=0;
Спр=СоздатьОбъект("Справочник.Такойто");
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент() Цикл
Если Найти(Спр.Наименование,ЧтоИщем)>0 Тогда
флагПоиска=1;
Прервать;
КонецЕсли;
КонецЦикла;
Если ФлагПоиска=1 Тогда
// Нашли
Иначе
// не нашли
КонецЕсли;"
08.06.2005
16:26
#3
Теперь нашли и как сформировать проводку с найденным элементом?
И мне нужен не сам элемент, а его вид, который нужно поставить в проводку.
И мне нужен не сам элемент, а его вид, который нужно поставить в проводку.
08.06.2005
16:43
#5
А если влом, отвечать - то зачем нравоучения читать?
(Вроде здесь не дети тусуются.)
Если ответишь - см. окончание преписки.
(Вроде здесь не дети тусуются.)
Если ответишь - см. окончание преписки.
08.06.2005
16:51
#6
"М... "Теперь нашли" прочитал "Теперь напиши", заело.
УказатьВПроводке=Спр.ТекущийЭлемент().ВидПрочихДоходовИРасходов;
Ставь в то субконто которое нужно.
"
УказатьВПроводке=Спр.ТекущийЭлемент().ВидПрочихДоходовИРасходов;
Ставь в то субконто которое нужно.
"
15.06.2005
13:53
#8
"А можно найти через запрос
ТекстЗапроса ="
|ТекущийЭлемент = Справочник.ПрочиеДоходыИРасходы.ТекущийЭлемент;
|Наименование = Справочник.ПрочиеДоходыИРасходы.Наименование
|Группировка ТекущийЭлемент Без Упорядочивания Без Групп;
|Условие(Найти(ВРег(Наименование),ВРег(ПодСтрокаПоиска))>0);
|Без итогов;";
Естественно, вместо наименования можешь подставлять что угодно. Если справочник большой, будет работать побыстрее...
"
ТекстЗапроса ="
|ТекущийЭлемент = Справочник.ПрочиеДоходыИРасходы.ТекущийЭлемент;
|Наименование = Справочник.ПрочиеДоходыИРасходы.Наименование
|Группировка ТекущийЭлемент Без Упорядочивания Без Групп;
|Условие(Найти(ВРег(Наименование),ВРег(ПодСтрокаПоиска))>0);
|Без итогов;";
Естественно, вместо наименования можешь подставлять что угодно. Если справочник большой, будет работать побыстрее...
"
Читают тему
(гостей: 1)