Можно ли запретить доступ пользователям ...
11.01.2004
03:30
#1
Можно ли запретить доступ пользователям допустим в этом месяце до 15 числа они могут изменят и вводить документы по предыдущему и текущему месяцу! А с 16 числа текущего месяца они могут изменять и вводить только этот месяц, а предыдущий только просматривать!?????
Заранее ОГРОМНОЕ СПАСИБО!
Если не затруднит, ответы пришлите пожалуйста на
E-mail: strelsky_gena@tut.by
ВСЕМ СПАСИБО!
Заранее ОГРОМНОЕ СПАСИБО!
Если не затруднит, ответы пришлите пожалуйста на
E-mail: strelsky_gena@tut.by
ВСЕМ СПАСИБО!
11.01.2004
21:17
#2
"Для запрета ввода/редактирования в начале процедуры ПриЗаписи() документа вставь:
ДеньМесяцаЗаписиДокумента=Число(Лев(ДатаДок,2));
ДеньМесяцаТекущейДаты=Число(Лев(ТекущаяДата(),2));
ДокументВводитсяВТекущемМесяце=?(((ДатаДок>НачМесяца(ТекущаяДата())) и (ДатаДок<КонМесяца(ТекущаяДата()))),1,0);
Если (ДокументВводитсяВТекущемМесяце=1) и (ДеньМесяцаЗаписиДокумента<=16) и (ДеньМесяцаТекущейДаты>=16) Тогда
Предупреждение("Запрещено вводить документы раньше середины текущего месяца.");
СтатусВозврата(0);
Возврат;
КонецЕсли;
Для запрета просмотра в начале процедуры ПриОткрытии() документа вставляй:
ДеньМесяцаДокумента=Число(Лев(ДатаДок,2));
ДеньМесяцаТекущейДаты=Число(Лев(ТекущаяДата(),2));
Если ((ДатаДок<НачМесяца(ТекущаяДата())) или ((ДеньМесяцаДокумента<=16) и (ДеньМесяцаТекущейДаты>=16) )) Тогда
Форма.ТолькоПросмотр(1);
КонецЕсли;
Или заведи глобальную процедуру например глПриЗаписиДокумента(Конт) и глПриОткрытииДокумента(Конт) (если таких ещё нету), запихай туда это всё соответственно а в документах пиши также соответственно
глПриЗаписиДокумента(Контекст) и глПриОткрытииДокумента(Контекст)
з.с всё ответы в форуме сами приходят к тебе в ящик, если поставить флаг внизу при отправке сообщения
"
ДеньМесяцаЗаписиДокумента=Число(Лев(ДатаДок,2));
ДеньМесяцаТекущейДаты=Число(Лев(ТекущаяДата(),2));
ДокументВводитсяВТекущемМесяце=?(((ДатаДок>НачМесяца(ТекущаяДата())) и (ДатаДок<КонМесяца(ТекущаяДата()))),1,0);
Если (ДокументВводитсяВТекущемМесяце=1) и (ДеньМесяцаЗаписиДокумента<=16) и (ДеньМесяцаТекущейДаты>=16) Тогда
Предупреждение("Запрещено вводить документы раньше середины текущего месяца.");
СтатусВозврата(0);
Возврат;
КонецЕсли;
Для запрета просмотра в начале процедуры ПриОткрытии() документа вставляй:
ДеньМесяцаДокумента=Число(Лев(ДатаДок,2));
ДеньМесяцаТекущейДаты=Число(Лев(ТекущаяДата(),2));
Если ((ДатаДок<НачМесяца(ТекущаяДата())) или ((ДеньМесяцаДокумента<=16) и (ДеньМесяцаТекущейДаты>=16) )) Тогда
Форма.ТолькоПросмотр(1);
КонецЕсли;
Или заведи глобальную процедуру например глПриЗаписиДокумента(Конт) и глПриОткрытииДокумента(Конт) (если таких ещё нету), запихай туда это всё соответственно а в документах пиши также соответственно
глПриЗаписиДокумента(Контекст) и глПриОткрытииДокумента(Контекст)
з.с всё ответы в форуме сами приходят к тебе в ящик, если поставить флаг внизу при отправке сообщения
"
Читают тему
(гостей: 1)