Имя: Пароль:
1C
1С v8
Оптимизировать код
0 ANDRU48
 
03.09.14
14:30
СтандартнаяОбработка = Ложь;
                
                Если ТипЗнч(ТекущаяСтрока.ДокументОплаты) = Тип("ДокументСсылка.ПлатежноеПоручениеВходящее") Тогда
                    ФормаВыбора = Документы.ПлатежноеПоручениеВходящее.ПолучитьФормуВыбора(,Элемент);
                Иначе
                    Если ТипЗнч(ТекущаяСтрока.ДокументОплаты) = Тип("ДокументСсылка.ПлатежноеПоручениеИсходящее") Тогда
                        ФормаВыбора = Документы.ПлатежноеПоручениеИсходящее.ПолучитьФормуВыбора(,Элемент);
                    Иначе
                        Если ТипЗнч(ТекущаяСтрока.ДокументОплаты) = Тип("ДокументСсылка.ПриходныйКассовыйОрдер") Тогда
                            ФормаВыбора = Документы.ПриходныйКассовыйОрдер.ПолучитьФормуВыбора(,Элемент);
                        Иначе
                            Если ТипЗнч(ТекущаяСтрока.ДокументОплаты) = Тип("ДокументСсылка.РасходныйКассовыйОрдер") Тогда
                                ФормаВыбора = Документы.РасходныйКассовыйОрдер.ПолучитьФормуВыбора(,Элемент);
                            КонецЕсли;
                        КонецЕсли;
                    КонецЕсли;
                КонецЕсли;
                
                ФормаВыбора.Отбор.Организация.Значение = Организация;
                ФормаВыбора.Отбор.Организация.Использование = Истина;
                ФормаВыбора.Открыть();


Как лучше оптимизировать, чтобы каждый раз не проверять.
ТипДокумента = ТипЗнч(ТекущаяСтрока.ДокументОплаты);
ФормаВыбора = Документы ? ПолучитьФормуВыбора(,Элемент);
1 Drac0
 
03.09.14
14:32
Метаданные()
2 wertyu
 
03.09.14
14:32
ВидДокумента = Элемент.Метаданные().Имя;
ФормаВыбора = Документы[ВидДокумента].ПолучитьФормуВыбора(,Элемент);
3 wertyu
 
03.09.14
14:37
а пардон
ВидДокумента = ТекущаяСтрока.ДокументОплаты.Метаданные().Имя;
4 ANDRU48
 
03.09.14
14:38
(3) спасибо, получилось.
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс