DataBasic Reference > Statements and Intrinsic Functions > R > READLIST Statement

Comment on this topic

Documentation Comments

Use this form to comment on this topic. You can also provide any general observations about the Online Documentation, or request that additional information be added in a future release.

RealityV15.1Online Documentation (MoTW) Revision 7

READLIST Statement (DataBasic) (m618703+readlist_s.htm)

To

Reality

Version

Topic

Submitted by

Company

Location

Email address

Comment

 

 

READLIST Statement

Reads a list from POINTER-FILE and assigns it to a variable for program manipulation. See also the GETLIST statement.

Syntax

READLIST dyn-array FROM ["list-id" || "list-id account-name"] {SETTING setting-var} [THEN statement(s) | ELSE statement(s)]

Syntax Elements

dyn-array is the name of the variable to which the list is assigned as a dynamic array.

list-id is the name of the list saved in POINTER-FILE.

account-name specifies an account, other than the current account, from which the list was saved.

setting-var is the name of the variable to which the number of items in the list is assigned if the SETTING clause is used.

statement(s) is either a THEN or an ELSE clause (or both). A statement must be included. The THEN clause is executed if the read is successful. The ELSE clause is executed otherwise.

Operation

The item-ids from the saved list are separated by attribute marks.

READLIST allows a DataBasic program to read in a saved list, place the contents in a variable, and then modify or search its contents.

If you READ a list, modify it, and want to save it in the POINTER-FILE again, use the WRITELIST statement.

Examples

READLIST A FROM ITEMX ELSE STOP

Reads the list identified by the contents of variable into variable A.

X = "MYLIST"
READLIST LIST1 FROM X ELSE PRINT "CANNOT READ ":X; STOP

Reads the list from POINTER-FILE MYLIST into variable LIST1.  If the list cannot be read, an error message is displayed and the program is terminated.

READLIST LIST1 FROM '60-90' ELSE GOTO 100
READLIST LIST2 FROM 'OVER-90' ELSE GOTO 100
LIST3 = LIST1:AM:LIST2 ; * Combine the lists
WRITELIST LIST3 ON 'OVER-60'
.
.
GETLIST 'OVER-60' TO ALIST SETTING ACCOUNT THEN
FOR I = 1 TO ACCOUNT
READNEXT ID FROM ALIST ELSE PRINT 'ERROR'
READ AITEM FROM AFILE,ID ELSE AITEM = ''
.
.
NEXT I
END

Reads the lists saved in 60-90 and OVER-90 and combines them into a new list.  The new list is then written back to the POINTER-FILE using the WRITELIST statement. This new list can then be manipulated by the program.

See Also

READLIST Statement (MultiValue Compatibility).

RealityV15.1 (MoTW) Revision 7Comment on this topic