параметры функции boSetTuneEx

[Гаврилюк Марина]

Вопрос такой: в отчете пишу

function boSetTuneEx (string, word, comp, boolean) : word;

boSetTuneEx('RGHTBL.NOUPDATE.CURSVAL',ttUser,0065000000000017h,true);
при компиляции тычет в 12 позицию и говорит, что ожидала параметр.

В чем дело и как правильно задать параметры этой функции?

[Den]

Да вродь все компиляется...что в .frm что в .vip

.form wfvwfrvr
.ard
.table blank
.var
li1: word;
.endvar
.begin
li1:=boSetTuneEx('Fin.User.cPlansSch',ttuser,0000000000000004h,true);
end.
.endform

[Гаврилюк Марина]

Версия 7.12:

.form tuneusers
.ard
.table blank
.var
li1: word;
.endvar
.begin
!_loop x$users
li1:=boSetTuneEx('RGHTBL.NOUPDATE.CURSVAL',ttuser,0065000000000017h,true);
if li1<>1
{
NoProtectRecord(#CURSVAL, true);
NoProtectRecord(#KLVAL, true);
}
else
{
ProtectRecord(#CURSVAL, true);
ProtectRecord(#KLVAL, true);
}
end.
.endform
Выдает ошибку ttuser,нет такой функции поля ли метода (позиция 50) строки li1:=boSetTuneEx('RGHTBL.NOUPDATE.CURSVAL',ttuser,0065000000000017h,true);

[Den]

Подключи в проекте сборки TUNES.INC. Там эта константа описана. Ну или прямо в форме

ttUSER = 0; // Пользователя
ttGroup = 1; // Группы

[Гаврилюк Марина]

Спасибо, откомпилировала только когда 0 напрямую указала вместо ttUser.