VAR done-
Значение этой переменная показывает, была ли успешной последняя операция ввода из числа процедур, определенных в этом модуле. Значение done устанавливается в TRUE при успешном вызове Open или Restart, и устанавливается в FALSE первой неуспешной операции ввода. Однажды установленная в FALSE, она сохраняет это значение до следующего вызова Open или Restart.
NB Прямые обращения к методам сканера scanner не влияют на значение done. Поэтому для чтения потока ввода нужно либо использовать исключительно scanner, либо не использовать его вообще.

VAR scanner
Объект, выполняющий работу по сканированию потока ввода.
Подсоединяется к копии вводимого текста при выполнении процедуры Open (см. правила определения вводимого текста в описании процедуры Open).
Использовать scanner следует лишь в тех случаях, когда требуется детальный (посимвольный) анализ структуры вводимых данных, например, когда структура вводимых данных неизвестна или слишком сложна.
Если же структура вводимых данных известна и достаточно проста, то следует избегать обращений к scanner напрямую и по возможности использовать процедуры, определенные в данном модуле.