Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Открытие другого документа в журнале документов
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 7.7
vadim007
В журнал документов ПриходныеНакладные добавил реквизит Доверенность.
Хотелось-бы при клике в этой графе отрывать именно Доверенность, а не ПриходныйОрдер.
Как?
mister-x
кнопку внизу "забацати" із логікою
Ardi
Процедура ПриВыбореСтроки()
Сообщить(Форма.ТекущаяКолонка());
КонецПроцедуры                                              

Форма.ОбработкаВыбораСтроки(1);
MATEVI
ххх
Кто не успел тот опоздал....
vadim007
Цитата(MATEVI @ 25.07.12, 14:18) необходимо зарегистрироваться для просмотра ссылки
ххх
Кто не успел тот опоздал....

Все еще впереди...

Цитата(Ardi @ 25.07.12, 14:08) необходимо зарегистрироваться для просмотра ссылки
Процедура ПриВыбореСтроки()
Сообщить(Форма.ТекущаяКолонка());
КонецПроцедуры                                              

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

Только при этом перестали открываться документы журнала smile.gif
mister-x
Цитата(vadim007 @ 31.07.12, 10:33) необходимо зарегистрироваться для просмотра ссылки
Только при этом перестали открываться документы журнала

код в студію
vadim007
Цитата(mister-x @ 31.07.12, 11:16) необходимо зарегистрироваться для просмотра ссылки
код в студію

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

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


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

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


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

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


В таком варианте процедура ПриВыбореСтроки() не вызывается вообще.
mister-x
тоді
Цитата(mister-x @ 25.07.12, 13:51) необходимо зарегистрироваться для просмотра ссылки
кнопку внизу "забацати" із логікою
і все буде відкриватись
MATEVI
Цитата(vadim007 @ 31.07.12, 10:33) необходимо зарегистрироваться для просмотра ссылки
Все еще впереди...

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


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

Форма.ОбработкаВыбораСтроки(1);
vadim007
Цитата(mister-x @ 31.07.12, 13:22) необходимо зарегистрироваться для просмотра ссылки
тоді і все буде відкриватись

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

// ======================================
Процедура ПриВыбореСтроки()
    Если Форма.ТекущаяКолонка() = "Доверенность" Тогда
        СтатусВозврата = 0;
        ОткрытьФорму(ТекущийДокумент.Доверенность);
    Иначе
        ОткрытьФорму(ТекущийДокумент);
    КонецЕсли;
КонецПроцедуры
mister-x
і це працює
ОткрытьФорму(ТекущийДокумент.Доверенность);
?
vadim007
Цитата(mister-x @ 31.07.12, 13:34) необходимо зарегистрироваться для просмотра ссылки
і це працює
ОткрытьФорму(ТекущийДокумент.Доверенность);
?

Да, все работает. Все свободны, всем спасибо!
g789
Цитата(vadim007 @ 31.07.12, 13:30) необходимо зарегистрироваться для просмотра ссылки
СтатусВозврата = 0;

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

да и это не надо 51000000.gif
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.