DATACOUNT function

Purpose

Return the total count of the number of local DATA items that can be read with the READ$ function.

Syntax

Count% = DATACOUNT

Remarks

DATACOUNT only returns the number of DATA items in the Sub, Function, Method, or Property in which it appears (i.e., local DATA statements).  While it is not possible to directly read data from outside of the scope of current procedure, global data can be emulated easily by placing it inside a procedure returns data to the calling code.  There is a limit of 64 Kilobytes and 16384 separate data items per procedure.

See also

DATA, READ$

Example

FUNCTION GetCategories(Category() AS STRING) AS LONG

  LOCAL x AS INTEGER

  REDIM Category(1 TO DATACOUNT) AS STRING

  FOR x = 1 TO DATACOUNT

    Category(x) = READ$(x)

  NEXT x

  FUNCTION = DATACOUNT

  DATA Animal, Mineral, Vegetable, Alien

END FUNCTION