Таблица Integer

[mRazik]

Здравствуйте.

Мне нужно создать отчет, используя таблицу Integer, для вывода строк отчета(заранее будущее количество строк узнать нельзя). На OnPreDataItem я заполняю виртуальную таблицу необходимыми мне строками, как теперь мне вывести эти строки в отчет.

Заранее благодарен.

[Corleone]

Цитата:

Сообщение от mRazik_technologia

Здравствуйте.

Мне нужно создать отчет, используя таблицу Integer, для вывода строк отчета(заранее будущее количество строк узнать нельзя). На OnPreDataItem я заполняю виртуальную таблицу необходимыми мне строками, как теперь мне вывести эти строки в отчет.

Заранее благодарен.

Посмотри для начала репорт 111, там темповой таблицей является CustAmount.

[RedFox]

Цитата:

Сообщение от mRazik_technologia

Мне нужно создать отчет, используя таблицу Integer, для вывода строк отчета(заранее будущее количество строк узнать нельзя). На OnPreDataItem я заполняю виртуальную таблицу необходимыми мне строками, как теперь мне вывести эти строки в отчет.

При заполнении введи переменную-счетчик для подсчета записей.
А потом повтори вывод столько раз, сколько получилось записей (при этом на форме пропиши вывод того, что нужно).
Как только значение Integer будет превышено -> CurrReport.BREAK

[Yoil]

Цитата:

Сообщение от RedFox

При заполнении введи переменную-счетчик для подсчета записей.

А зачем счетчик, чем TempTable.COUNT не устраивает?

Цитата:

Как только значение Integer будет превышено -> CurrReport.BREAK

А зачем BREAK, вдруг еще футер нарисовать захочется...
Можно обойтись Integer.SETRANGE(Number, Number);

[Captain]

Цитата:

Сообщение от mRazik_technologia

Здравствуйте.

Мне нужно создать отчет, используя таблицу Integer, для вывода строк отчета(заранее будущее количество строк узнать нельзя). На OnPreDataItem я заполняю виртуальную таблицу необходимыми мне строками, как теперь мне вывести эти строки в отчет.

Заранее благодарен.

Integer -OnPreDataItem()

Integer.SETRANGE(Number,1, TempTable.COUNT);

Integer - OnAfterGetRecord()

IF Number=1 THEN BEGIN
TempTable.FIND('-')
END ELSE BEGIN
TempTable.NEXT;
END;

[mRazik]

Всем огромное спасибо, разобрался