Версия для печати темы (https://pro1c.org.ua/index.php?showtopic=8299)

Нажмите сюда для просмотра этой темы в обычном формате

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 _ Программирование в 1С Предприятие 7.7 _ Открытие другого документа в журнале документов

Автор: vadim007 25.07.12, 12:42

В журнал документов ПриходныеНакладные добавил реквизит Доверенность.
Хотелось-бы при клике в этой графе отрывать именно Доверенность, а не ПриходныйОрдер.
Как?

Автор: mister-x 25.07.12, 12:51

кнопку внизу "забацати" із логікою

Автор: Ardi 25.07.12, 13:08

Процедура ПриВыбореСтроки()
Сообщить(Форма.ТекущаяКолонка());
КонецПроцедуры                                               

Форма.ОбработкаВыбораСтроки(1);

Автор: MATEVI 25.07.12, 13:18

ххх
Кто не успел тот опоздал....

Автор: vadim007 31.07.12, 9:33

Цитата(MATEVI @ 25.07.12, 14:18) http://pro1c.org.ua/index.php?act=findpost&pid=53718
Процедура ПриВыбореСтроки()
Сообщить(Форма.ТекущаяКолонка());
КонецПроцедуры                                               

Форма.ОбработкаВыбораСтроки(1);

Только при этом перестали открываться документы журнала smile.gif

Автор: mister-x 31.07.12, 10:16

Цитата(vadim007 @ 31.07.12, 10:33) *
Только при этом перестали открываться документы журнала

код в студію

Автор: vadim007 31.07.12, 10:51

Цитата(mister-x @ 31.07.12, 11:16) *
код в студію

// ======================================
Процедура ПриОткрытии()
    Если глИспользуетсяРазделительУчета <> 1 Тогда
        Форма.Фирма.Видимость(0);
    КонецЕсли;
    Форма.кПравоваяПоддержка.Видимость(глВидимостьПравовойПоддержки);
    Форма.ОбработкаВыбораСтроки(1);
КонецПроцедуры

// ======================================
Процедура ПриВыбореСтроки()
    Если Форма.ТекущаяКолонка() = "Доверенность" Тогда
        Сообщить(Форма.ТекущаяКолонка());
        СтатусВозврата = 0;
    Иначе
        Сообщить(ТекущийДокумент);
    КонецЕсли;
КонецПроцедуры

Автор: mister-x 31.07.12, 11:41

Процедура ПриОткрытии()
    Если глИспользуетсяРазделительУчета <> 1 Тогда
        Форма.Фирма.Видимость(0);
    КонецЕсли;
    Форма.кПравоваяПоддержка.Видимость(глВидимостьПравовойПоддержки);
    //Форма.ОбработкаВыбораСтроки(1); //тут помилка
КонецПроцедуры


//////////////////
// ======================================
Процедура ПриВыбореСтроки()
    Если Форма.ТекущаяКолонка() = "Доверенность" Тогда
        Сообщить(Форма.ТекущаяКолонка()); //сюди заходить?
        //СтатусВозврата = 0;
        //тут відкриваємо форму дока
        Форма.ОбработкаВыбораСтроки(1);
    Иначе
        Сообщить(ТекущийДокумент);
    КонецЕсли;
КонецПроцедуры

чекаю відповіді на питання

Автор: vadim007 31.07.12, 11:47

Цитата(mister-x @ 31.07.12, 12:41) *
Процедура ПриОткрытии()
    Если глИспользуетсяРазделительУчета <> 1 Тогда
        Форма.Фирма.Видимость(0);
    КонецЕсли;
    Форма.кПравоваяПоддержка.Видимость(глВидимостьПравовойПоддержки);
    //Форма.ОбработкаВыбораСтроки(1); //тут помилка
КонецПроцедуры


//////////////////
// ======================================
Процедура ПриВыбореСтроки()
    Если Форма.ТекущаяКолонка() = "Доверенность" Тогда
        Сообщить(Форма.ТекущаяКолонка()); //сюди заходить?
        //СтатусВозврата = 0;
        //тут відкриваємо форму дока
        Форма.ОбработкаВыбораСтроки(1);
    Иначе
        Сообщить(ТекущийДокумент);
    КонецЕсли;
КонецПроцедуры

чекаю відповіді на питання


В таком варианте процедура ПриВыбореСтроки() не вызывается вообще.

Автор: mister-x 31.07.12, 12:22

тоді

Цитата(mister-x @ 25.07.12, 13:51) *
кнопку внизу "забацати" із логікою
і все буде відкриватись

Автор: MATEVI 31.07.12, 12:26

Цитата(vadim007 @ 31.07.12, 10:33) *
Все еще впереди...

Думал Вы справитесь smile.gif
Ну вот мой вариант. На примере журнала приходных накладных. Добавлен рекв. журнала - заказ и колонка соответственно. Писал быстро. Код.
Оптимизируйте. Критикуйте но без меня. 
// ======================================
Процедура ПриОткрытии()
    Если глИспользуетсяРазделительУчета <> 1 Тогда
        Форма.Фирма.Видимость(0);
    КонецЕсли;
    Форма.кПравоваяПоддержка.Видимость(глВидимостьПравовойПоддержки);
КонецПроцедуры


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

Форма.ОбработкаВыбораСтроки(1);

Автор: vadim007 31.07.12, 12:30

Цитата(mister-x @ 31.07.12, 13:22) *
тоді і все буде відкриватись

Мы не ищем легких путей:
// ======================================
Процедура ПриОткрытии()
    Если глИспользуетсяРазделительУчета <> 1 Тогда
        Форма.Фирма.Видимость(0);
    КонецЕсли;
    Форма.кПравоваяПоддержка.Видимость(глВидимостьПравовойПоддержки);
    Форма.ОбработкаВыбораСтроки(1);
КонецПроцедуры

// ======================================
Процедура ПриВыбореСтроки()
    Если Форма.ТекущаяКолонка() = "Доверенность" Тогда
        СтатусВозврата = 0;
        ОткрытьФорму(ТекущийДокумент.Доверенность);
    Иначе
        ОткрытьФорму(ТекущийДокумент);
    КонецЕсли;
КонецПроцедуры

Автор: mister-x 31.07.12, 12:34

і це працює

ОткрытьФорму(ТекущийДокумент.Доверенность);
?

Автор: vadim007 31.07.12, 12:37

Цитата(mister-x @ 31.07.12, 13:34) *
і це працює
ОткрытьФорму(ТекущийДокумент.Доверенность);
?

Да, все работает. Все свободны, всем спасибо!

Автор: g789 31.07.12, 14:40

Цитата(vadim007 @ 31.07.12, 13:30) *
СтатусВозврата = 0;

а это что?
Может быть
СтатусВозврата(0);

да и это не надо 51000000.gif

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7
https://pro1c.org.ua