50
XOPEN
#
(cross
open)
Opens
BRD
file for read-out
and
Format:
XOPEN # <logical
number>,"
[<device
name>
:]
<filename>
"
Note: Only FDn device name.
Abbreviated form:
X.#
Explanation:
Opens the random access data file (BRD), and opens (cross opens) theread-out/write-
in
of the random access data. Newly registers
BRD
files, prepares for data read-out
from, and new data write-in to, the
BRD
file, and defines the logical number for file
access.
Examples:
10
XOPEN
#1,"
FD1:
DATA"
20
NPUT"
pr
oduct
no.
=";
K
30
F K=O
THEN
110
40
NPUT
"product
name=";NS
50
NPUT
"unit
price=";P
60
INPUT
"st
ock
amount
="S
70
I
NPUT
"comment
=";
CS
80
T =
P*S
90
PR
I NT # 1
(K
* 5
-4)
,
N$,
P,
S,
T,
C $
100
GOTO
20
1 1 0
CL
OS
E # 1
120
END
..... Cross opens (read-out, write-in)
BRD
files. The 5 items of input (product name,
unit price, amount in stock, total amount (T = total amount (P *
S»,
and
comment are registered in the
BRD
file
"DATA".
To Next Page
Loading...
