TOPS-20 PASCAL Language Manual - Bitsavers

INPUT AND OUTPUT
This example causes the system to interpret the first character of
each line written to the predeclared file OUTPUT as a carriage control
character. When you call OPEN for the predeclared file OUTPUT, you
can specify only a carriage control option. If you include any other
parameters, an error occurs.
Example 4
BEGIN
[) PEN (A :I. b I..Im S 9 ,. P!:l : -::: ,J E N N J F E r~ :> I N V E N T I, 0 L.. D , , [I IRE C T ) ;
END,
The file variable albums will be associated with the file
specification PS:(JENNIFER>INVENT. A RESET will initiate reading of
the existing (OLD) file, or cause an error if the file does not exist.
The file wil] be opened for direct access; that is you Cr.ln use the
FIND procedure with this file. A REWRITE will ignore the OLD
parameter.
Example 5
BEGIN
OPEN (~;DlaT" 'Enpr'~J~:l:" NEWl' , FIXED);
END;
Assuming that Energy is defined as a logical name, this statement
causes a RESET or REWRITE to create a file with the specification
designated by the logical name Energy. The identifier Solar is used
within the program to refer to the TOPS-20 logical name. The file is
created with fixed-length records. Default values are used for the
record length and the record access parameters.
Exampl e 6
BEGIN
OPEN (File_Name := 'PS:-:::SMITH:>PLAN.DAT',RECORD_TYPE != VARIABLE,
File_Variable:=Plans);
END,
The file variable plans is associated with the file PLAN.DAT on PS:
with a directory of . The file name and record type parameters
use keywords. Because the file name keyword is used, each subsequent
parameter must use a keyword. It is not necessary to indicate each
unused parameter with a comma when keywords are used.
7-.13