Галактика в вопросах и ответах

да, это нормально
в cfg не пробовал

Скомпилировалось даже без предупреждений, но захожу в Договора,открываю Отчеты пользователя и открывается окно "Отчеты пользователя" и Галка виснет намертво в 0%

Единственное, что могу вам предложить - прислать свой готовый проект.
У нас таких проблем не возникало.

function VisibleInModule(Ind : Byte) : String;
begin
VisibleInModule := ' ';
case Ind of
1 : VisibleInModule:='B_FINANS';
2 : VisibleInModule:='DOGOVOR';
end;

во всех аналогичных функциях с типом string должна быть строка аналогичная VisibleInModule := ' '; Эти функции вызываются в цикле до тех пока не вернут пустое значение - если пустое значение не возвращают никогда будет ваша ситуация.

proba.prj:

#define ComponentVersion
#make "Proba.vip"


proba.vip:

#include UserReport.vih
VipInterface UserReport_Proba Implements F_UserReport::IUserReport;
Interface UserReport_Proba;
create view;
procedure Run;
begin
Message('çá»π߬ «ΓτÑΓá ⁿ1');
end;
function GetReportName: String;
begin
GetReportName := 'ÉÑÑßΓα ñ«ú«ó«α«ó';
end;

function GetGroupName (Level : Word) : String;
begin
GetGroupName := ' ';
case Level of
1 : GetGroupName :='Реестр договоров';
end;
end;

function GetPriority : Integer;
begin
GetPriority := 0;
end;

function VisibleInModule(Ind : Byte) : String;
begin
VisibleInModule := ' ';
case Ind of
1 : VisibleInModule:='B_FINANS';
2 : VisibleInModule:='DOGOVOR';
end;
end;
end.

edward_K
Вроде у меня все так...же

vip 5.4.14

ну если вы точно копировали то у вас в кавычках пробел а значение должно быть '' .

А userreport.vih такой д.б для 8.10?

//------------------------------------------------------------------------------
// (c) Корпорация ГАЛАКТИКА
// (c) Галактика - Киев
//------------------------------------------------------------------------------
// Система : ГАЛАКТИКА
// Версия : 5.8x - 7.1x - 8.0
// Назначение : Интерфейс для вызова пользовательских отчетов
// Ответсвенный : Тищенко Роман Николаевич
// Изменения : Герман Юрий Эдуардович
//------------------------------------------------------------------------------

//------------------------------------------------------------------------------
// Возможные значения параметра ModuleID
//------------------------------------------------------------------------------
// ModuleID Версия Наименование модуля
//------------------------------------------------------------------------------
// AFPLAN Планирование финансов
// APLAN Управление проектами
// BUY Управление снабжением
// B_ACT Нематериальные активы
// B_BALANS Бухгалтерская отчетность
// B_FA Финансовый анализ
// B_FINANS ФРО
// B_HOZOP ХозОперации
// B_KASSA Касса
// B_KONSOL Консолидация
// B_OSN Основные средства
// B_VEKS Векселя и кредиты
// CONTROLLING 7.1x Контроллинг
// COPLAN 7.1x Корпоративное планирование
// CRM Клиент
// CUSTBANK Клиент-Банк
// DOCBAS Документооборот
// DOGOVOR Управление договорами
// DVS Давальческое сырье
// EXP_IMP Обмен бизнес-документами
// MANUFACTURE 5.8x Управление производственной логистикой
// 7.1x Учет в производстве
// MANUFPLAN Планирование производства
// MBP Учет спецоснастки, спецоборудования и спецодежды
// MENUAVT 5.8x Автотранспорт
// 7.1x Управление транспортом
// MENUMGTS Претензионно-исковая работа
// MENUZARP Заработная плата
// MNUMARKET Рекламные кампании
// NALOGREG Налоговый учет
// NASTR_G Настройка
// OFP Платежный календарь
// OTPRCONS Консигнация
// PARTNER Партнерский модуль
// POSTPOL Поставщики,получатели
// REMONT Управление ремонтами
// ROZN Розничная торговля
// SALEPLAN 7.1x Управление заказами
// SELL Управление сбытом
// SERVICE Сервисное обслуживание
// SFO Спецодежда
// SFP Управление бюджетом
// SKLAD Складской учет
// SKLAD2 Матценности
// STAFFMAINMENU Управление персоналом
// STROY Управление строительством
// SUPPLYPLAN 7.1x МТО
// TAXES Ведение налоговых расчетов
// TEP ТЭП
// TPP 5.8x ТПП
// 7.1x Спецификации продуктов
// UFZ Фактические затраты
//------------------------------------------------------------------------------

#ifdef Gal8_0
#Component "F_UserReport"
#end

#ifndef __UserReport_vih__
#define __UserReport_vih__

ObjInterface IUserReport;
// Запуск отчета на выполнение при выборе его из списка отчетов
procedure Run;
// Наименование отчета в списке
function GetReportName : String;
// Наименования групп, в которые входит отчет
// Группа n+1 делается подчиненной группе n
function GetGroupName (Level : Word) : String;
// Приоритет отчета - сортировка внутри группы выполняется сначала
// по приоритету, а затем по наименованию
function GetPriority : Integer;
// ModuleID модулей, в которых будет виден отчет
// '*' - отчет будет виден в любом модуле
function VisibleInModule (Ind : Byte) : String;
end;

#end

если не падает по рантайм то все нормально. В противном случае получали бы сообщения, что контрольная сумма не совпадает. Где то он в доке или в frm был.

Обратите внимание и сразу поймете в чем ошибка
в випе вы пишете

#define ComponentVersion
#include UserReport.vih

а в Vih следующая строка

#ifdef Gal8_0
#Component "F_UserReport"
#end

ComponentVersion<>Gal8_0 - это известные грабли

Т.е оставить только строчку #Component "F_UserReport" в vih?

все это не помогло. При компиляции выдает Предупреждение: Не задано имя компонента, компонентная принадлежность таблиц учитываться не будет (стр.3, поз.1 в X:\TmpFrm\ozi\Proba.vip)
│ Interface UserReport_Proba;

proba.prj:

#define ComponentVersion
#make "Proba.vip"

UserReport.vih:

#Component "F_UserReport"
#ifndef _UserReport_vih_
#define _UserReport_vih_
ObjInterface IUserReport;
procedure Run;
function GetReportName : String;
function GetGroupName (Level : Word) : String;
function GetPriority : Integer;
function VisibleInModule (Ind : Byte) : String;
end;
#end

proba.vip:

#include UserReport.vih
VipInterface UserReport_Proba Implements F_UserReport::IUserReport;
Interface UserReport_Proba;
create view;
procedure Run;
begin
Message('Запуск отчета №1');
end;
function GetReportName: String;
begin
GetReportName := 'Реестр договоров';
end;

function GetGroupName (Level : Word) : String;
begin
GetGroupName := '';
case Level of
1 : GetGroupName :='Реестры';
end;
end;

function GetPriority : Integer;
begin
GetPriority := 0;
end;

function VisibleInModule(Ind : Byte) : String;
begin
VisibleInModule := '';
case Ind of
1 : VisibleInModule:='B_FINANS';
2 : VisibleInModule:='DOGOVOR';
end;
end;
end.

Подключаю полученный рес - и ничего нет.Что-то никак не могу уловить, в чем ошибка. И рес маленький слишком, вроде как не все компилит... Атлантис 5.4.14 и вип соответственно такой же

Компилирую при помощи vip 5.4.14 версии
получаю 2 660 байт ресурс
результат - появляется ваша группа и мессага
Внимательно смотрите настройки компилятора или подключаемого ресурса(есть ли доступ, права, не перекрыт чем-то с тем же именем и т.д.).

Скопировала с фтп вип 5.4.14, набрала вручную UserReport.vih, убрала и вновь добавила в кфг строчку LicParam и в батнике убрала и прописала снова /linc=ddd

и все увидела. Все випы компилируются теперь.

Если честно - ничего не поняла. В чем причина была т.е.