ProvideX V8.20 > Language Reference > 3. System Functions

548

Format 3: Get String Value

VIS(string$[,ERR=stmtref])

The VIS( ) function returns the contents of a string variable whose variable name is

stored in string$.

Format 4: Get String Value From Composite

VIS(composite$,var_1$[[,subscr]]=expr[, ... n])

The VIS( ) function returns the value contained in each string variable you name

(where the variable is part of a composite string). You can choose to specify up to

three subscripts for the variable.

Format 5: VIS( ) as Record Prefix

REC=VIS(string$[,ERR=stmtref])

Use this format to assign a REC= prefix value dynamically during READ, WRITE,

OPEN, and other directives. When REC=VIS( ) is used, ProvideX evaluates the string

value in VIS( ) and uses it as the name of the record prefix.

Example

00010

print 'CS'

00020

print "Name$,StreetNum,Street$,City$"

00030

Name$="Mike",StreetNum=8920,Street$="Woodbine Ave.",City$="Markham"

00040

input "Select field type (N=Numeric,S=String)",T$

00050

if T$="" then stop

00060

if ucs(T$)<>"S" and ucs(T$)<>"N" then goto 0030

00070

input "What field?",F$

00080

if F$="" then stop

00090

if ucs(T$)="S" then print F$,"=",vis(F$) else print F$,"=",vin(F$)

00100

goto 0030