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

niteo

Красивая конструкция {?Internal;SearchMarker(DepartmentMarker,vBD.Persons.Department,i) Я даже и не подумал что так просто можно решить сию проблему. А вот так с сортировкой по подразделениям: .create view vBD SELECT persons.fio, persons.department FROM persons, catalogs WHERE (( 'С'==Persons.IsEmpl...

niteo

Вообщем выводит отчет, в нем строки: persons = persons = persons = persons = и так до конца отчета. отчет большой. Если не трудно, объясните как происходит механизм изменения подцепки в приведенном вами выше примере??? То есть как я понимаю, использование баундса, позволяет изменять условие WHERE. Э...

niteo

Наверное что то не так.... Завис снова при выполнении. не могли бы "разжевать" вот этот кусочек кода: .{?internal; cnt > 0; .fiedls vBD.persons.fio .endfields .{while i < cnt .begin if getmarker(DepartmentMarker, i, D) {} end. .{table 'vBD' persons = ^ .} //.{table 'vBD' .} .}//.{?internal...

niteo

У меня почему то тут "спотыкается" компилятор:

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

.{while i < cnt
.begin
	if getmarker(DepartmentMarker, i, D) then
end.
.{table 'vBD'
	persons = ^
.} //.{table 'vBD'

.}

Грит: ожидалась, Константа, Функция, поле .....
На строчке

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

end.

niteo

Вот такой код получился .form 'ODKrepSP' .nameinlist 'Отчет СП' .ard .var Cnt, i: longint; D : comp; DepartmentMarker: longint; str : string; .endvar .create view vBD SELECT persons.fio, persons.tabnmb, catalogs.name FROM persons, catalogs WHERE (( 'С' == persons.ISEMPLOYEE and catalogs.nrec /== per...

niteo

вот пробую делать так: .{ margin while i < cnt .begin if getmarker(DepartmentMarker, i, D) then getfirst persons where ((D /== persons.department and 'С' == persons.isemployee)); i := i + 1; str := persons.fio; end. persons = ^ .} Клиент после запуска отчета зависает. Грит тока - формирую отчет. и н...

niteo

Возник вопрос, как лучше в ARD изменить подцепку(выборку) если используется маркер.
Как я понял мне необходимо будет заполнить временную таблицу значениями из маркера, и использовать баундс?

niteo

Да, скорее всего вы оказались правы. Запустил в другом клиенте, все получилось. Хотя я удалял свой DSK но это не помогло, думаю надо было еще удалить tmp, но в данный момент этот клиент использовали другие пользователи.... Спасибо вам.

niteo

KATZ писал(а):DSK почистить пробовали?

Я так понимаю, что мне необходимо удалить ранее созданный маркер? Если да то есть процедура DeleteMarker, но она принимает первым параметром уникальный идентификатор маркера. а его у меня нету

niteo

Решил продолжить тему. Подскажите где я ошибаюсь...? Вызываю интерфейс из ard отчета, в нем вызываю другой интерфейс, вот код: interface dialogtest 'dialogtest'; // create view; var cpodr: comp; mes: integer; god: integer; DepartmentMarker: longint; DepartmentFilterStr: string; screen scrtest; field...

niteo

Всем огромное спасибо.

niteo

Доброго дня. Вы не уточните где можно скачать эту документацию?

niteo

Вот что написано в файле лицензии: Список доступных контуров { OL_ADMIN FASTREPORT FCENVMAIN JOURNALMENU PROTECTMENU REPOSITORY SQLMAIN ST_ALONE ARMRESOURCE BTMAINMENU GALAGRAFMAIN OBJBROWSERMENU REPAIRMENU } При добавлении в проект #component "F_USERREPORT" размер исходного файла увеличил...

niteo

все же остались вопросы по компиляции.... Что может означать это сообщение компилятора?

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

dialogtest2.vip(1) Предупреждение: Не задано имя компонента, компонентная принад
лежность таблиц учитываться не будет (стр.1, поз.1 в dialogtest2.vip)
interface dialogtest 'dialogtest'; //
^

niteo

Да, все верно. Лицензия на VIP истекла. Как то странно система сигнализирует об истечении срока лицензии

Всем большое спасибо за ответы. Думаю пока лицензия не обновиться делать дальнейшие предположения о неработоспособности - бессмысленно.

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

Найден 151 результат

Маркер и Изменение подцепки