Найдено 1378 результатов

m0p3e
11 дек 2019, 16:37
Форум: Программирование
Тема: Утверждение приказов по персоналу: проверка доп. условий
Ответы: 16
Просмотры: 4063

Re: Утверждение приказов по персоналу: проверка доп. условий

Если право утверждать приказ не зависит от допусловий, то StrCont и StrPart не нужны. Просто false по настройке. :) С запретом ручного ввода сложнее. Вижу два варианта: 1. Докомпиляция интерфейсов по работе с ШР на предмет блокировки событий cmInsertRecord, cmUpdateRecord и т.д. или смены статуслайн...
m0p3e
25 ноя 2019, 15:15
Форум: Программирование
Тема: Утверждение приказов по персоналу: проверка доп. условий
Ответы: 16
Просмотры: 4063

Re: Утверждение приказов по персоналу: проверка доп. условий

Есть ли возможность получения значения ВА типа «признак»? Работа с boolean: function bGetAttr (_wTable : word; _cRec : comp; _Name : string) : boolean; function bGetAttrID (_wTable : word; _cRec : comp; _cAttrNam : comp) : boolean; function bSetAttr (_wTable : word; _cRec : comp; _Name : string; _V...
m0p3e
25 ноя 2019, 13:17
Форум: Программирование
Тема: Утверждение приказов по персоналу: проверка доп. условий
Ответы: 16
Просмотры: 4063

Re: Утверждение приказов по персоналу: проверка доп. условий

Сергей. Я работаю c Viper. Вы же показали компиляцию vip-ом. Куда ввести параметр для компиляции в данном случае? по Viper-у не подскажу, но Михаил писал на это: Поясню. Во первых, не галочу, а целую ссылку на целый файл. Подумали что еще одна ссылка на непонятный файл в окне настройки проекта буде...
m0p3e
25 ноя 2019, 12:38
Форум: Программирование
Тема: Утверждение приказов по персоналу: проверка доп. условий
Ответы: 16
Просмотры: 4063

Re: Утверждение приказов по персоналу: проверка доп. условий

Здравствуйте. Наконец приступила к разработке по теме. Начала с приема на работу. Столкнулась со следующим: 1. В инерфейсе докомпиляции приказа по РПД=1 в начале тоже поставила #component "Z_StaffOrders". Без него при компиляции получала ошибку: «В ресурсе нет интерфейса Vip_Pers::RPD_1 …...
m0p3e
12 сен 2019, 11:06
Форум: Программирование
Тема: Утверждение приказов по персоналу: проверка доп. условий
Ответы: 16
Просмотры: 4063

Re: Утверждение приказов по персоналу: проверка доп. условий

Там вроде есть точки расширения и до и после, проще их использовать На приказы по персоналу только две точки. #doc Утверждение приказа по персоналу #end ExtensionPoint epConfirmOrder (NrecTitleDoc : comp); #doc Удаление приказа по персоналу #end ExtensionPoint epDeleteOrder (NrecTitleDoc : comp); Д...
m0p3e
03 сен 2019, 12:13
Форум: Программирование
Тема: Утверждение приказов по персоналу: проверка доп. условий
Ответы: 16
Просмотры: 4063

Re: Утверждение приказов по персоналу: проверка доп. условий

Я тоже вижу два варианта. 1. Докомпилировать интерфейс OrdersList. В этом случае код будет работать для всех РПД, но структура самого интерфейса не очень удобна для работы. 2. Я бы пошел по другому варианту. Докомпилировать каждый РПД, для которого должно работать ограничение, отдельно. Добавляемый ...
m0p3e
28 авг 2019, 10:46
Форум: Программирование
Тема: Alter interface
Ответы: 60
Просмотры: 65363

Re: Alter interface

Без указания панели тоже будет работать, но несколько раз нарывался на двойной вызов стандартного обработчика без точного попадания.
m0p3e
27 авг 2019, 11:18
Форум: Программирование
Тема: Alter interface
Ответы: 60
Просмотры: 65363

Re: Alter interface

zna писал(а):Благодарю, получилось :-)
А

Код: Выделить всё

panel panPersons;
- откуда видно? Только в исходниках?
Да. В исходниках подсмотрено. :)
m0p3e
26 авг 2019, 17:31
Форум: Программирование
Тема: Alter interface
Ответы: 60
Просмотры: 65363

Re: Alter interface

.. а в ответ тишина.. Alter Interface RecWin01; panel panPersons; HandleEvent cmCheckField : { If inherited::handleevent(cmCheckField) = heAbort { Abort; } else { Case CurField Of #Persons.DisDate : { ..... }; }; }; end; //HandleEvent end; //panel END.
m0p3e
08 авг 2019, 10:35
Форум: Программирование
Тема: Убрать лишние СТАНДАРТНЫЕ формы
Ответы: 15
Просмотры: 6043

Re: Убрать лишние СТАНДАРТНЫЕ формы

Все уже мхом поросло. Тогда актуальной версией была вроде 5.82. У меня имелся актуальный атлантис. Благодаря его наличию появилась dll с паблик функцией дешифрации пароля и ExcelLib с поддержкой OpenOffice. Report_And_Group тоже менял (вроде в forms.dll располагался). Если не изменяет память, то пом...
m0p3e
01 июл 2019, 11:12
Форум: Программирование
Тема: Привязка кода к выбранной форме
Ответы: 5
Просмотры: 1120

Re: Привязка кода к выбранной форме

А если так?

Код: Выделить всё

cmValue55 : //Нажатие кнопки
{
 SetModified(true);
 If not UpdateTable
  {
   Message('Ошибка создания документа!',error);
   Exit;
  };
//Загружаем данные.
};
m0p3e
10 янв 2019, 12:08
Форум: Общие вопросы
Тема: С Новым годом!
Ответы: 34
Просмотры: 30953

Re: С Новым годом!

С Рождеством!
Пять. :)
m0p3e
21 дек 2018, 18:18
Форум: Программирование
Тема: Вид работы в приказах на прием и увольнение.
Ответы: 4
Просмотры: 1069

Re: Вид работы в приказах на прием и увольнение.

Irina_ писал(а):А skkRPD1VidRab - это константа?
Похоже на то. Инициализации в интерфейсе нет.
Чему равна сейчас не скажу - inc-ов от 9.10 под рукой нет.
m0p3e
21 дек 2018, 17:22
Форум: Программирование
Тема: Вид работы в приказах на прием и увольнение.
Ответы: 4
Просмотры: 1069

Re: Вид работы в приказах на прием и увольнение.

Как-то так: synonym Appointments disAppoint, synonym InfPsn1 InfPsn1PredSovm, synonym KlSovm KlSovmPred, and Persons.Nrec == disAppoint.Person and integer(100) == disAppoint.lPrizn and disAppoint.nRec == InfPsn1PredSovm.cPers and comp(skkRPD1VidRab) == InfPsn1PredSovm.cRef2 and word(InfPsn1PredSovm....