This document describes various ways of controlling the
display of column headers produced by a DISPLAY statement.
The following topics are covered:
By default, each database field output with a
DISPLAY statement is
displayed with a default column header (which is defined for the field in the
DDM).
** Example 'DISPLX01': DISPLAY ************************************************************************ DEFINE DATA LOCAL 1 VIEWEMP VIEW OF EMPLOYEES 2 PERSONNEL-ID 2 NAME 2 BIRTH 2 JOB-TITLE END-DEFINE * READ (3) VIEWEMP BY BIRTH DISPLAY PERSONNEL-ID NAME JOB-TITLE END-READ END
Output of Program DISPLX01:
The above example program uses default headers and produces the following output.
Page 1 04-11-11 14:15:54 PERSONNEL NAME CURRENT ID POSITION --------- -------------------- ------------------------- 30020013 GARRET TYPIST 30016112 TAILOR WAREHOUSEMAN 20017600 PIETSCH SECRETARY
If you wish your report to be output without column headers, add the
keyword NOHDR to the
DISPLAY
statement.
DISPLAY NOHDR PERSONNEL-ID NAME JOB-TITLE
If you wish column headers of your own to be output instead of the
default headers, you specify 'text' (in
apostrophes) immediately before a field, text being
the header to be used for the field.
** Example 'DISPLX08': DISPLAY (with column title in 'text')
************************************************************************
DEFINE DATA LOCAL
1 VIEWEMP VIEW OF EMPLOYEES
2 PERSONNEL-ID
2 NAME
2 BIRTH
2 JOB-TITLE
END-DEFINE
*
READ (3) VIEWEMP BY BIRTH
DISPLAY PERSONNEL-ID
'EMPLOYEE' NAME
'POSITION' JOB-TITLE
END-READ
END
Output of Program DISPLX08:
The above program contains the header EMPLOYEE for the
field NAME, and the header POSITION for the field
JOB-TITLE; for the field PERSONNEL-ID, the default
header is used. The program produces the following output:
Page 1 04-11-11 14:15:54 PERSONNEL EMPLOYEE POSITION ID --------- -------------------- ------------------------- 30020013 GARRET TYPIST 30016112 TAILOR WAREHOUSEMAN 20017600 PIETSCH SECRETARY
To create a report that has neither page title nor column headers, you
specify the NOTITLE and
NOHDR
options together in the following order:
DISPLAY NOTITLE NOHDR PERSONNEL-ID NAME JOB-TITLE
By default, column headers are centered above the columns. With the
HC
parameter, you can influence the placement of column headers.
If you specify
HC=L
|
headers will be left-justified. |
HC=R
|
headers will be right-justified. |
HC=C |
headers will be centered. |
The HC parameter can be used in a
FORMAT statement to
apply to the whole report, or it can be used in a
DISPLAY statement at
both statement level and element level, for example:
DISPLAY (HC=L) PERSONNEL-ID NAME JOB-TITLE
With the HW parameter, you
determine the width of a column output with a DISPLAY statement.
If you specify
HW=ON
|
the width of a DISPLAY column is determined by
either the length of the header text or the length of the field, whichever is
longer. This also applies by default.
|
HW=OFF
|
the width of a DISPLAY column is determined only by
the length of the field. However, HW=OFF only applies to
DISPLAY statements which do not create headers; that is,
either a first DISPLAY statement with
NOHDR
option or a subsequent DISPLAY statement.
|
The HW parameter can be used in a
FORMAT statement to
apply to the entire report, or it can be used in a
DISPLAY statement at
both statement level and element (field) level.
With the FC parameter, you
specify the filler character which will appear on either side of a
header produced by a DISPLAY statement across the
full column width if the column width is determined by the field length and not
by the header (see HW parameter
above); otherwise
FC will be ignored.
When a group of fields or a periodic group is output via a
DISPLAY statement, a
group header is displayed across all field columns that belong to that
group above the headers for the individual fields within the group. With the
GC
parameter, you can specify the filler character which will appear on
either side of such a group header.
While the FC parameter applies
to the headers of individual fields, the GC parameter applies
to the headers for groups of fields.
The parameters FC and GC
can be specified in a FORMAT statement to apply to the
whole report, or they can be specified in a DISPLAY statement at both
statement level and element (field) level.
** Example 'FORMAX01': FORMAT (with parameters FC, GC)
************************************************************************
DEFINE DATA LOCAL
1 VIEWEMP VIEW OF EMPLOYEES
2 NAME
2 INCOME (1:1)
3 CURR-CODE
3 SALARY
3 BONUS (1:1)
END-DEFINE
*
FORMAT FC=* GC=$
*
READ (3) VIEWEMP BY NAME
DISPLAY NAME (FC==) INCOME (1)
END-READ
END
Output of Program FORMAX01:
Page 1 04-11-11 14:15:54
========NAME======== $$$$$$$$$$$$INCOME$$$$$$$$$$$$
CURRENCY **ANNUAL** **BONUS***
CODE SALARY
-------------------- -------- ---------- ----------
ABELLAN PTA 1450000 0
ACHIESON UKL 10500 0
ADAM FRA 159980 23000
By default, titles and headers are underlined with a hyphen (-).
With the UC parameter, you
can specify another character to be used as underlining character.
The UC parameter can be specified in a
FORMAT statement to
apply to the whole report, or it can be specified in a
DISPLAY statement at
both statement level and element (field) level.
** Example 'FORMAX02': FORMAT (with parameter UC) ************************************************************************ DEFINE DATA LOCAL 1 VIEWEMP VIEW OF EMPLOYEES 2 PERSONNEL-ID 2 NAME 2 BIRTH 2 JOB-TITLE END-DEFINE * FORMAT UC== * WRITE TITLE LEFT JUSTIFIED UNDERLINED 'EMPLOYEES REPORT' SKIP 1 READ (3) VIEWEMP BY BIRTH DISPLAY PERSONNEL-ID (UC=*) NAME JOB-TITLE END-READ END
In the above program, the UC parameter is
specified at program level and at element (field) level: the underlining
character specified with the FORMAT statement (=) applies for
the whole report - except for the field PERSONNEL-ID, for which a
different underlining character (*) is specified.
Output of Program FORMAX02:
EMPLOYEES REPORT =============================================================================== PERSONNEL NAME CURRENT ID POSITION ********* ==================== ========================= 30020013 GARRET TYPIST 30016112 TAILOR WAREHOUSEMAN 20017600 PIETSCH SECRETARY
With the notation apostrophe-slash-apostrophe ('/'), you can suppress
default column headers for individual fields displayed with a
DISPLAY statement.
While the NOHDR option
suppresses the headers of all columns, the notation '/' can be
used to suppress the header for an individual column.
The apostrophe-slash-apostrophe ('/') notation is specified in the
DISPLAY statement immediately before the name of the field for
which the column header is to be suppressed.
Compare the following two examples:
DISPLAY NAME PERSONNEL-ID JOB-TITLE
In this case, the default column headers of all three fields will be displayed:
Page 1 04-11-11 14:15:54
NAME PERSONNEL CURRENT
ID POSITION
-------------------- --------- -------------------------
ABELLAN 60008339 MAQUINISTA
ACHIESON 30000231 DATA BASE ADMINISTRATOR
ADAM 50005800 CHEF DE SERVICE
ADKINSON 20008800 PROGRAMMER
ADKINSON 20009800 DBA
ADKINSON 20011000 SALES PERSON
DISPLAY '/' NAME PERSONNEL-ID JOB-TITLE
In this case, the notation '/' causes the column header for
the field NAME to be suppressed:
Page 1 04-11-11 14:15:54
PERSONNEL CURRENT
ID POSITION
--------- -------------------------
ABELLAN 60008339 MAQUINISTA
ACHIESON 30000231 DATA BASE ADMINISTRATOR
ADAM 50005800 CHEF DE SERVICE
ADKINSON 20008800 PROGRAMMER
ADKINSON 20009800 DBA
ADKINSON 20011000 SALES PERSON
See the following example programs: