-puts "TODO ?OCC12345 ALL: An exception was caught"
-puts "TODO ?OCC12345 ALL: \\*\\* Exception \\*\\*.*"
-puts "TODO ?OCC12345 ALL: TEST INCOMPLETE"
puts "============"
puts "OCC21747"
puts "============"
vsetgradientbg ${R1} ${G1} ${B1} ${R2} ${G2} ${B2} ${Type}
-set only_screen 1
+checkview -screenshot -3d -path ${imagedir}/${test_image}.png