Using KSAM/XL and KSAM 64 (32650-90886)

102 Chapter9
KSAM Intrinsics
FGETINFO
If the file was created as an ASCII file, this value is negative and
expresses the size in bytes.
devtype
16-bit signed integer by reference (optional)
Returns the type and subtype of the device being used for a KSAM, RIO,
circular, or message file, or devices such as a tape drive, printer, or
terminal where bit (0:8) indicate device subtype, and bit (8:8) indicate
device type. For standard disk files, bit (8:8)=00000011 and bit
(0:8)=00001000 (indicate a 7933/35 disk drive).
ldevnum
16-bit unsigned integer by reference (optional)
Returns the logical device number (ldev) associated with the device where
the file label resides:
If the file is a disk file,
ldevnum
is the location of the file label. (File
data may reside on the same device as the file label.)
If the file is spooled,
ldevnum
is a virtual device number that does not
correspond to the system configuration I/O device list.
If the file is located on a remote computer, linked by a DS point-to-point
or X.25 link, the left eight bit (0:8) are the logical device number of the
distributed system (DS) device.
If the remote computer is linked by NS 3000/XL, the left eight bit (0:8)
are the remote environment of the connection. The right eight bit (8:8)
are the ldev of the device on the remote computer where the file label
resides.
If the DS device for the RFA or the LDEV is 0, then
ldevnum
returns a
0.
hdaddr
16-bit unsigned integer by reference (optional)
Returns 2048. Maintained to provide backward compatibility with
MPE V/E-based systems.
filecode
16-bit signed integer by reference (optional)
Returns the file code of a disk file.
lrecptr
32-bit signed integer by reference (optional)
Returns the current physical record pointer setting. Remember that
physical record numbers can begin with zero or one, depending on how the
file was built.
eof
32-bit signed integer by reference (optional)
Returns the pointer setting of the last logical record currently in the file
(equivalent to the number of logical records currently in the file). If the file
does not reside on disk, this value is zero. For interprocess communication
(IPC), when a call to FCONTROL with
itemnum
=46 is in effect, the number of
records returned in
eof
includes open, close, and data records.