Contents, cont'd. - Intermec

LSET
Chapter 2 Program Instructions
Field of Application Statement for placing data left-justified into a field in a random file
buffer.
Syntax LSET=
is the string variable assigned to the field by a FIELD
statement.
holds the input data.
Remarks After having OPENed a file and formatted it using a FIELD statement, you
can enter data into the random file buffer using the LSET and RSET
statements (RSET right-justifies the data).
The input data can only be stored in the buffer as string expressions.
Therefore, a numeric expression must be converted to string format by the use
of an STR$ function before an LSET or RSET statement is executed.
If the length of the input data is less than the length of the field, the data will
be left justified and the remaining number of bytes will be printed as space
characters.
If the length of the input data exceeds the length of the field, the input data will
be truncated on the right side.
Example 10 OPEN "PHONELIST" AS #8 LEN=26
20 FIELD#8,8 AS F1$, 8 AS F2$, 10 AS F3$
30 SNAME$="SMITH"
40 CNAME$="JOHN"
50 PHONE$="12345630"
60 LSET F1$=SNAME$
70 LSET F2$=CNAME$
80 RSET F3$=PHONE$
90 PUT #8,1
100 CLOSE#8
RUN
SAVE "PROGRAM 1.PRG"
NEW
10 OPEN "PHONELIST" AS #8 LEN=26
20 FIELD#8,8 AS F1$, 8 AS F2$, 10 AS F3$
30 GET #8,1
40 PRINT F1$,F2$,F3$
RUN
SMITH — — — JOHN — — — — — — 12345630
yields:
Intermec Fingerprint 7.2 – Reference Manual Ed. 3 141