VAR str: TEXT := "foo";