Гость
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Visual FOX / 2 сообщений из 2, страница 1 из 1
05.09.2011, 16:55
    #37425728
alm2
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Visual FOX
Есть отчет
В нем в разделе SUMMARY - итоговая сумма
Как настроить, чтобы она не оставалась ОДНОЙ на последнем листе, а в этом случае УМЕЩАЛАСЬ на предыдущем листе.

Сейчас в зависимости от объема таблиц - бывает, на последнем листе - только итог
...
Рейтинг: 0 / 0
05.09.2011, 17:21
    #37425788
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Visual FOX
Можно сделать, чтобы последняя строка отчета переносилась на следующую страницу вместе с итогом. "Ужать" итог, чтобы он уместился на последней странице - невозможно.

Чтобы перенести последнюю строку отчета на следующую страницу вместе с итогом необходимо

1. ДО выполнения отчета каким-либо образом определить, какая запись будет последней. Например, последней будет записи с Id = 100

2. В условии печати ВСЕХ объектов полосы деталировки (Print When) ставится условие печатать только НЕ последнюю страницу (id <> 100) и ставится галка "Remove if blank"

3. Полоса деталировки полностью копируется в итоговую полосу

В результате имеем, что последняя полоса деталировки печатается не как собственно деталировка, а как своеобразная "шапка" итоговой полосы. Причем вместе. На той же самой странице или на следующей - уже не важно.

Да, признак последней записи можно записать в переменную памяти. Переменные с областью видимости PRIVATE будут "видны" в отчете

Код: plaintext
1.
2.
3.
4.
PRIVATE pnLastRecordId
pnLastRecordId =  100 

REPORT FORM MyReport.frx

В таком синтаксисе переменная pnLastRecordId будет "видна" внутри отчета. Тогда и условие можно писать в виде

Код: plaintext
Print When = [id <> m.pnLastRecordId]
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Visual FOX / 2 сообщений из 2, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]