# OK: Exception appears and does not kill DRAWEXE (TEST COMPLETED)
puts "TODO ?OCC670 ALL: An exception was caught"
puts "TODO ?OCC670 ALL: \\*\\* Exception \\*\\*"
puts "TODO ?OCC670 ALL: TEST INCOMPLETE"

puts "========"
puts "OCC670"
puts "========"
puts ""
#########################
## Problem with the Print method.
#########################

pload QAcommands

catch { OCC670 }

puts "OCC670 OK"
