Страница 2 из 2
Добавлено: 23 дек 2009, 15:48
Diman
m0p3e спасибо большое, кажется заработало, правда пока склоняет неверно, но это уже мелочи))))
Добавлено: 23 дек 2009, 18:01
Diman
Ребята, опять проблема, отчет компилился нормально, но при запуске из самой галактики выдается предупреждение ExObjIfcNoInit
Вставил функцию GetVipRef(iOdecl,’odeclension’);, при компиляции support стал выдавать ошибку и сам закрываться.Может как-то по другому нужно?
Добавлено: 23 дек 2009, 18:39
m0p3e
У меня даже без GetVipRef - это чудо научнотехнической мысли под названием FCOM валится с рантаймом при компиляции.
Добавлено: 23 дек 2009, 18:40
Diman
Это значит, что выхода нет?
Добавлено: 23 дек 2009, 18:42
m0p3e
Работать обязано. Просто с бубном не под тем углом стоим.
Добавлено: 23 дек 2009, 19:22
m0p3e
Вот такой отчет собирается/запускается?
Код: Выделить всё
.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
Добавлено: 23 дек 2009, 19:42
Diman
Нет, не компилируется, пишет , что ожидается конец строчки .Form 'DeclTest' и тд.
Добавлено: 23 дек 2009, 19:51
m0p3e
Смотрим внимательно, что скопировано. Должен он работать.
В своей же форме нужно добавить строчку
.declare
#define ComponentVersion
#include odecl.vih
.enddeclare
Добавлено: 24 дек 2009, 11:34
Diman
Текущая ситуация такая: вставил #define ComponentVersion в свою форму, компилятор опять ругаеццо: Синтаксическая ошибка в директиве макропроцессора
Добавлено: 24 дек 2009, 12:04
m0p3e
Либо синтаксическия ошибка, либо инструментарий совсем старый. Какая версия саппорта?
Добавлено: 24 дек 2009, 13:17
Diman
Support 5.4.14
Добавлено: 24 дек 2009, 13:24
m0p3e
Можно вашу форму мне на m0p3e(at)mail.ru
Добавлено: 24 дек 2009, 13:40
edward_K
#define ComponentVersion
надо наверное перед формой ставить.
я когда то писал для fcom #include predefs.inc - большиству форм это хватало - давно только то было - на 810 не покатит наверное.
Добавлено: 24 дек 2009, 14:18
m0p3e
edward_K писал(а):#define ComponentVersion
надо наверное перед формой ставить.
Ага. Именно так. Хотя при компиляции ВИП-ом и из блока .define .enddefine скушала. Стойкая аллергия у меня на FCOM еще с до-VIP времен.
Добавлено: 24 дек 2009, 14:45
Diman
Всем большое спасибо,особенно m0p3e! Сейчас все четко работает!