5.5.20 ТОРГ12 .. подскажите prj

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

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

Masygreen
Местный житель
Сообщения: 1089
Зарегистрирован: 04 сен 2008, 11:27
Откуда: Москва
Контактная информация:

5.5.20 ТОРГ12 .. подскажите prj

Сообщение Masygreen »

С каждыми патчами все сложнее и сложнее собирать что-либо ..((
Всю форму tovn (торг12 накладная на сбыт) растащили по #include ..
запарился подбирать подходящий prj ..
есть ряд вопросов:
1) как избавится от ошибки с ean, это строчка Ean13ToEanGnivcTTF(GenerateBarCodeEx(coKatSopr, накладная_нрек)) чего надо подключить
2) дошел что в prj надо вставить #define __PrnSoprFunMem__, без этого не собирается
3) дальше опять ошибки...разнообразные и бессмысленные ...
Время ведет!
Алексей
Местный житель
Сообщения: 2896
Зарегистрирован: 24 июн 2005, 12:12
Откуда: Иркутская область

Re: 5.5.20 ТОРГ12 .. подскажите prj

Сообщение Алексей »

патч распаковывали, там архив может быть есть с исходниками форм?
Masygreen
Местный житель
Сообщения: 1089
Зарегистрирован: 04 сен 2008, 11:27
Откуда: Москва
Контактная информация:

Re: 5.5.20 ТОРГ12 .. подскажите prj

Сообщение Masygreen »

вопрос не в исходниках ..вопрос в проекте

добавил в prj

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

#define __PrnSoprFunMem__
#define _PrnSoprFun_vih
#include PrnSoprMem.inc   
удалил из fields

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

 Ean13ToEanGnivcTTF(GenerateBarCodeEx(coKatSopr, накладная_нрек))
собралось...
Время ведет!
zna
Местный житель
Сообщения: 552
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Челябинск
Контактная информация:

Re: 5.5.20 ТОРГ12 .. подскажите prj

Сообщение zna »

Доброго всем, нашёл вот тему с похожей проблемой..
Пытаюсь пересобрать ТОРГ12 для накладной в сбыте.. не прокатывает..
У нас "Галактика "8.10 на Атлантисе 5.4.43, порылся в папке frm- исходника в rtf для торг12 не нашёл.
Получил по F4 "RTF_TORG12_TOVN.rtf", там первые строки- инклуды

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

.LinkForm ’RTF_TORG12__’ prototype is tovn					
.NameInList ‘Товарная накладная. Форма ТОРГ-12’
.group ’Накладные на продажу’
.group ’Накладные на продажу (fast)’
.group ’Акты на строительство’
#include format.frn
#include summa.frn
#include ttn_fun.frn
#include torg12var.frn
#include ttnf_var.frn
#include mfo.frn
#include org_decl.frn
#include torg12fld.frn
#include ttn_008.frn
.{
#include sum_calc.frn
#include ttn_init.frn
#include torg12_01.frn
...
Вопрос: как адекватно собрать проект prj?
Как у Masygreen не получилось, ошибки..
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5185
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Re: 5.5.20 ТОРГ12 .. подскажите prj

Сообщение edward_K »

1. Все frn должны идти в патчах
2. Вам нужно бы распаковать все архивы. Я делаю это вот так

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

""C:\GALAXY\DISTRIB\WINRAR\WINRAR.exe"  x -y -u C:\GALAXY\FRM\*.rar C:\GALAXY\Viper\Sources
"C:\GALAXY\DISTRIB\WINRAR\WINRAR.exe"  x -y -u C:\GALAXY\FRM\*.zip C:\GALAXY\Viper\Sources
А потом сгенерить пути как то так

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

for /r c:\GALAXY\VIPER\Sources %%i in (.) do @echo /i:%%~fi>> includes.txt
здесь c:\GALAXY\VIPER\Sources - папка куда распаковались инклюды
Обратите внимание, что в 910 теперь ZIP и rar при наличии похожего ZIP нужно из FRM убирать.
3. А самое главное - а чего за ошибки то? так можно долго тыкать пальцем в небо.
Masygreen
Местный житель
Сообщения: 1089
Зарегистрирован: 04 сен 2008, 11:27
Откуда: Москва
Контактная информация:

Re: 5.5.20 ТОРГ12 .. подскажите prj

Сообщение Masygreen »

edward_K писал(а):1. Все frn должны идти в патчах
2. Вам нужно бы распаковать все архивы. Я делаю это вот так

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

""C:\GALAXY\DISTRIB\WINRAR\WINRAR.exe"  x -y -u C:\GALAXY\FRM\*.rar C:\GALAXY\Viper\Sources
"C:\GALAXY\DISTRIB\WINRAR\WINRAR.exe"  x -y -u C:\GALAXY\FRM\*.zip C:\GALAXY\Viper\Sources
А потом сгенерить пути как то так

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

for /r c:\GALAXY\VIPER\Sources %%i in (.) do @echo /i:%%~fi>> includes.txt
здесь c:\GALAXY\VIPER\Sources - папка куда распаковались инклюды
Обратите внимание, что в 910 теперь ZIP и rar при наличии похожего ZIP нужно из FRM убирать.
3. А самое главное - а чего за ошибки то? так можно долго тыкать пальцем в небо.
По идее для этого служит "Galaktika\FRM\AllGal.FrmSrc.exe"
а как победить Ean13ToEanGnivcTTF(GenerateBarCodeEx(coKatSopr, накладная_нрек)) так и не разобрался, удаляю нафиг ..какой-то компонент надо подключать
По идее это реализуется в C_COMMON::o$EanBarCode.Ean13ToEanGnivcTTF

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

o$EanBarCode - Объектный интерфейс, автоматически создаваемый компилятором, при описании методов, свойств, индексов и/или потоков данных внутри vipInterface.
Автоматически реализуется объектом EanBarCode .
Время ведет!
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5185
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Re: 5.5.20 ТОРГ12 .. подскажите prj

Сообщение edward_K »

Для 1 нужно в проекте #include EanBarCode.vih
- она там как Static.
для 2 #include RepBarCode.vih
zna
Местный житель
Сообщения: 552
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Челябинск
Контактная информация:

Re: 5.5.20 ТОРГ12 .. подскажите prj

Сообщение zna »

Увидел, что папка Frm не из последнего патча.. А штрих- код не нужен, тоже удаляю.
Cпасибо.
zna
Местный житель
Сообщения: 552
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Челябинск
Контактная информация:

Re: 5.5.20 ТОРГ12 .. подскажите prj

Сообщение zna »

Подскажите, пож., где в папке FRM я могу найти загадочную форму ТОРГ12.rtf? Судя по прототипу TOVN, она должна быть в ..\FRM\L_PrnSopr\src\CompSrc\L\L_PrnSopr\frm, однако нету..
И ещё, папка FRM формируется из какого-то одного .acd архивного файла или из нескольких? Файл L_PRNSOPR_RES_810920.acd содержит комментарий- "Товарно-транспортные накладные в формате RTF (прототип TOVN)" - и где они..?
Для пестроты (опс.. полноты) картины нашёл ТОРГ12.rtf в ..\FRM\L_SoprDoc\src\CompSrc\L\L_SoprDoc\frm, но там прототип prihnkl - кстати, скомпилировался в момент, да вот только в накладных сбыта не видно.
А если по F4 из "Галактики" из Управления сбытом получить, то получаю RTF_TORG12_TOVN.rtf, которая не компилится..
RAJAH
Местный житель
Сообщения: 932
Зарегистрирован: 18 фев 2008, 12:49

Re: 5.5.20 ТОРГ12 .. подскажите prj

Сообщение RAJAH »

<<...>>FRM\L_PrnSopr.FrmSrc.zip\SRC\CompSrc\L\L_PrnSopr\frm\TTN_RUS\torg_12.rtf
zna
Местный житель
Сообщения: 552
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Челябинск
Контактная информация:

Re: 5.5.20 ТОРГ12 .. подскажите prj

Сообщение zna »

RAJAH писал(а):<<...>>FRM\L_PrnSopr.FrmSrc.zip\SRC\CompSrc\L\L_PrnSopr\frm\TTN_RUS\torg_12.rtf
Да, увидел! Копмилирую- получаю

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

---------------------------
Предупреждение
---------------------------
Возникло необработанное исключение
ExIfcBadCheckSum (ExRef)
несовпадение контрольной суммы ObjInterface L_PRNSOPR::objPrnSoprFun

"Да" - Продолжить, "Нет" - Отлаживать в окне отладчика
"Отмена" - Не выдавать больше это сообщение
---------------------------
Да   Нет   Отмена   
---------------------------
Может, что в prg файл добавить? Сейчас так:

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

#include galnet.inc
end;
#ifdef ComponentVersion
#component "L_SOPRDOC"
#end
#make "torg_12.rtf"
Но уже шаг вперёд- нет ошибок, "бессмысленных и беспощадных" :smile:
RAJAH
Местный житель
Сообщения: 932
Зарегистрирован: 18 фев 2008, 12:49

Re: 5.5.20 ТОРГ12 .. подскажите prj

Сообщение RAJAH »

Мало инклюдов! :grin:
Конкретно по ошибке выше - PrnSoprFun.vih. Дальше другие полезут.
zna
Местный житель
Сообщения: 552
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Челябинск
Контактная информация:

Re: 5.5.20 ТОРГ12 .. подскажите prj

Сообщение zna »

RAJAH писал(а):Мало инклюдов! :grin:
Конкретно по ошибке выше - PrnSoprFun.vih. Дальше другие полезут.
Ок, благодарю. Уже прогресс!
А весь проект может есть у кого??
RAJAH
Местный житель
Сообщения: 932
Зарегистрирован: 18 фев 2008, 12:49

Re: 5.5.20 ТОРГ12 .. подскажите prj

Сообщение RAJAH »

Удаляйте ненужное, весь проект незачем. Мне этих строк в проекте хватило:

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

...
const
#include GloConst.inc
end;
#include dictypes.def
#define __PrnSoprFunMem__
#include PrnSoprMem.inc
#include ExtAttr.Vih
#include PrnSoprFun.vih
#include ExtClass.vih
...
zna
Местный житель
Сообщения: 552
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Челябинск
Контактная информация:

Re: 5.5.20 ТОРГ12 .. подскажите prj

Сообщение zna »

Движение вперёд есть, собираю так:

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

const
#include GloConst.inc
end;
#include dictypes.def
#define __PrnSoprFunMem__
//#include PrnSoprMem.inc   //Не нашёл этот файл- вроде и без него компилится
#include ExtAttr.Vih
#include PrnSoprFun.vih
#include ExtClass.vih
Теперь скомпилировалось без ошибок, но при запуске нового отчёта из "Галактики" имею

Возникло необработанное исключение
ExObjIfcNoLoad (ExRef)
ошибка загрузки объекта из ресурсного файла(OTCHCLAIM::iPrnSoprFun)
, хотя файл PrnSoprFun.vih есть.
Похоже, что-то с наименованиями компонент.. изменил проект немного

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

..
#ifdef ComponentVersion
#component "OTCHCLAIM"
#include PrnSoprFun.vih
#end
..
Ошибка не ушла
Возникло необработанное исключение
ExObjIfcNoLoad (ExRef)
ошибка загрузки объекта из ресурсного файла(iPrnSoprFun)

.. идеи иссякли..help me..
Последний раз редактировалось zna 05 дек 2016, 10:26, всего редактировалось 1 раз.
Ответить