The text read off it
[90.02.29]
SYS)261
TSX SYS)261, 4
TSX SYS)263, 6
(Normal Return)
Subroutine SYS)261 converts the logical accumulator from a BCD number to binary, checking for non-numeric characters and/or imbedded or trailing blanks; and leaves the result in the decrement of the AC. This routine is used in conjunction with getting a variable length BCD record from tape where the first word of the record gives the remaining length of the record. If an error is detected during conversion, return is 1,4 to routine SYS)263 which prints an error message.
SYS)262
TSX SYS)262, 4
This subroutine converts the binary AC address to a 6 character (with leading blanks) BCD word to be used in Filing' a variable length BCD record. The BCD word is left in the logical AC.
SYS)263
TSX SYS)263, 4
This subroutine prints an error message in conjunction with SYS)261 upon GET error condition (see SYS)261) and exits to the CT monitor.
SYS)264
TXL *+5, 1, BLOCKSIZE-1
TSX SYS)264, 4
PZE FILENAME
OCT STATEMENT-NUMBER
OCT SUB-STATEMENT-NUMBER
When the record size (in IR1) exceeds the Blocksize for the file, SYS)264 prints a message and exits to the CT Monitor.
SYS)265
This SYS number appears as part of the GET calling sequence to the IOCS Read routine whenever the 'AT END' option is not used with the GET verb.
TSX IOC)8, 4
PZE FILENAME, , SYS)260
PZE SYS)265, , SYS)283
IOCDN* BL)NN, , 14
SYS)265 prints a message concerning the unexpected end-of-file and exits to the CT Monitor.
SYS)266
TRA SYS)266
or
TXI SYS)266, 0, 0
This routine performs a 'panic' Close-All-Files and exits to the CT Monitor.