Фреймы (кадры)

Для создания списка со сложной компоновкой страницы (например, содержащего управляющие элементы таблицы) проще всего использовать средства запроса АВАР/4, т.е. утилиту Query. Однако можно также воспользоваться и разнообразными средствами языка программирования АВАР/4, позволяющими сформировать специальную разметку страницы.

Например, для вывода на экран табличного списка, разделенного горизонтальными и вертикальными линиями, (т.е. для вывода фреймов) используются команда uline и системное поле sy-vline (см, рис. 17.18):

Рис. 17.18

Более сложная компоновка списка из трех фреймов

CONSTANTS MY_LINE_SIZE TYPE I VALUE 40. DATA SQUARE TYPE I.

NEW-PAGE LINE-SIZE MY_LINE_SIZE. ULINE.

FORMAT COLOR COL_HEADING. WRITE: / SY-VLINE,

'Numbers and their squares',

AT MY_LINE_SIZE SY-VLINE. FORMAT COLOR OFF. ULINE.

DO 20 TIMES.

SQUARE = SY-INDEX ** 2. WRITE: / SY-VLINE, SY-INDEX COLOR COL_KEY, SY-VLINE,

SQUARE,

AT MY_LINE_SIZE SY-VLINE. ENDDO.

ULINE.

В данном примере отчет распределяется по трем фреймам, в которые выводятся конкретные част списка с помощью команд, задающих горизонтальные (uline) и вертикальные (sy-vline) линии. Сначала корректируется размер строк списка, задаваемый числом my_line_size, которое следует после дополнения line-size команды new-page. Затем команда uline выводит на экран верхнюю горизонтальную линию заглавного фрейма, а команда format задает его цвет. Следующая команда write выводит текст заголовка, ограниченный двумя вертикальными линиями. Далее следует оператор uline, который одновременно