Проблема с отчетом

Diman · Сообщение **Diman** » 23 дек 2009, 15:48

m0p3e спасибо большое, кажется заработало, правда пока склоняет неверно, но это уже мелочи))))

Diman · Сообщение **Diman** » 23 дек 2009, 18:01

Ребята, опять проблема, отчет компилился нормально, но при запуске из самой галактики выдается предупреждение ExObjIfcNoInit

Вставил функцию GetVipRef(iOdecl,’odeclension’);, при компиляции support стал выдавать ошибку и сам закрываться.Может как-то по другому нужно?

m0p3e · Сообщение **m0p3e** » 23 дек 2009, 18:39

У меня даже без GetVipRef - это чудо научнотехнической мысли под названием FCOM валится с рантаймом при компиляции.

Diman · Сообщение **Diman** » 23 дек 2009, 18:40

Это значит, что выхода нет?

m0p3e · Сообщение **m0p3e** » 23 дек 2009, 18:42

Работать обязано. Просто с бубном не под тем углом стоим.

m0p3e · Сообщение **m0p3e** » 23 дек 2009, 19:22

Вот такой отчет собирается/запускается?

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

.form 'DeclTest'
.NameInList 'Проверка склонения'
.ard
.declare
#define ComponentVersion
#include odecl.vih
.enddeclare
.var
 iDecl : Declension;
.endvar
.create View P var PersNrec : comp as select nrec, FIO from Persons where (( PersNrec == Persons.nrec ));
.begin
 RunInterface('F_Podot::GetPers',P.PersNrec);
end.
.{table 'P:MAIN'
.fields
 iDecl.FIOdeclension(P.Persons.nrec,P.Persons.FIO,1)
 iDecl.FIOdeclension(P.Persons.nrec,P.Persons.FIO,2)
 iDecl.FIOdeclension(P.Persons.nrec,P.Persons.FIO,3)
 iDecl.FIOdeclension(P.Persons.nrec,P.Persons.FIO,4)
 iDecl.FIOdeclension(P.Persons.nrec,P.Persons.FIO,5)
 iDecl.FIOdeclension(P.Persons.nrec,P.Persons.FIO,6)
.endfields
 ^
 ^
 ^
 ^
 ^
 ^
.}
.endform

Diman · Сообщение **Diman** » 23 дек 2009, 19:42

Нет, не компилируется, пишет , что ожидается конец строчки .Form 'DeclTest' и тд.

m0p3e · Сообщение **m0p3e** » 23 дек 2009, 19:51

Смотрим внимательно, что скопировано. Должен он работать.
В своей же форме нужно добавить строчку

.declare
#define ComponentVersion
#include odecl.vih
.enddeclare

Diman · Сообщение **Diman** » 24 дек 2009, 11:34

Текущая ситуация такая: вставил #define ComponentVersion в свою форму, компилятор опять ругаеццо: Синтаксическая ошибка в директиве макропроцессора

m0p3e · Сообщение **m0p3e** » 24 дек 2009, 12:04

Либо синтаксическия ошибка, либо инструментарий совсем старый. Какая версия саппорта?

Diman · Сообщение **Diman** » 24 дек 2009, 13:17

Support 5.4.14

m0p3e · Сообщение **m0p3e** » 24 дек 2009, 13:24

Можно вашу форму мне на m0p3e(at)mail.ru

edward_K · Сообщение **edward_K** » 24 дек 2009, 13:40

#define ComponentVersion
надо наверное перед формой ставить.
я когда то писал для fcom #include predefs.inc - большиству форм это хватало - давно только то было - на 810 не покатит наверное.

m0p3e · Сообщение **m0p3e** » 24 дек 2009, 14:18

edward_K писал(а):#define ComponentVersion
надо наверное перед формой ставить.

Ага. Именно так. Хотя при компиляции ВИП-ом и из блока .define .enddefine скушала. Стойкая аллергия у меня на FCOM еще с до-VIP времен.

Diman · Сообщение **Diman** » 24 дек 2009, 14:45

Всем большое спасибо,особенно m0p3e! Сейчас все четко работает!