7.7 Ограничение прав пользователей

в Процедуре ПриОткрытии() но вот это где я найти не могу....

ЗАкладка модуль да....но если при открытии навредит то как лучше?куда ставить вышепредложенную часть кода?

а куда бросить?и где найти?)

Извините что задаю много вопросов, просто хотелось бы разобраться еще и для себя.

Задача в том.чтобы менеджеры видели только свои счет фактуры.

во...нашел...


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

// Заполним таблицу для выбора печатной формы
НомерТекущейФормы = глУстановкаКнопкиПечать(Контекст, "Документ." + Вид(),ТаблицаПечФорм);

Парам = Форма.Параметр;
Если ТипЗначенияСтр(Парам)="СписокЗначений" Тогда
Если ПустоеЗначение(Парам.Получить("Команда"))=1 Тогда
Сообщить("В форму документа "+Вид()+" передан неверный параметр!","I");
СтатусВозврата(0);Возврат;
КонецЕсли;
Если Парам.Получить("Команда") = "ПечатьНаПринтер" Тогда
КолЭкз = Макс(Число(Парам.Получить("КолЭкз")),1);
ПоКнопкеПечать(1,КолЭкз);
СтатусВозврата(0);Возврат;
ИначеЕсли Парам.Получить("Команда") = "ПечатьНаЭкран" Тогда
ПоКнопкеПечать(0);
СтатусВозврата(0);Возврат;
ИначеЕсли Парам.Получить("Команда") = "Записать" Тогда
ДатаДок = Парам.Получить("ДатаСчета");
УстановитьНовыйНомер(СокрЛП(Константа.ПрефиксИБ) + СокрЛП(Фирма.ЮрЛицо.ПрефиксНомеровДокументов));

АвтоВремяКонецДня();
Записать();
СтатусВозврата(0);
Возврат;
Иначе
Сообщить("В форму документа "+Вид()+" передана неверная команда "+Парам.Получить("Команда")+"!","I");
СтатусВозврата(0);Возврат;
КонецЕсли;
Иначе
КонтекстОснования = Парам;
КонецЕсли;

http://dl.dropbox.com/u/6236130/1%D0%A1.jpg вот может со скрином лучше будет)

Ну вот куда здесь ставить

Код:

Права = НазваниеНабораПрав();
Если (Права = "ПолныеПрава") Тогда
Иначе
Если глПользователь <> Автор Тогда
СтатусВозврата(0);
Возврат;
КонецЕсли;
КонецЕсли;

?

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

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

Парам = Форма.Параметр;
Если ТипЗначенияСтр(Парам)="СписокЗначений" Тогда
Если ПустоеЗначение(Парам.Получить("Команда"))=1 Тогда
Сообщить("В форму документа "+Вид()+" передан неверный параметр!","I");
СтатусВозврата(0);Возврат;
КонецЕсли;
Если Парам.Получить("Команда") = "ПечатьНаПринтер" Тогда
КолЭкз = Макс(Число(Парам.Получить("КолЭкз")),1);
ПоКнопкеПечать(1,КолЭкз);
СтатусВозврата(0);Возврат;
ИначеЕсли Парам.Получить("Команда") = "ПечатьНаЭкран" Тогда
ПоКнопкеПечать(0);
СтатусВозврата(0);Возврат;
ИначеЕсли Парам.Получить("Команда") = "Записать" Тогда
ДатаДок = Парам.Получить("ДатаСчета");
УстановитьНовыйНомер(СокрЛП(Константа.ПрефиксИБ) + СокрЛП(Фирма.ЮрЛицо.ПрефиксНомеровДокументов));

АвтоВремяКонецДня();
Записать();
СтатусВозврата(0);
Возврат;
Иначе
Сообщить("В форму документа "+Вид()+" передана неверная команда "+Парам.Получить("Команда")+"!","I");
СтатусВозврата(0);Возврат;
КонецЕсли;
Иначе

Так будет верно?

а...то есть она так и должна быть Права = НазваниеНаборПрав( );
ок)))Спасибо,сейчас попробую

Ребят спасибо за терпение.Со чет фактурой сработало.Последний вопрос, не менее важный))))) (спасибо за терпение)

а как сделать чтобы при заходе в общий журнал манагеры вимдели только свои счета на оплату и распоряжения?Это можно настроить не программно? (ну я имею ввиду ролями или правами)?

Да я бы с удовольствием обратился, но мое руководство, ни в какую не хочет выделять на это финансов и село на шею мне.Поэтому приходится копать самому((((

ну а ограничивать опять же программным кодом?или можно настроить?

а работы мы не боимся))))все новое нам интересно)