File number

From BR Wiki
Jump to navigation Jump to search

Used in OPEN, READ, and CLOSE statements to designate a file, printing, or window number. For example:

00130     open #1: "name=orders.INT,kfname=lastfirst.int, recl=118,kps=31/1,kln=30/30,USE", internal, outin, keyed
00290     read #1, using RECFORM: Mat Answers$,Shipping$,Mat Ordered eof DONEREADING
00300  RECFORM: form C 30,C 30,C 30,C 15,C 2,C 7,C 1,N 1,N 1,N 1
00500     open #255:
07500     close#1

It doesn't have to be a number. For clarity, you might want to say:

00130     open #Current_file: "name=orders.INT,kfname=lastfirst.int, recl=118,kps=31/1,kln=30/30,USE", internal, outin, keyed
00290     read #Current_file, using RECFORM: Mat Answers$,Shipping$,Mat Ordered eof DONEREADING
00300  RECFORM: form C 30,C 30,C 30,C 15,C 2,C 7,C 1,N 1,N 1,N 1
00500     open #Current_Printer:
07500     close#Current_file: