Имя: Пароль:
1C
 
Родитель элемента справочника
0 Serg_Y
 
19.11.04
01:22
Народ выручайте
Все облазил не могу ничего найти и понять
Как мне для созданого програмно эл. справочника сначала получить родителя а потом присвоить его эл.

Если можно примерчик.
Заранее огромное спасибо
Если мож че не так назвал (извените до профи мне еще далеко), задайте вопрос я отвечу
еще раз заранее огромное спасибо
1 Asmody
 
19.11.04
01:24
чевоа нада сделать?
2 Asmody
 
19.11.04
01:25
3 Serg_Y
 
19.11.04
01:30
Asmody
2 - 19.11.04 - 01:25
Если честно то там ничего толково так и не родили

Мне тяжело сказать что нада
давай я лучше на примере


СпрКли.Новый();
СпрКли.Наименование = КлиентНайм;
СпрКли.ПолнНаименование = КлиентПолнНайм;
СпрКли.Адрес = КлиентАдрес;
СпрКли.НомерСвидетельства = КлиентНомерСвидетельства;
СпрКли.ИНН = КлиентИНН;
СпрКли.Телефоны = КлиентТелефон;
СпрКли.Примечание = КлиентПримечание;
СпрКли.ОКПО = КлиентОКПО;
СпрКли.ДокНомер = КлиентСерияПасп;
СпрКли.ДокСерия = КлиентНомерПасп;
СпрКли.ИспользоватьДату(ДатаДокФайла);
СпрКли.Записать();

Мне нада что бы у этого элемента был родитель, тоесть что бы он находился в греппе. Это все работает
4 Serg_Y
 
19.11.04
01:32
Я конечно понимаю, что это може элементарно делается, но если не трудно то расскажите как???
5 Asmody
 
19.11.04
01:38
откуда ты узнаЁшь, какой у клиента должен быть родитель?

(смешно сказал, но спросил серьезно, в меру возможного >;))
6 Serg_Y
 
19.11.04
01:41
Я знаю какой он должен быть, тоесть я знаю его текстовое название, он во всех елементов один
мне хотя бы так сделать
7 Asmody
 
19.11.04
01:52
СпрГ=СоздатьОбъект("Справочник.Контрагенты");
Если СпрГ.НайтиПоНаименованию(<наименованиегруппы>)=1 Тогда
   СпрКли.ИспользоватьРодителя(СпрГ.ТекущийЭлемент());
КонецЕсли;

дальше как у тебя...
8 Serg_Y
 
19.11.04
02:07
Всеравно создает в корне справочника єлементы
9 big
 
19.11.04
02:12
Попробуй
СпрКли.Новый();
СпрКли.ИспользоватьРодителя(СпрГ.ТекущийЭлемент());
СпрКли.Записать();
СпрКли.ИспользоватьДату(ДатаДокФайла);
и т.д.

Если честно, то уже похоже на танец с бубном, но все-таки. А вообще, добрый тебе совет, отложи до утра - помогает на 95%.
10 bsg
 
19.11.04
02:12
(8) Значит нет у тебя группы с таким наименованием.
11 bsg
 
19.11.04
02:25
+(10)
Попробуй вот так.
Замени наименованиегруппы на то, что тебе нужно.

Если СпрКли.НайтиПоНаименованию("наименованиегруппы")=0 Тогда
   СпрКли.НоваяГруппа();
   СпрКли.Наименование="наименованиегруппы";
   СпрКли.Записать();
КонецЕсли;
СпрКли.ИспользоватьРодителя(СпрКли.ТекущийЭлемент());

СпрКли.Новый();
СпрКли.Наименование = КлиентНайм;
СпрКли.ПолнНаименование = КлиентПолнНайм;
СпрКли.Адрес = КлиентАдрес;
СпрКли.НомерСвидетельства = КлиентНомерСвидетельства;
СпрКли.ИНН = КлиентИНН;
СпрКли.Телефоны = КлиентТелефон;
СпрКли.Примечание = КлиентПримечание;
СпрКли.ОКПО = КлиентОКПО;
СпрКли.ДокНомер = КлиентСерияПасп;
СпрКли.ДокСерия = КлиентНомерПасп;
СпрКли.ИспользоватьДату(ДатаДокФайла);
СпрКли.Записать();
12 Serg_Y
 
19.11.04
02:27
А у тебя это работало???
13 Serg_Y
 
19.11.04
02:29
Оки завтра еще гляну
всем спасибо
14 bsg
 
19.11.04
02:31
(12) Я не знаю в какой конфигурации и какой справочник ты заполняешь.
Поэтому не могу проверить твой код у себя.
15 alvandael
 
19.11.04
11:08
(11) ИМХО проблема в том, что ищется Наименование не дополненное пробелами до длины реквизита справочника Наименование. т.е.
Длина Наименования 25, а ищется строка  "Группа".
16 SnarkHunter
 
19.11.04
11:14
Тупняк продолжается...
17 321
 
19.11.04
11:17
Можно искать по первым символам, можно по коду.Куча вариантов...плюс нужна проверка на признак группы
18 SKrin
 
19.11.04
11:26
сто пудово рабочий вариант:
   спр=СоздатьОбъект("Справочник.ФизЛица");
   спрГ=СоздатьОбъект("Справочник.ФизЛица");
   СпрГ.НайтиПоНаименованию("Водители",0,1);
   Спр.ИспользоватьРодителя(СпрГ.ТекущийЭлемент());
   спр.Новый();
   спр.Наименование="ааааа";
   спр.Записать();


это только пример на своей конфе
19 321
 
19.11.04
11:31
(18)Ну не стопудовый...
20 SKrin
 
19.11.04
11:36
(19) если есть группа "Водители", то 100 пудовый
21 bsg
 
19.11.04
11:39
(20) А, если есть элемент "Водители"?
22 Таня
 
19.11.04
11:41
вчерашняя битва за 100 баксов никого ничему не научила видимо... :-/
23 SKrin
 
19.11.04
11:47
(21) ну да, согласен, нехватает нескольких проверочных условий
НО элемент то создается в группе "Водители"... это факт
24 321
 
19.11.04
11:51
(23) Если есть элемент и группа с одноименным названием попробуй-ка спозиционироваться поиском по наименованию на одном, а потом на другом.Получишь фигу...
25 427
 
19.11.04
12:01
И ЭтИ люди запрещают мне ковыряться в носе?
26 SKrin
 
19.11.04
12:04
(24) он сначала находит группу
27 Эт
 
19.11.04
12:11
патамушта ты сначала создал папку, а потом элемент. Теперь попробуй наоборот.
28 SnarkHunter
 
19.11.04
12:15
Я в шоке...
29 Asmody
 
19.11.04
12:19
(24) так можно:
ТекстСКЛ="
|SELECT Контрагенты.ID as [Группа $Справочник.Контрагенты]
|FROM $Справочник.Контрагенты as Контрагенты
|WHERE (Контрагенты.isfolder=1) AND (Контрагенты.ismark="""")
|  AND (Контрагенты.Desc="""+СокрЛП(наименованиегруппы)+")";
РС=СоздатьОбъект("ODBCRecordset");
РС.УстБД1С();
РС.Открыть(ТекстСКЛ);
Если РС.СтрокОбработано()>0 Тогда
   РС.ВНачало();
   Группа=РС.ПолучитьЗначение("Группа");
КонецЕсли;

ну или принерно так... не проверял.
30 GrayT
 
19.11.04
12:21
Во тягомотину развели
31 Guk
 
19.11.04
12:23
"Над дурман-травой стоит туман..." (с) Ноль
32 Таня
 
19.11.04
12:27
и это при том, что автор уже давно слинял... :))
33 miki
 
19.11.04
12:28
(32)+ Ему яйца оторвать надо. Было. Еще вчера. Если есть.
34 Asmody
 
19.11.04
12:32
да уж! субЧудила переЁматый! два дня всем мОзги ипЁтЪ!!! >;))
35 Нервные
 
19.11.04
12:34
какие все.
Не дождетесь никак?
~~~~~~~~~~~
Наконец! После тусклой недели работы на адинэсэ. Солнце ударило из зенита (дальше по тексту МЖ)
36 France
 
19.11.04
15:22
тему Элемент справочника - принадлежность группе  прибили..
бум теперь тут кролиководу СергЙ-у помогать:)))))
37 SKrin
 
19.11.04
15:23
да он бы хоть сказал получилось у него или нет...
8)))))))
38 321
 
19.11.04
15:24
Сэр гей, эт кто?
39 miki
 
19.11.04
15:24
(37) Он сказал... Пару раз как min...
40 Cheater
 
19.11.04
15:24
(37) Он не говорит, если не спросишь :(
41 France
 
19.11.04
15:26
(39) но я ему, почему то, не поверил.. врал он..
кроликод но.. или же (38)? :)
42 miki
 
19.11.04
15:40
(41) Что (кто) такое "кроликод"?
43 France
 
19.11.04
15:42
(42) кроликовод...
а кроликами оказываются те, кто на него обратил внимания..
ЗЫ чур нея..
ЗыЗы и как там котенок твой?
44 miki
 
19.11.04
16:07
(43)Живет, играется, пьет, жрет, срет. Все как у людей.
Как назвали забыл спросить.
45 miki
 
19.11.04
16:47
46 Serg_Y
 
19.11.04
18:33
добрый вечер всем обитателям форума
короче я уже все перепробовал все равно не пашет

Если СпрКли.НайтиПоНаименованию(КлиентНайм,0,1) = 0 Тогда
                               
СпрКли.Новый();
СпрКли.Наименование = КлиентНайм;
СпрКли.ПолнНаименование = КлиентПолнНайм;
СпрКли.Адрес = КлиентАдрес;
СпрКли.НомерСвидетельства = КлиентНомерСвидетельства;
СпрКли.ИНН = КлиентИНН;
СпрКли.Телефоны = КлиентТелефон;
СпрКли.Примечание = КлиентПримечание;
СпрКли.ОКПО = КлиентОКПО;
СпрКли.ДокНомер = КлиентСерияПасп;
СпрКли.ДокСерия = КлиентНомерПасп;
СпрКли.ИспользоватьДату(ДатаДокФайла);
СпрКли.Записать();
СпрГ=СоздатьОбъект("Справочник.Клиенты");
Если СпрГ.НайтиПоНаименованию("Покупатели",0,0)=1 Тогда
//у меня в отладчике равно 0 тоесть не находит и соответственно
//не присваивает родителя, хотя группа сто пудов есть
//в чем глюк или может какой то другой способ поиска подскажете
//так что бы нашло группу
СпрКли.ИспользоватьРодителя(СпрГ.ТекущийЭлемент());
КонецЕсли;

я вот думаю, а не может быть такой фишки я хочу найти "Покупатели"
а в справочник есть "Покупатели           " (пробелы до тех пор пока не выедет длину наименования)????
47 Serg_Y
 
19.11.04
18:34
Второй день не могу ничего с этим сделать???
48 miki
 
19.11.04
18:39
Вот еще баян по теме.
Вывалился мужик с пятого этажа, пьяный.
Ну вокруг толпа собралась. Что-то спорят, обсуждают.
Мужик очнулся через некоторое время, поднимается, видит - все вокруг на не него круглыми глазами смотрят. Он:
- А шо я? Я сам только подошел...
49 427
 
19.11.04
18:57
пля... Это какая серия?
50 Таня
 
19.11.04
19:06
Serg_Y, ты мог бы ограничиться " добрый вечер всем обитателям форума", об остальном все и так бы догадались...
51 Таня в пальто
 
19.11.04
19:13
52 Таня
 
19.11.04
19:15
а еще наверно я в шапке, в валенках, в варежках...
Блин, какая я извращенка, дома в зимней одежде ходить...
53 Таня
 
19.11.04
19:15
ты кто, Таня в пальто?
54 LOSS
 
19.11.04
19:24
А впостели
55 Vol71
 
19.11.04
19:24
Дежа вю
Закон Брукера: Даже маленькая практика стоит большой теории.