1с8 Управление торговлей, Запрос подтверждения на выход

[berTalino]

Что за бред, нельзя изменять посты .. 

[sergejK74]

Раз ты привел процедуру из 11, вот процеура из 10.3

Код Выделить Развернуть

Процедура ПередЗавершениемРаботыСистемы(Отказ)

Если глЗапрашиватьПодтверждениеПриЗакрытии <> Ложь Тогда
ЗапрашиватьПотверждение = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глЗначениеПеременной("глТекущийПользователь"),
      "ЗапрашиватьПодтверждениеПриЗакрытии");
Если ЗапрашиватьПотверждение Тогда
Ответ = Вопрос("Завершить работу с программой?", РежимДиалогаВопрос.ДаНет);
Отказ = (Ответ = КодВозвратаДиалога.Нет);
КонецЕсли;
КонецЕсли;

Если НЕ Отказ Тогда

// отдельно получаем настройки для которых нужно выполнить обмен при выходе из программы
ПроцедурыОбменаДанными.ВыполнитьОбменПриЗавершенииРаботыПрограммы(глЗначениеПеременной("глОбработкаАвтоОбменДанными"));

КонецЕсли;

КонецПроцедуры
Видишь отличие?
Посмотри в google - это подтверждение часто ищут - но еще никто не нашел.

[berTalino]

Ха.. сейчас глянул свою ЗУП и сравнил с твоей из УТ 10.3* . одно и то же практически .. но только вот протое добавление процедуры ничего не дает .. нужно еще кучу происывать с нуля =\

[has]

Ха.. сейчас глянул свою ЗУП и сравнил с твоей из УТ 10.3* . одно и то же практически .. но только вот протое добавление процедуры ничего не дает .. нужно еще кучу происывать с нуля =\

Можешь просто написать

Код Выделить Развернуть


Процедура ПередЗавершениемРаботыСистемы(Отказ)

    Ответ = Вопрос("Завершить работу с программой?", РежимДиалогаВопрос.ДаНет);
    Отказ = (Ответ = КодВозвратаДиалога.Нет);
   
    Если НЕ Отказ Тогда
       
        // отдельно получаем настройки для которых нужно выполнить обмен при выходе из программы
        ПроцедурыОбменаДанными.ВыполнитьОбменПриЗавершенииРаботыПрограммы(глЗначениеПеременной("глОбработкаАвтоОбменДанными"));
           
    КонецЕсли;

КонецПроцедуры

но тогда у всех запрашивать будет

[berTalino]

Мне это и нужно .. сейчас попробую ..

[berTalino]

ОТЛИЧНО! срабатывает .. достаточно добавления вот этого куска в конец процедуры ПередЗавершениемРаботыСистемы:

Ответ = Вопрос("Завершить работу с программой?", РежимДиалогаВопрос.ДаНет);
Отказ = (Ответ = КодВозвратаДиалога.Нет);


т.к. на Если он ругается, что ПроцедурыОбменаДанными не найдена

Спасибо за помощь! 

[berTalino]

[РЕШЕНО !]

[rom-x]

Органайзер - Персональные настройки и там эта галочка есть.