SIMSCRIPT II.5 Programming Language

SIMSCRIPT II.5 Programming Language
Within the routine DISPLAY, an output unit is selected, the first page of the report is set to 1 by setting
page.v to 1, and its lines.v are set to the number of lines per page required. Within the
report section, skip statements are used to separate heading information.
If the sequence of values read by this program is 50 100 7, a report will be printed on unit 7,
which will display the values j, √j, j 2 , and log(j) for j = 1, 2, ..., 100 on three pages.
Assuming that printing starts at the top of the first page, this page will start with the heading
"Tabulation of Mathematical Functions," the page number, the heading I SQRT(I) I
SQ LOG(I), and values for j = 1, 2, ..., 41. The second page will contain the page number,
the heading I SQRT(I) I SQ LOG(I), and values for j = 42, 43, ..., 86. The third page
will resemble the second, except that it will include values for j = 87, 88, ... 100.
The sequence of input values 20 40 8 will produce a report similar to the first, except that it will
display the values for j = 1, 2, ..., 40 on pages that contain only 20 lines. The heading
"Tabulation of Mathematical Functions" will be printed on the current page, renumbered
1, of output unit 8.
Whenever it is necessary to begin each report section on a new page, as might be done in this example,
the begin report statement can be written as:
begin report on a new page
which ejects a page on the current output device unless the current page has no text (line.v = 1,
wcolumn.v = 0). This prevents blank pages from being ejected between report sections.
The structure of a "typical" report-generating program, using the statements described thus far, is
illustrated below. The end statements are inserted for clarity.
begin report on a new page
.
program statements
.
begin heading
.
if page is first
.
always
.
skip N lines
.
end
'' HEADING
.
more program statements
.
end
'' REPORT
128