Функция запрещающая редактировать поле после повторного открытия докум

[Neft]

Друзья не подскажете какой функцией можно запретить редактирование конкретного поля документа пользователем при повторном открытии формы документа.

Добавлено: Друзья не подскажете какой функцией можно запретить редактирование конкретного поля документа пользователем при повторном открытии формы документа. Платформа 8.1

 

[gorlanovmax]

Ввести переменную, которой после первой записи присваивать значение, например 1.
При повторном открытии проверять переменную и запрещать редактирование, если это нужно

 

[Neft]

а не могли бы канибудь поподробнее про ввод переменной...

 

[evgenyatam]

зачем такие сложности?
"ЭтоНовый()
Возвращаемое значение:
Тип: Булево. Истина - изменяется еще ни разу не записанный документ; Ложь - документ уже записан.
Описание:
Определяет, записан ли документ в базу данных. "

Процедура ПередОткрытием(Отказ, СтандартнаяОбработка)
Если не ЭтоНовый() Тогда
ЭлементыФормы.Нужный.Доступность=Ложь;
КонецЕсли;
КонецПроцедуры.

 

[Neft]

evgenyatam спасибо! ОГРОМНОЕ!

а про переменную- жуть как интересно...

 

[Darlock]

зачем такие сложности?
"ЭтоНовый()
Возвращаемое значение:
Тип: Булево. Истина - изменяется еще ни разу не записанный документ; Ложь - документ уже записан.
Описание:
Определяет, записан ли документ в базу данных. "

Процедура ПередОткрытием(Отказ, СтандартнаяОбработка)
Если не ЭтоНовый() Тогда
ЭлементыФормы.Нужный.Доступность=Ложь;
КонецЕсли;
КонецПроцедуры.

Можно проще и одной строкой:

ЭлементыФормы.Нужный.Доступность=ЭтоНовый();

 

[evgenyatam]

Можно проще и одной строкой:

привычка с семерки. хотя там тоже примерно так можно.
даже скорее всего не с семерки а с микрола+

 

[Neft]

Можно проще и одной строкой:

ЭлементыФормы.Нужный.Доступность=ЭтоНовый();

Спасибо!

Пойду по просвещаюсь относительно ввода переменной..заинтересовало млин.

 

[Darlock]

Перем НовыйДок;


Процедура ПередОткрытием(Отказ)

НовыйДок = ЭтоНовый();

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

Процедура ПриОткрыти(Отказ)

ЭлементыФормы.Нужный.Доступность= НовыйДок;

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



НовыйДок = Истина;

 

[Neft]

Darlock- пасиб!

 

[Darlock]

На здорофф

 

[gorlanovmax]

А что непоятно? Я писал для 7.7

Создаем Переменную
НовыйДок - тип число, точность 1

Процедура ВводНового()
НовыйДок=0;
КонецПроцедуры

Процедура ПриЗаписи()
НовыйДок=1;
КонецПроцедуры

Процедура ПриОткрытии()
Если НовыйДок=1 Тогда
Форма.Поле.Доступность(0);
КонецПроцедуры

 

[vbs]

Еще точнее так :
Процедура ВводНового()
НовыйДок=1;
КонецПроцедуры

Процедура ПриЗаписи()
НовыйДок=0;
КонецПроцедуры

Процедура ПриОткрытии()
Форма.Поле.Доступность(НовыйДок);
КонецПроцедуры