временные таблицы в vipere
Добавлено: 09 фев 2011, 16:43
суть проблемы. Пытаюсь создать в форме временную таблицу, таблицу описал в файле проекта, компилирую в vipere, компилятор ругается, что временная таблица не описана в словаре. Ломаю файл со структурой таблицы, компилятор ругается, из этого делаю вывод, что структура грузится.
Не могу понять в чем проблема!!!
есть файл проекта
#define ComponentVersion
#ifdef ComponentVersion
#component "F_UserReport"
#end
#include tab.tbl //загрузка структуры таблицы
#make "C:\Double.frm"
#make "C:\example.vip"
структура таблицы
table struct ggg
(
nrec :comp,
bd ate,
fio :string,
ad ate,
dep :string,
post :string,
har :string,
naikat :string
)
with index
(
ggg01 = nrec (AutoInc, Unique),
ggg02 = dep+post+fio
);
.autoform 'form_cat'
.NameInList 'Сотрудники (Фильтр по категориям)'
.f 'NUL'
.var
beg_date: date
cat_name,har_name:string;
ccount, hcount:Longint;
CatMarker,HarMarker:LongInt;
rec_cat, rec_har, beg_num, wrow_max, n_pod :word;
item_cat,item_har:comp;
.endvar
.CREATE VIEW v1 as select *
from APPOINTMENTS a, persons p, catalogs c_dep, catalogs c_post, catalogs c_har, KLKAtego kl
where ((
a.person /== p.nrec
and a.DEPARTMENT == c_dep.nrec
and a.post == c_post.nrec
and a.EMPCATEGORY == kl.nrec
and a.KINDAPP == c_har.nrec
)) and (a.DISMISSDATE>=beg_date or a.DISMISSDATEate(0,0,0))
and a.APPOINTDATE<=beg_date
and comp(item_cat)=kl.nrec
and comp(item_har)=c_har.nrec;
.CREATE VIEW v2 as select *
from ggg;
при обращении из формы говорит что таблицы не описана в словаре
Не могу понять в чем проблема!!!

есть файл проекта
#define ComponentVersion
#ifdef ComponentVersion
#component "F_UserReport"
#end
#include tab.tbl //загрузка структуры таблицы
#make "C:\Double.frm"
#make "C:\example.vip"
структура таблицы
table struct ggg
(
nrec :comp,
bd ate,
fio :string,
ad ate,
dep :string,
post :string,
har :string,
naikat :string
)
with index
(
ggg01 = nrec (AutoInc, Unique),
ggg02 = dep+post+fio
);
.autoform 'form_cat'
.NameInList 'Сотрудники (Фильтр по категориям)'
.f 'NUL'
.var
beg_date: date
cat_name,har_name:string;
ccount, hcount:Longint;
CatMarker,HarMarker:LongInt;
rec_cat, rec_har, beg_num, wrow_max, n_pod :word;
item_cat,item_har:comp;
.endvar
.CREATE VIEW v1 as select *
from APPOINTMENTS a, persons p, catalogs c_dep, catalogs c_post, catalogs c_har, KLKAtego kl
where ((
a.person /== p.nrec
and a.DEPARTMENT == c_dep.nrec
and a.post == c_post.nrec
and a.EMPCATEGORY == kl.nrec
and a.KINDAPP == c_har.nrec
)) and (a.DISMISSDATE>=beg_date or a.DISMISSDATEate(0,0,0))
and a.APPOINTDATE<=beg_date
and comp(item_cat)=kl.nrec
and comp(item_har)=c_har.nrec;
.CREATE VIEW v2 as select *
from ggg;
при обращении из формы говорит что таблицы не описана в словаре