HP 3000 Manuals HP 3000 Manuals
ITM
The ITM function returns the number of data items between the beginning
of a record and its current position in the same record. In other words,
it returns the number of datum between the beginning of the current
record and the current datum pointer (after a direct read, this number is
one).
Syntax
ITM(fnum)
Parameters
fnum The file number that HP Business BASIC/XL uses to
identify the file. It is a numeric expression that
evaluates to a positive short integer. For this
function, fnum must specify a BASIC DATA file. An
optional # can precede fnum.
Examples
10 CREATE "File1", FILESIZE=10 !BASIC DATA file; each PRINT
11 ! statement starts a new record.
12 ASSIGN "File1" TO #1
13 POSITION #1; BEGIN !Pointer at record 1.
14 PRINT #1; 10 !Print 10 on record 1;
16 PRINT #1; 20,30 !Print 20 and 30 on the same record ;
18 DISP ITM(#1) !Pointer is at record 1.
19 !Three datum are between
20 ! the pointer and the beginning
21 ! of the record; display value 3.
99 END