Привет Всем прошу помощи!

Управляемые формы в с 8.3 режим Такси, начал изучать сранвительно недавно, опыта пока мало , вот код который нужно переделать для управляемой формы в режиме Такси в Справочнике Организации



Процедура ЗаписатьВРег(ИЗМ,ЗН,ЧИС)



РегСвед=РегистрыСведений.Организация.СоздатьНаборЗаписей();

Если НЕ ЗначениеНеЗаполнено(ИЗМ) Тогда            
НовНабор=РегСвед.Добавить();

НовНабор.Измерение=ЗН;

НовНабор.Период=ДатаДанных;

НовНабор[ЧИС]=ИЗМ;

Попытка                  
РегСвед.Записать(Ложь);

Исключение                
РегСвед.Записать(Истина);

КонецПопытки;

КонецЕсли;



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



Процедура ПередЗаписью(Отказ)



Если ДиалогВопрос("Записать значения сотрудников на " + ДатаБезВремени(ДатаДанных) + " г. ?" + Символы.ПС + "Внимание, если не было кадровых изменений, не рекомендуется записывать!","Внимание!!!") Тогда            ЗаписатьВРег(ГлБухгалтер,"ГлБухгалтер","Значение");

ЗаписатьВРег(Кассир,"Кассир","Значение");

ЗаписатьВРег(МинимальнаяЗарплата,"МинимальнаяЗарплата","ЗначениеЧисло");            ЗаписатьВРег(МинТариф,"МинТариф","ЗначениеЧисло");

ЗаписатьВРег(Руководитель,"Руководитель","Значение");

ЗаписатьВРег(Руководитель,"Исполнитель","Значение");

ЗаписатьВРег(БухгалтерПоПродаже,"БухПродаж","Значение");            ЗаписатьВРег(МенеджерПоПродажам,"МенеджерПоПродажам","Значение");

Наименование = НазваниеОрганизации;      
Иначе
Отказ = Истина;

КонецЕсли;

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



Функция ДиалогВопрос(ТекстВопроса,ЗаголовокОкна) Экспорт

#Если Клиент Тогда                        Если Вопрос(ТекстВопроса,РежимДиалогаВопрос.ДаНетОтмена,,КодВозвратаДиалога.Отмена,ЗаголовокОкна)=КодВозвратаДиалога.Да Тогда                  Знч=Истина;

Иначе                  
Знч=Ложь;

КонецЕсли;

Возврат Знч;

#КонецЕсли

КонецФункции



Не могу сообразить как грамотно с оповещением реализовать эту процедуру желательно без модальности, В процедуре ПриЗаписиНаСервере не работает оповещение, я могу конечно как то по колхозному подогнать этот код но это будет уже не правильно , конфа в режиме Такси, без модальности и без совместимости



С Уважением Дамир

В процедуре ПриЗаписи  делайте. не надо на сервере

Спасибо, сейчас попробую и сразу отпишусь

(0) Проверки делать на клиенте из формы.

Записывать наборы РС без отбора - оооооочень плохая примета. Особенно так
Попытка                  
   РегСвед.Записать(Ложь);
Исключение                
   РегСвед.Записать(Истина);
КонецПопытки;

Вы имели ввиду ПередЗаписью?
ПриЗаписи нету в Такси

RomanYS
ок, а как правильно?

(4) как это нету? когда есть. и при записи и после записи.

(4) Такси ничем не отличается
http://catalog.mista.ru/public/1098803/

(5) Если вопрос про РС: то ставить отборы или использовать менеджер записи.
Для понимания проблемы: твое РегСвед.Записать(Истина) без установки отбора очищает весь(!) регистр