Имя: Пароль:
1C
1C 7.7
v7: Выбор контрагента в разных документах
0 ДимаQw
 
25.04.20
12:49
При создании расходной накладной нужно, что-бы форма списка открывалась сразу в группе "клиенты", а при создании приходной накладной в группе "поставщики". Подскажите, пожалуйста.
1 ДенисЧ
 
25.04.20
12:54
Ну так при открытии формы устанавливай родителя...
2 Cthulhu
 
25.04.20
14:13
// модуль формы расходной накладной
Процедура ПриНачалеВыбораЗначения(РеквИмя,ФСО) //предопределенная
    Если РеквИмя = "Контрагент" Тогда
        КонтекстВыбораКонтрагента = Контрагент.ТекущийЭлемент();
        Если КонтекстВыбораКонтрагента.Выбран()<>1 Тогда
            НачГруппаКонтрагентов = СоздатьОбъект("Справочник.Контрагенты");
            Если НачГруппаКонтрагентов.НайтиПоНаименованию("",1,1)<>0 Тогда
                ЕстьТакаяГруппа = НачГруппаКонтрагентов.НайтиПоНаименованию("клиенты",1,1);
                Если НачГруппаКонтрагентов.НайтиПоНаименованию("клиенты",1,1)<>0 Тогда
                    НачГруппаКонтрагентов=НачГруппаКонтрагентов.ТекущийЭлемент();
                    Если НачГруппаКонтрагентов.ЭтоГруппа()<>0 Тогда
                        ФСО = 0; ОткрытьФорму("Справочник.Контрагенты",КонтекстВыбораКонтрагента);
                        КонтекстВыбораКонтрагента.ИспользоватьРодителя(НачГруппаКонтрагентов);
                    КонецЕсли;
                КонецЕсли;
            КонецЕсли;
        КонецЕсли;
    КонецЕсли;
КонецПроцедуры //ПриНачалеВыбораЗначения
// ир же самое в модуль формы расходной накладной - исправив одну строку... )))
3 Cthulhu
 
26.04.20
13:37
//Если НачГруппаКонтрагентов.НайтиПоНаименованию("клиенты",1,1)<>0 Тогда
                Если ЕстьТакаяГруппа<>0 Тогда // помарочку исправить....
4 Злопчинский
 
27.04.20
05:18
(0) зачем? найти клиента по буквам - быстрее чем лазить по папкам и взглядом елозить.
и что делать когда клиент - покупатель машинок и продавец колес?
5 idemat
 
27.04.20
09:52
А зачем? :

            Если НачГруппаКонтрагентов.НайтиПоНаименованию("",1,1)<>0 Тогда
6 Cthulhu
 
27.04.20
17:43
(5): см.(3)