Имя: Пароль:
1C
1С v8
При методе НайтиПоРеквизиту не отображаются данные.
0 Lavr
 
16.12.11
13:22
Здравствуйте.

Процедура ПоОрганизацииПриИзменении(Элемент)
   ЗначениеПоля=ЭлементыФормы.ПоОрганизации.Значение;
   Ссылка=Справочники.СправочникДиректора;
   Если Ссылка <> Справочники.СправочникДиректора.ПустаяСсылка() Тогда
       Сообщить("Ссылка получена!");

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

Все ли правильно в этом коде?
1 zak555
 
16.12.11
13:23
что это ?
2 BuHu
 
16.12.11
13:23
чеза бред??
3 DrShad
 
16.12.11
13:24
странный какой-то код, наверное индийский
4 Aloex
 
16.12.11
13:24
(0) хрень какаято .
5 Mort
 
16.12.11
13:26
Зато прекрасный образец для медитации.

(0) А что он должен делать?

Или может банчишко раскинем с догадками?
6 Балоун
 
16.12.11
13:26
Показываю ещё раз: Если Ссылка.Пустая() Тогда...
7 BuHu
 
16.12.11
13:28
(6) ???
8 Mort
 
16.12.11
13:28
Что то мне подсказывает, это должно выглядеть вроде того:

Процедура ПоОрганизацииПриИзменении(Элемент)

   ЭлементыФормы.Надпись4.Заголовок=Элемент.Значение.ТелефонСтационарный;
   
КонецПроцедуры
9 Балоун
 
16.12.11
13:28
(7) ну на зачем городить вот это:
Если Ссылка <> Справочники.СправочникДиректора.ПустаяСсылка() Тогда
10 Maxus43
 
16.12.11
13:31
Ссылка=Справочники.СправочникДиректора;
   Если Ссылка <> Справочники.СправочникДиректора.ПустаяСсылка() Тогда

не расказывать что это условие всегда Истина?
11 Lavr
 
16.12.11
15:19
Ребята, да вы уж не взыщите сильно и не судите, я то в процессе изучения, по видеоучебникам учусь. Пока только первую часть прошел, из четырех - там знакомство с 1с и справочники. Для закрепления пройденного материала реализую разные идеи, просты конечно.
В данном случае при вводе данных все из справочника выбирается, но после выбора не выводит вообще ничего либо выводит "0", а в поле выбора "ПоОрганизации" остается только "<>".
12 Lavr
 
16.12.11
15:22
А вот код из учебника:
Процедура ЗаполнитьДополнительнымиДаннымиТекстовыеЗаголовки ()
   
   ЗначениеЭлементаНаименование=ЭлементыФормы.ПолеВвода1.Значение;
   //Переменная получила значение поля
   
   //Получение ссылки на справочник ФизЛица
   СсылкаНаСправочник=Справочники.ФизЛица;
   
   //Проверка ссылки на наличие данных
   Если СсылкаНаСправочник<>Справочники.ФизЛица.ПустаяСсылка() Тогда
       Сообщить("Ссылка получена!");
                   
       НаименованиеЭлемента=СсылкаНаСправочник.НайтиПоНаименованию(ЗначениеЭлементаНаименование,Истина);  
       
       ЭлементыФормы.Надпись1.Заголовок=НаименованиеЭлемента.ФИО;
       ЭлементыФормы.Надпись2.Заголовок=НаименованиеЭлемента.АдресПоПрописке;
       ЭлементыФормы.Надпись3.Заголовок=НаименованиеЭлемента.АдресФактический;
       ЭлементыФормы.Надпись4.Заголовок=НаименованиеЭлемента.ТелефонДомашний;
       ЭлементыФормы.Надпись5.Заголовок=НаименованиеЭлемента.ТелефонМобильный;
       Иначе Сообщить("Отсутствует!");
           
       КонецЕсли
   
   
   КонецПроцедуры
13 zak555
 
16.12.11
15:23
(12) что за учебник ?
14 zak555
 
16.12.11
15:24
выкладывай его - я тоже такой хочу
15 Mort
 
16.12.11
15:24
К нему коробок травы не прилагается вместе с диском?
16 Lavr
 
16.12.11
15:26
Гыыы...
Я бы выложил, но заказывал по инету и он зарегистрирован на мое имя и адрес - извините не могу.
Вот ссылка на сайт производителя: http://dao-it.ru/
17 kosts
 
16.12.11
15:27
(12) Похоже там пропущен собственно поиск по наименованию...
18 Lavr
 
16.12.11
15:27
Так по поводу проблемы, может кто подскажет как сделать правильно?
19 Mort
 
16.12.11
15:29
А какое поведение нужно?
20 kosts
 
16.12.11
15:30
СтрокаНаименования = "USD";
Валюты = Справочники.Валюты;
НайденнаяСсылка = Валюты.НайтиПоНаименованию(СтрокаНаименования);
Если НайденнаяСсылка = Валюты.ПустаяСсылка() Тогда
   Сообщить("Валюты """ + СтрокаНаименования + """ еще нет");
КонецЕсли;
21 Mort
 
16.12.11
15:31
Какой по ссылке термояд, сразу на первой странице. Этих учителей самих на курсы отправлять надо. Или лучше в армию, толку будет больше.
22 zak555
 
16.12.11
15:32
(21) в армию зачем ?
23 Lavr
 
16.12.11
15:32
Вообще необходимо чтобы в сообщении выводились значения реквизитов Телефон стационарный и Телефон мобильный. Т. е. поиск осуществляется по реквизитам Организация, ФИО и/или Адрес.
24 Lavr
 
16.12.11
15:34
А где еще можно материала по изучению взять, точнее от каких авторов?
25 Tazuya
 
16.12.11
15:34
(0)оценка 2. делай всегда запросом поиск и дорабатывать легче если поиск сложный
26 Lavr
 
16.12.11
15:35
Искал долго, полгода назад нашел только их. Попадались учебники обычные, но видимо опечатки или плохое сканирование.
27 Maxus43
 
16.12.11
15:36
(24) книги котороые на сайте 1с, те только бери, за них 1с ручается
28 zak555
 
16.12.11
15:36
http://dao-it.ru/images/video_html4/rl5_0/rolik5_0.html

это называется быдло-код ?
29 Maxus43
 
16.12.11
15:40
(28) как увидел что даже табуляции в коде нет и всё сплошняком - выключил) глаза режет
30 zak555
 
16.12.11
15:41
это хрен из (28)

утверждает на 5 минуте, что в конструкции

НовДок = Документы.ПоступлениеТоваровУслуг.СоздатьДокумент();

НовДок - "объект документ менеджер"

что это такое ?
31 Maxus43
 
16.12.11
15:43
короче в (28) КнигаГ*вно/АвторМ*дак
32 kosts
 
16.12.11
15:43
(0) Можно примерно так переписать, но я предпочитаю запросы.

Процедура ПоОрганизацииПриИзменении(Элемент)
   Ссылка = Справочники.СправочникДиректора.НайтиПоРеквизиту("Организация", ПоОрганизации ,Истина);
   Если Не Ссылка.Пустая() Тогда
       ЭлементыФормы.Надпись4.Заголовок = Поиск.ТелефонСтационарный;
   Иначе
       Сообщить("Отсутствует");
   КонецЕсли;
   
КонецПроцедуры
33 Maxus43
 
16.12.11
15:47
(32)    Поиск = Справочники.СправочникДиректора.НайтиПоРеквизиту("Организация", ПоОрганизации ,Истина);
34 zak555
 
16.12.11
15:48
надо срочно всем курсы клепать
35 kosts
 
16.12.11
15:48
В общем, мой совет, закрой тот сайт и больше не открывай...

(33) Заменить Поиск => Ссылка   в (32)
36 Maxus43
 
16.12.11
15:49
(35) опасно предопределённые слова использовать, лучше везде "Поиск" написать
37 kosts
 
16.12.11
15:53
(36) Прав, но тогда лучше как-то так: СсылкаНаДиректора
38 Fish
 
16.12.11
15:59
(3) Судя по названию сайта, скорее не индийский, а китайский: "Дао (кит. ?, буквально — путь) — одна из важнейших категорий китайской философии" :))))
39 Fish
 
16.12.11
16:00
+(38) И на фотке посередине явно китаец :)))