Имя: Пароль:
1C
 
Установка отбора в интерактивном выборе видов документов. "ВидыДляВыбора()"
0 polus
 
21.10.04
17:07
У меня такой вопрос. При для заполнения документа мне нада выбирать некие документы. Для этого я написал вот такой код.
-----------
Процедура ПриРедактированииНовойСтроки()
  Заказ.ВидыДляВыбора("СчетВходящий,ПриходнаяНакладная,ДоговорПрихода");
КонецПроцедуры
------------
открываеться журнал документов с перечнем домуентов.
Там есть колонка "Фирма". Так вот как мне сделать отбор нужных видов документов только по одной фирме? Т.е. установить отбор пи Фирме.
1 Diter
 
21.10.04
17:14
(0) Отбор можно установить только в общем журнале. Судя по коду, ты открываешь журнал заказов, т.е. журнал документов, определённого вида. В таком журнале ты отбор не установишь.
2 Diter
 
21.10.04
17:17
(+1) Сорри, похоже немного не в тему.
3 Crew
 
21.10.04
17:21
(0)
Только через Ж...КК
http://www.sinor.ru/~my1c/knowhow/jur_otb.html
читай...

или писАть свою обработку и выдавать в тз.
4 Diter
 
21.10.04
17:31
Уф. значит всётаки в тему. (0) варианта два и оба описаны в (3). Только не забудь у журнала установить признак "общий". Отбор устанавливать по "сборному" реквизиту (что вроде "ВидДокумента/Фирма/Контрагент/Склад/...")
5 Последний Будда
 
21.10.04
17:41
А может просто выбирать из списка значений? Если конечно количество документов за интервал небольшое.
6 polus
 
21.10.04
18:55
У меня реквизит Заказ типа документ. Я решил сделать через список значений. Но вот как мне орагинизовать подбор при нажатии на реквизит?
7 polus
 
21.10.04
18:57
Процедура Изм()                  
   Перем КонтФормы;
   Перем выбЗначение;    
   ВариантыЗаказа = СоздатьОбъект("СписокЗначений");
   ВариантыЗаказа.ДобавитьЗначение(1,"СВ (Счет входящий)");
   ВариантыЗаказа.ДобавитьЗначение(2,"Приходная Накладная");
   ВариантыЗаказа.ДобавитьЗначение(3,"Договор Прихода");
   Если ВариантыЗаказа.ВыбратьЗначение(выбЗначение,"",,,2) <> 1 Тогда
       Возврат;
   КонецЕсли;
   Если ВыбЗначение = 1 Тогда
       ОткрытьПодбор("Журнал.СчетаВходящие",,КонтФормы,0,);
   ИначеЕсли ВыбЗначение = 2 Тогда
       ОткрытьПодбор("Журнал.Приход",,КонтФормы,0,);
   ИначеЕсли ВыбЗначение = 3 Тогда
       ОткрытьПодбор("Журнал.ПоУмолчанию",,КонтФормы,0,);
   КонецЕсли;
КонецПроцедуры  

Процедура ОбработкаПодбора(Эл)
   Заказ = Эл;
КонецПроцедуры

Только как сделать что бы ф-я выполнялась при нажатии на реквизит?
8 Crew
 
21.10.04
18:59
(6)
извращения на форуме должны быть запрещены
9 Последний Будда
 
21.10.04
19:00
Что-то типа этого
Процедура ПриНачалеВыбораЗначения(Ид,Фл)
Если Ид="Заказ" Тогда
зн="";
Спис=СформироватьСписокДоков();
Если Спис.ВыбратьЗначение(Зн,,,,1)=1 Тогда
Форма.УстановитьАтрибут(Ид,Зн);
КонецЕсли;
Фл=0;
КонецЕсли;
КонецПроцедуры
10 polus
 
21.10.04
19:01
т.е. если я новичок то можна на мне крест ставить ? что ли ?
11 Последний Будда
 
21.10.04
19:02
10. В мире много организмов. Есть и примитивные, есть и высокоразвитые. По одной амебе не стоит строить представление о всей земной фауне.
12 Crew
 
21.10.04
19:03
(10)
ты читал что ты написал? "орагинизовать подбор"
13 Crew
 
21.10.04
19:04
(11)
Не угадал. Я инфузория в трюфельках
14 Последний Будда
 
21.10.04
19:04
12. Ну и что? Потом человек передумал.
15 Crew
 
21.10.04
19:07
(14)
Ну и ничего.
16 polus
 
21.10.04
19:07
лень помочь, или просто некому пристать?
17 Crew
 
21.10.04
19:08
(16)
Блин конец дня. Побойся бога я же сейчас от смеха лопну ;)

"просто некому пристать?" LOL
18 Последний Будда
 
21.10.04
19:08
13. Там просто была аналогия. Образная, не прямая.
Просто мне кажется, что ерничать хорошо в разделе life и ветках Волшебника. А на проблему лучше или ответить по сущесту, или не отвечать вовсе.
19 polus
 
21.10.04
19:08
-- Последний Будда
сенки получилось.
20 Crew
 
21.10.04
19:10
(16)
Вроде П.Будда в (9) ответил? Или не помогает*
21 Crew
 
21.10.04
19:12
(18)
Ладно блин. В каждой шутке есть доля шутки.

polus - вы обиделись?
22 Последний Будда
 
21.10.04
19:12
19. Я рад. Помогая другим - я помогаю себе. Получая помощь от других - я помогаю им самим.
23 polus
 
21.10.04
19:15
У меня еще вопрос.
при выборе документа еще и вызываеться "выбор выдов документов", кроме моего списка значения. Можна его как нибудь отключить?
24 Crew
 
21.10.04
19:16
Форма.РЕКВИЗИТ.НеИзменятьВид(1)
25 polus
 
21.10.04
19:18
спасибо большое получилось. =_)
26 Crew
 
21.10.04
19:21
(24)+
Помогая тебе я помогаю ПБ помогать себе. ПБ получая от меня помощь помогает мне помогать нам. Мы получая помощь от ПБ помогаем себе помогать ПБ. ПБ получая помощь от нас помогает нам помогать нам и ПБ... Мы и ПБ получая помощь от нас поднимаем рейтинг сайта Волшебника. Поднимающийся рейтинг Волшебника помогает ему помогать нам...

P.S. устал писать...
P.P.S. забыл! (c) ПБ polus Crew и все-все-все под.ред. Волшебника
27 Crew
 
21.10.04
19:26
(25)
Обращайся ;)

P.S. Ты подарил мне несколько дополнительных минут жизни (16) ;)
28 polus
 
21.10.04
19:27
и еще вопрос открытьподбор("Журнал.Договора",,КонтФормы,0,);
в этом справочнике отбираються два вида документов, а можна ли выбирать только один?
29 Crew
 
21.10.04
19:31
(28)
Извини в каком справочнике?
30 polus
 
21.10.04
19:32
ну млин 9 часов работы, не много путаюсь, т.е. журнале.!
31 polus
 
21.10.04
19:33
сенки уже сам додумался.
32 Crew
 
21.10.04
19:35
Видимо у тебя Журналу.Договора пренадлежит несколько Документов.
Это можно сделать вызывая общий журнал и передавая, в качестве параметра в форму, вид документа для отбора.

P.S. (31) я уже набрал ;)
33 polus
 
22.10.04
15:11
продолжая тему.
при первом открытии подбора все нормально открываеться одно окошко и после выбора закрываеться. Но если у реквизита уже было ранее выбрано значение, и если снова попытаться перевыбрать то открываеться два подбора, тот что мне нужен и полный журнал. Как это избавиться?

.................
   Заказ = 0;
   Если ВыбЗначение = 1 Тогда        
       ОткрытьПодбор("Журнал.СчетаВходящие",,КонтФормы,0,);
   ИначеЕсли ВыбЗначение = 2 Тогда
.................

я заметил если перед открытием подбора обнулить значение тогда открываеться как нада, только вот если пользователь откроет подбор и потом откажеться от выбора значения тогда уже не будет.
Есть два вида языков, одни постоянно ругают, а вторыми никто не пользуется.