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

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Diman
Постоянный гость
Сообщения: 56
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Волгоград Филиал ОАО "Связьтранснефть" НВ ПТУС отдел ОИТ

Сообщение Diman »

m0p3e спасибо большое, кажется заработало, правда пока склоняет неверно, но это уже мелочи))))
Diman
Постоянный гость
Сообщения: 56
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Волгоград Филиал ОАО "Связьтранснефть" НВ ПТУС отдел ОИТ

Сообщение Diman »

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

Вставил функцию GetVipRef(iOdecl,’odeclension’);, при компиляции support стал выдавать ошибку и сам закрываться.Может как-то по другому нужно?
m0p3e
Местный житель
Сообщения: 1386
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва

Сообщение m0p3e »

У меня даже без GetVipRef - это чудо научнотехнической мысли под названием FCOM валится с рантаймом при компиляции. :)
Diman
Постоянный гость
Сообщения: 56
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Волгоград Филиал ОАО "Связьтранснефть" НВ ПТУС отдел ОИТ

Сообщение Diman »

Это значит, что выхода нет? :???:
m0p3e
Местный житель
Сообщения: 1386
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва

Сообщение m0p3e »

Работать обязано. Просто с бубном не под тем углом стоим.
m0p3e
Местный житель
Сообщения: 1386
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва

Сообщение 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
Diman
Постоянный гость
Сообщения: 56
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Волгоград Филиал ОАО "Связьтранснефть" НВ ПТУС отдел ОИТ

Сообщение Diman »

Нет, не компилируется, пишет , что ожидается конец строчки .Form 'DeclTest' и тд.
m0p3e
Местный житель
Сообщения: 1386
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва

Сообщение m0p3e »

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

.declare
#define ComponentVersion
#include odecl.vih
.enddeclare
Diman
Постоянный гость
Сообщения: 56
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Волгоград Филиал ОАО "Связьтранснефть" НВ ПТУС отдел ОИТ

Сообщение Diman »

Текущая ситуация такая: вставил #define ComponentVersion в свою форму, компилятор опять ругаеццо: Синтаксическая ошибка в директиве макропроцессора
m0p3e
Местный житель
Сообщения: 1386
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва

Сообщение m0p3e »

Либо синтаксическия ошибка, либо инструментарий совсем старый. Какая версия саппорта?
Diman
Постоянный гость
Сообщения: 56
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Волгоград Филиал ОАО "Связьтранснефть" НВ ПТУС отдел ОИТ

Сообщение Diman »

Support 5.4.14
m0p3e
Местный житель
Сообщения: 1386
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва

Сообщение m0p3e »

Можно вашу форму мне на m0p3e(at)mail.ru
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5188
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Сообщение edward_K »

#define ComponentVersion
надо наверное перед формой ставить.
я когда то писал для fcom #include predefs.inc - большиству форм это хватало - давно только то было - на 810 не покатит наверное.
m0p3e
Местный житель
Сообщения: 1386
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва

Сообщение m0p3e »

edward_K писал(а):#define ComponentVersion
надо наверное перед формой ставить.
Ага. Именно так. Хотя при компиляции ВИП-ом и из блока .define .enddefine скушала. Стойкая аллергия у меня на FCOM еще с до-VIP времен. :)
Diman
Постоянный гость
Сообщения: 56
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Волгоград Филиал ОАО "Связьтранснефть" НВ ПТУС отдел ОИТ

Сообщение Diman »

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