Ошибка при компилировании LinkForm SCHFREES

[Daiver]

Добрый день!
Помогите, пожалуйста, разобраться

В модуле
Сбыт –> наши счета-фактуры,

Cчета-фактуры, которые были разработаны на основе SCHFREES
cтали формироваться с ошибкой о несовпадении с формой прототипом.
Формы прототипа на сервере нет.
Скомпилировать присоединенную форму, которая входит в поставку, например, 'Счет-фактура (формат A4) ‘ тоже не удалось:

Обшибка:ожидалось имя или описание типа ( стр 239, поз.30 в С:\GAl810\Data\Tmp\Tem.frm) var iCountry:MCOriginCounry

Данное сообщение выводится при компиляции присоед. форм

.LinkForm 'SCHFREES_48' Prototype is 'SCHFREES'
.Group 'Бланки счетов-фактур (c 15.03.2001)'
.NameInList 'Счет-фактура (формат A4)'

.LinkForm 'SCHFREES_410' Prototype is 'SCHFREES'
.Group 'Бланки счетов-фактур (c 15.03.2001)'
.NameInList 'Счет-фактура (формат A4, с учетом подразделений)'

.LinkForm 'SCHFREES_412' Prototype is 'SCHFREES'
.Group 'Бланки счетов-фактур (c 15.03.2001)'
.NameInList 'Счет-фактура (расчетная ставка)'


Такая ошибка

Обшибка:Нет такой функции, поля или метода:ZEROFATE( стр 209,опз.49 в
С:\GAl810\Data\Tmp\Tem.frm)
if NOT(((vSchf.SchFact.dReg <>ZeroDate) AND vSchf.PlPor.DatOb <=vSchf.SchFact.dReg)

выводится при компиляции форм

.LinkForm 'SCHFREES_71' Prototype is 'SCHFREES'
.Group 'Бланки счетов-фактур (с 11.05.2006)'
.NameInList 'Счет-фактура (формат A4)'

.LinkForm 'SCHFREES_73' Prototype is 'SCHFREES'
.Group 'Бланки счетов-фактур (с 11.05.2006)'
.NameInList 'Счет-фактура (формат A4, с учетом подразделений)'

.LinkForm 'SCHFREES_76' Prototype is 'SCHFREES'
.Group 'Бланки счетов-фактур (с 11.05.2006)'
.NameInList 'Счет-фактура (формат A4 с почтовым адресом)'

Каким образом можно найти прототип формы и что делать с присоединенными формами, написанными на основе
Присоединенных форм?

[k_vit]

MCOriginCounry - это объектный интерфейс.

найдите файл MCOriginCounry.vih и сделайте в проекте

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

#include MCOriginCounry.vih

К тому же в форме могуть быть и другие включения.

[Daiver]

А где обычно этот файл MCOriginCounry.vih должен лежать, простым поиском почему то не удалось найти.

[Masygreen]

MCOriginCountry.vih

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

#define ComponentVersion 
#ifndef __MCORIGINCOUNTRY_VIH 
#define __MCORIGINCOUNTRY_VIH 
#ifdef ComponentVersion 
#Component "L_SF" 
#endif 
ObjInterface IMCOriginCountry; 
  function getCountryName(cMC: comp; cParty: comp): string; 
  function getGTDNumber(cParty: comp): string; 
end; 

VipInterface MCOriginCountry implements IMCOriginCountry; 

#end

[Daiver]

После включения строки в проект, при компиляции появляется сообщение
" Нет такой функции,поля или метода
#Component ( стр 5 поз 12 ...)"

[Masygreen]

в проектный файл
#include MCOriginCountry.vih

также можно добавить


#include PreDefs.inc
#include GloDefs.inc

#include galnet.ccm
#include galnet.csc
#include fldcolor.inc
#include gloconst.inс
#include mark.inc
end;

[Masygreen]

также можно добавить


#include PreDefs.inc
#include GloDefs.inc

#include galnet.ccm
#include galnet.csc
#include fldcolor.inc
#include gloconst.inс
#include mark.inc
end;

[Polimer]

А где обычно этот файл MCOriginCounry.vih должен лежать, простым поиском почему то не удалось найти.

\src\CompSrc\L\L_BaseDoc\vip

[Masygreen]

опа .. это я так понял про 5.4.14??
если да то ZeroDate в CommonC.inc
но потом встает вопрос с функцией IsKassaPrihod которая лежитв TiDkInfo.vih
тока блин что дальше делать неясно ..у мя тоже не собралось

хотя если закоментить строку с этой функцией все будет ок...
но наверно делать этого нельзя .. т.к. сделано для нового НК
вобщем если победишь отипши!

[jornand]

С ZeroDate тоже столкнулся, кучу inc-ов подключал, но так и не собрал. Если соберёшь, напиши что подключал! Тоже очень надо!

[Masygreen]

ZeroDate = date(0,0,0)

[Gameus_]

5.4.14 пробуем скомпилить стандартную форму


c:\compil>c:\Gal810\exe_test\vip.exe VIP.PRJ /r:sch_fact_otgr_08.res
Interface compiler. Версия 5.4.14 (c) 1992-2008, корпорация "Галактика"

SFBLANK02.RTF(325) Предупреждение: Несовпадение структуры формы прототипа "SCHFREES" и присоединенной формы "SFBLANK_RTF_02" (стр.325, поз.9 в SFBLANK02.RTF)
.endform
^

SFBLANK02.RTF(328)
SFBLANK02.RTF(7)
c:\compil\vip.prj(7)
c:\compil\vip.prj

vip.prj
#include MCOriginCounry.vih
#make "sfblank02.rtf"

[Polimer]

1. Форма старая, какое число?
2. Ресурсники старые подключены.

[Gameus_]

sfblank02.rtf от 12.10.2006 (из новой \FRM\CompSrc\L\L_SF\frm\)
ресурсники все новые

[Polimer]

Должен быть от 20.12.2008
Не забывайте копировать с компьютера(куда ставите патчи) новые прототипы из папки FRM.