cobol
Оператор CONTINUE
Поиск…
замечания
Оператор CONTINUE заставляет поток управления продолжать работу в следующем операторе. Не совсем не-op, поскольку он может влиять на поток управления, когда внутри составных последовательностей операторов, в частности IF / THEN / ELSE.
Удобно? пример - во время ранней разработки и создания с помощью вспомогательных средств для отладки и без них.
CALL "CBL_OC_DUMP" USING structure ON EXCEPTION CONTINUE END-CALL
Этот код, хотя и дорогостоящий, позволит отформатировать дампы памяти, когда модуль CBL_OC_DUMP связан с исполняемым файлом, но безвредно сбой, если это не так. * Этот трюк применим только на ранних стадиях разработки. Затраты на динамический сбой поиска не являются чем-то, что нужно оставить в активном коде, и эти строки должны быть удалены из источника, как только будут выполнены все начальные проблемы в альфа-тестировании. При кодировании первого дня это может быть удобной помощью. К ко второму дню кодирование ON EXCEPTION CONTINUE должно быть очищено.
Заполнитель
Это надуманно; но некоторые программисты COBOL могут предпочесть положительную ясность, в отличие от использования NOT в условных выражениях (особенно с ошибкой логической ошибки var NOT = value OR other-value ).
if action-flag = "C" or "R" or "U" or "D"
continue
else
display "invalid action-code" upon syserr
perform report-exception
exit section
end-if