pload QAcommands
-NewDocument D MDTV-Standard
+NewDocument D BinOcaf
######################################################
-catch { SaveAs D ${imagedir}/OCC381_1.std }
+catch { SaveAs D ${imagedir}/OCC381_1.cbf }
if { [catch { OCC381_Save D } ] } {
puts "OCC381: Error"
} else {
- catch { exec chmod 777 ${imagedir}/OCC381_1.std }
- file delete -force ${imagedir}/OCC381_1.std
+ catch { exec chmod 777 ${imagedir}/OCC381_1.cbf }
+ file delete -force ${imagedir}/OCC381_1.cbf
}