1 
  2 
  3      "BEGIN INCLUDE FILE plio2_fsb.incl.alm
  4 
  5           "Created 06/27/77  1703.1 edt Mon by convert_include_file,
  6           "   Version of 03/21/77  1355.7 edt Mon.
  7 
  8           "Made from >exl>include>plio2_fsb.incl.pl1,
  9           "   modified 05/19/77  1743.9 edt Thu
 10 
 11 "
 12 "         Structure fsb
 13 "
 14           equ       fsb_size,290
 15 
 16 
 17           equ       fsb.switch,0                  "LEVEL 2
 18 
 19           bool      fsb.zot,400000                "DU
 20           bool      fsb.version_2,100000          "DU
 21           bool      fsb.open,040000               "DU
 22           bool      fsb.print,020000              "DU
 23           bool      fsb.input,010000              "DU
 24           bool      fsb.output,004000             "DU
 25           bool      fsb.update,002000             "DU
 26           bool      fsb.stream,001000             "DU
 27           bool      fsb.notkeyed,000400           "DU
 28           bool      fsb.record,000200             "DU
 29           bool      fsb.sequential,000100         "DU
 30           bool      fsb.direct,000040             "DU
 31           bool      fsb.interactive,000020        "DU
 32           bool      fsb.not_used_1,000010         "DU
 33           bool      fsb.not_used_2,000004         "DU
 34           bool      fsb.stringvalue,000002        "DU
 35           bool      fsb.keyed,000001              "DU
 36           bool      fsb.namelist,400000           "DL
 37           bool      fsb.implementation,200000     "DL
 38           bool      fsb.not_used_4,100000         "DL
 39           bool      fsb.transmit_error,040000     "DL
 40           bool      fsb.buffer_in_use,020000      "DL
 41           bool      fsb.copy,010000               "DL
 42           bool      fsb.detach,004000             "DL
 43           bool      fsb.te_hold,002000            "DL
 44           bool      fsb.not_used_5,001000         "DL
 45           bool      fsb.internal,000400           "DL
 46           bool      fsb.threaded,000200           "DL
 47           bool      fsb.fsb_in_use,000100         "DL
 48           bool      fsb.console,000040            "DL
 49           bool      fsb.emptyline,000020          "DL
 50           bool      fsb.iox_close,000010          "DL
 51           bool      fsb.xxx4,000004               "DL
 52           bool      fsb.xxx5,000002               "DL
 53           bool      fsb.xxx6,000001               "DL
 54 
 55           equ       fsb.nono,1                    "LEVEL 2
 56 
 57           bool      fsb.bit_string,400000         "DU
 58           bool      fsb.not_used_3,200000         "DU
 59           bool      fsb.read,100000               "DU
 60           bool      fsb.write,040000              "DU
 61           bool      fsb.rewrite,020000            "DU
 62           bool      fsb.delete,010000             "DU
 63           bool      fsb.locate,004000             "DU
 64           bool      fsb.key,002000                "DU
 65           bool      fsb.keyto,001000              "DU
 66           bool      fsb.keyfrom,000400            "DU
 67           bool      fsb.set,000200                "DU
 68           bool      fsb.into,000100               "DU
 69           bool      fsb.ignore,000040             "DU
 70           bool      fsb.from,000020               "DU
 71           bool      fsb.nofrom,000010             "DU
 72           bool      fsb.nokey,000004              "DU
 73           bool      fsb.nokeyfrom,000002          "DU
 74           bool      fsb.nolock,000001             "DU
 75 
 76           equ       fsb.lsep,2
 77           equ       fsb.iocb_p,3
 78           equ       fsb.blc,4
 79           equ       fsb.bsize,5
 80           equ       fsb.bptr,6
 81           equ       fsb.bnc,8
 82           equ       fsb.kol,9
 83           equ       fsb.lsize,10
 84           equ       fsb.lineno,11
 85           equ       fsb.psize,12
 86           equ       fsb.pageno,13
 87           equ       fsb.limit,14
 88           equ       fsb.lnzc,15
 89           equ       fsb.filename,16               "DOUBLE
 90           equ       fsb.title,24                  "DOUBLE
 91           equ       fsb.fsb_thread,32
 92           equ       fsb.buffer,34
 93           equ       fsb.path_name,246             "DOUBLE
 94           equ       fsb.declared_attributes,288
 95 
 96 "         The following declarations were not created by cif:
 97           bool      fsb.zot1,400000               "DU
 98           bool      fsb.zot2,200000               "DU
 99 
100      "END INCLUDE FILE plio2_fsb.incl.alm