ком справочном руководстве по IBM
Функция ERDEV,ERDEV$ возвращают информацию о приводном устройстве.
-113 -
-------
Синтаксис y=ERDEV
--------- y=ERDEV$
Замечания Когда возникает ошибка устройства ,целая функция ERDEV возвращает
--------- информацию об ошибке в своем младшем байте .Этот байт представляет
код ошибки INT24.Старший байт содержит биты 15,14,13,3,2,1 и 0 атрибутного
слова устройства.ERDEV$ содержит имя устройства :8 байтор для литерных уст-
ройств и 2-для блочных устройств.(См.более детальную информацию в техничес-
ком справочном руководстве по IBM DOS).
Пример ON ERROR GOTO ОшибокОбработчик
PRINT "Открыть путь на устройство А и нажать любую клавишу..."
WHILE NOT INSTAT:WEND
FILES "A:\"." "
END
ОбработчикОшибок:
PRINT USING "Угрожающая ошибка ## имела место на & ":ERDEV,ERDEV$
RESUME NEXT
Функции ERL,ERR
---------------
Функция ERL И ERR возврашают строку и код самой последней ошибки.
-------
Синтаксис y=ERL
--------- y=ERR
Замечания ERL возврашает номер строки самой последней ошибки.Если ошибка
--------- произошла в операторе без номера строки ,ERL возвращает номер
ближайшей нумерованной строки в направлении к началу программы.Если между
точкой ошибки и началом программы нумерованных строк нет,ERL возвращает 0.
ERR возвращает номер самой последней ошибки периода прогона.Тестируйте ее
в подпрограммах отслеживания ошибок с целью исполнения кода,подходящего для
произошедшей ошибки по типу.
Примечание: Операторы ERL RESUME и RESUME NEXT приводят к генерированию
компилятором 4-байтового указателя для каждого оператора в программе.Следо-
вательно программисты,имеющие дело с размером генерируемых ими кодов,должны
Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий