File number: Difference between revisions

From BR Wiki
Jump to navigation Jump to search
No edit summary
No edit summary
 
Line 9: Line 9:


  07500    close#1
  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: 


<noinclude>
<noinclude>
[[Category:All Parameters]]
[[Category:All Parameters]]
</noinclude>
</noinclude>

Latest revision as of 16:47, 5 June 2014

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: