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

Добрый день! Имеется интрфейс (Test.vip): Interface kvit; create view; end. #make.prj #component 'Z_STAFF' #make '*.vip' Цепляю ресурс, запускаю Гал-ку, выбираю в списке интерфейсов (Запуск внешеного интрфейса) Z_STAFF::KVIT (kvit.res) Жму Enter и ничего не запускается :-? Никаких ошибок... Не подск...

Как-то странно получается....
Вы связываете BaseDoc с таблицами
И тут же пытаетесь вставить в BaseDoc данные из этих таблиц

Подцепки для создания ДО ?
Зачем?

SergZol

Так работает, думал по проще можно

Куда еще проще-то?

При Выборе в интерфейсе яж уже нахожусь на нужной позиции, а приходится еще делать GetFirst

Это в интерфейсе выбора вы находитесь на нужной позиции, а в своем интерфейсе нужно спозиционироваться

cgDoc_0001 = 1; .... cgDoc_0017 = 17; .function GetSoprDoc(Tidk : word; cSopr : comp) : string; // результат в зависимости что вам нужно begin GetSoprDoc := ''; case Tidk of cgDoc_0001..cgDoc_0011, cgDoc_0017, cgDoc_0018, cgDoc_0021, cgDoc_0022, cgDoc_0027, cgDoc_0030..cgDoc_0033, cgDoc_0037..cgDoc_...

А зачем делать несколько логических таблиц : можно написать свою функцию в которой воспользоваться case'ом по типам документов.

В интерфейсеOborot именно так это и реализовано (редактирование первичного документа)

А что вы хотите сделать?


Если вопрос касается бухгалтерского контура, то там не так уж много таблиц, ссылающихся на KatDoc : BaseDoc, KatSopr, PlPor и проводки Oborot

Попробуйте через таблицу в памяти, с соответствующим индексом по дате

Эту же функцию я так понимаю в паскалевских модулях нужно искать?

> Hmyrii

Почему ничего удивительного? в Str_2 - должна строка вернуться
function oem2utf8 (Str_1, Str_2) : Integer

FinInter.vih > #ifdef Gal8_5 #warning Подключение FinInter.vih необходимо заменить на соответсвующий .vih-файл #end !------------------------------------------------------------------------------- #ifndef _FININTER_VIH #define _FININTER_VIH #include FinTypes.vpp #include BFManager.vih #include PlatD...

Да, забыл

Synonym NOTES DisNOTES

По крайнер мере для Гал-ки 7.12 это было так:

cKadryDisNotes = 3002;

//Примечание для увольнения
cKadryDisNotes == DisNOTES.CHOICE and
Persons.NREC == DisNOTES.OWNER and

Добрый день всем! Скажите пожалуйста, а кто-нибудь пробовал компилировать иконки для своих фейсов? А то я что-то попробовал:, компиляция файла с bmp-картинкой проходит успешно mybitmap bitmap "C:\Galaxy.bmp" ...... затем делаю #iconName "mybitmap"; А он мне: Нет в ресурсах пиктог...

а что есил попробовать так: Interface Select_Nach 'Выбор' EscClose, Cyan; show at (,,,); var sel : longint; ino : longint; view as select * from table order o1 by table.f1; parameters sel; browse b1 (,,sci1EnIns); fields table.f1 'Ф1':[3],protect, {Font={bold=searchmarker(sel,table.nrec,ino)}}; tabl...