Producing Printed Reports
10.10 Solving Report Problems
10.10.5 Underlining Items in Your Reports
The examples in this section apply only to printers that support overprinting.
Sometimes you must underline a column of numbers to denote a total and also
underline the total to highlight it:
1234
1122
----
2356
====
To print a single underline, use the underscore character and suppress line
spacing. For example:
WRITE PRINT-LINE FROM SINGLE-UNDERLINE-TOTAL
BEFORE ADVANCING 0 LINES.
This overprints the underscore ( _ ) on the previous line, underlining the item:
1122. Use the equal sign ( = ) to simulate double underlines. Note that you must
write the equal signs on the next line. For example:
WRITE PRINT-LINE FROM DOUBLE-UNDERLINE-TOTAL
AFTER ADVANCING 1 LINE.
10.10.6 Bolding Items in Your Reports
The examples in this section apply only to printers that support overprinting.
To bold an entire line in a report:
1.
Write the line as many times as you want, specifying the BEFORE
ADVANCING 0 LINES phrase (three times is sufficient). This darkens
the line but does not advance to the next line.
2.
Write the line one last time without the BEFORE ADVANCING phrase. This
overprints the line again and advances to the next print line.
For example:
WRITE PRINT-LINE FROM TOTAL-LINE BEFORE ADVANCING 0 LINES.
WRITE PRINT-LINE FROM TOTAL-LINE BEFORE ADVANCING 0 LINES.
WRITE PRINT-LINE FROM TOTAL-LINE BEFORE ADVANCING 0 LINES.
WRITE PRINT-LINE FROM TOTAL-LINE.
This example produces a darker image in the report. You can use similar
statements for characters and words, as well as complete lines. To bold only a
word or only a character within a line, you must:
1.
Write the print line and specify the BEFORE ADVANCING 0 LINES phrase.
2.
Use reference modification to create a skeleton line containing only the items
in the print line you want bolded.
3.
Write the skeleton line as many times as you want and specify the BEFORE
ADVANCING 0 LINES phrase. This darkens the items in the skeleton line
but does not advance to the next line.
4.
Write the skeleton line one last time without the BEFORE ADVANCING
phrase. This overprints the line again and advances to the next print line.
Producing Printed Reports 10–89
Содержание COBOL AAQ2G1FTK
Страница 22: ......
Страница 30: ......
Страница 94: ......
Страница 110: ......
Страница 146: ......
Страница 180: ......
Страница 194: ...Processing Files and Records 6 1 Defi...
Страница 300: ......
Страница 490: ......
Страница 516: ......
Страница 517: ......
Страница 530: ......
Страница 534: ......
Страница 590: ......
Страница 620: ......