FRN

[novichok]

Подскажите, где найти m-7p_fld.frn ?
Не могу скомпилировать акт приёма материалов М-7.

[Den]

Если его нет в FRM(в L_PrnSopr) то, полагаю, можно смело обратиться в ТП чтобы прислали какой нужно.

[edward_K]

В тп всяко нужно писать. Вообще все файлы для компиляции форм должны попадать в frm
а так держите от 9

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

.fields
  Номер

#ifdef _TOVN_DEI
  sPost1 sFIO1
#end

  Получатель
  Получатель_ОКПО

  if (Дата = Date(0,0,0), '', DateToStr(Дата, 'DD/MM/YYYY'))

#ifdef _TOVN_DEI
  Склад_Пол_Адрес
  Номер
  sPrihNaklNum
  sPrihNaklDate
#else
  Номер
  Номер
  if (Дата = Date(0,0,0), '', DateToStr(Дата, 'DD/MM/YYYY'))
#end

  Грузоотправитель + ' Адрес: ' + Грузоотправитель_Адрес + ' Тел: ' + Грузоотправитель_ТЕЛ
  Поставщик        + ' Адрес: ' + Поставщик_Адрес        + ' Тел: ' + Поставщик_ТЕЛ
  Грузополучатель  + ' Адрес: ' + Грузополучатель_Адрес  + ' Тел: ' + Грузополучатель_ТЕЛ

  if (Номер_Договора <> '', Номер_Договора,
    if (Основание <> '', Основание, ''))

  if (Дата_Договора <> Date(0,0,0), DateToStr(Дата_Договора, 'DD/MM/YYYY'),
    if (ДатаОснования <> Date(0,0,0), DateToStr(ДатаОснования, 'DD/MM/YYYY'), ''))

  // спецификация
#ifdef _TOVN_DEI
  ДлНазвание
#end

  KolGrM
  if (ЕД_ИЗМЕРЕНИЯ_ГРУЗОВЫХ_МЕСТ <> '', ЕД_ИЗМЕРЕНИЯ_ГРУЗОВЫХ_МЕСТ, ОтпЕд)
  Название
  УчЕд
  if (КолВес = 0, '', DoubleToStr(КолВес / 1000, Massa_Tn))

#ifdef _TOVN_DEI
  ДЕИ_Кол
  ДЕИ_Наим
#end

  // 3-я страница
  Склад_Пол
  Kredit

  // спецификация
#ifdef _TOVN_DEI
  if (wNSoprDoc = 2, sRaspNum,
    if (wNSoprDoc = 1, номер, ''))
#else
  номер
#end

#ifdef _TOVN_DEI
  ДлНазвание2
#end

  Название2
  КодМЦ2
  ОтпЕдАббр2
  DoubleToStr(КолФ2 , Kol_Pr)
  DoubleToStr(ЦНац2 , Cena_PrR)
  DoubleToStr(СтНац2, Cena_PrR)

#ifdef _TOVN_DEI
  ДЕИ2_Наим
  DoubleToStr(ДЕИ2_Кол, Kol_Pr)
  DoubleToStr(ДЕИ2_Цена, Cena_PrR)

  if (wItog < 2, '', DoubleToStr(TotKol, Kol_Pr))
  DoubleToStr(TotSum, Cena_PrR)

  sZakl

  // подписи
  sPost3  sFIO3
  sPost4  sFIO4
  sPost5  sFIO5

  // зав.складом
  sFIO2
#end

.endfields

[novichok]

edward_K , спасибо !
А от 8.1 есть?

[edward_K]

вам надо искать в своем каталоге frm в архивах или распаковать утилитой из "опыта" патч, если патчи ставите не патчманагером - это будет самое правильное. Между версиями отличия хоть и есть но обычно они идут с #IFDEF Gal9_1, а вот между патчами отличия могут быть существенные.

[novichok]

Прислали таки из техподдержки файл, но при компиляции вылазит ошибка:
не найден объект IPRNSHOWSCHET26, описывающий интерфейс вызова.

Что делать?

[edward_K]

ошибка или предупреждение? Это разные вещи. Судя по тексту предупреждение и значит оно что фейс IPRNSHOWSCHET26 не описан (vil обычно или в vih - здесь в L_SklRep.vil) и не найден в подключенных к компилятору ресах. Вариантов несколько как обычно - закоментить строку с runinterface, подключить нужный vil, добавить к вызову имя компоненты - в последнем случае предупреждение не уйдет, но при вызове не будет ругаться что нет такого фейса. Лично я за чистоту логов - это помогает вовремя разглядеть действительно проблемные предупреждения.