NumberVar
CurrencyVar
StringVar
BooleanVar
DateVar
TimeVar
DateTimeVar


Local StringVar areaCode;
areaCode := {Customer.Fax} [1 To 3];


Local NumberVar x := 10 + 20;
Local StringVar y := "Hello" + " " + "World";
Local DateVar z := CDate (#Sept 20, 1999#);
Local NumberVar Range gradeA := 90 To 100;


Local NumberVar Range gradeA;
Local DateVar Range quarter;
gradeA := 90 To 100;
quarter := CDate (1999, 10, 1) To CDate (1999, 12, 31);


Local StringVar y;
y := "hello";
//OK- the Length function expects a String argument
Length (y);
//Error- y can only hold String values
y := #Jan 5, 1993#;
//Error- y can only hold String values
y := ["a", "bb", "ccc"];
//Error- the Sin function expects a Number argument
Sin (y);


Local NumberVar x; //Declare x to be a Number variable
x := 10; //Assign the value of 10 to x