SIMSCRIPT II.5 Programming Language

SIMSCRIPT II.5 Programming Language
The examples below illustrate how the buffer may be used for variable mode conversion.
1. In this example, a text string containing numeric character fields is written to the
buffer and then read in free form to assign values a list of integer variables.
write as /, "11 12 13 14 15" using the buffer
read V1,V2,V3,V4,V5 using the buffer
Note that / clears the buffer and sets the current output column pointer to its first position.
The buffer column pointer is arranged to be dynamically reset on read/write transitions. On
the transition from a write to a read using the buffer, the column pointer is reset before
the variables are read so the first free-form read starts at the beginning of the buffer. A similar
transition from a read to a write using the buffer blanks the entire buffer and resets
the column pointer.
2. Alpha variables, ACODE(1), ACODE(2), ACODE(3), for example, might be written and
then reread as a text variable as below:
write ACODE(1), ACODE(2), ACODE(1), ACODE(3) as 4 A 1
using the buffer
read NEW.TEXT as T 4 using the buffer
If ACODE(1)="C",
assigned the text string "CACI".
3.7 Writing Formatted Reports
ACODE(2)="A", and ACODE(3)="I", then NEW.TEXT will be
The print and write statements may be used to display messages and variable values as desired.
Using these statements to produce lengthy reports, however, can involve much tedious programming.
This section adds two phrases to the print statement and introduces two control statements
that provide a report-generator capability.
These features permit a programmer to specify the layout of printed results, to control the printing
of headings and titles, to eject pages between various report sections, and to arrange "wide reports"
on standard-width paper. Figure 3-1 below illustrates the kind of complex reports that can be generated.
The statement begin report marks the start of a report section, within which various kinds of
control can be exercised. A report section, like a routine, is terminated by an end statement. The
statements:
begin report
for I = 1 to N,
print 1 line with I, X(I) as follows
** **.***
end
124