puts "==========="
puts "BUC60756"
puts "BUC60761"
puts "BUC60762"
puts "BUC60764"
puts "==========="

Open [locate_data_file BUC60756_Doc.std] D

######################################################################
catch {file delete ${imagedir}/Doc2.std}

SaveAs D ${imagedir}/Doc2.std
Close D
Open ${imagedir}/Doc2.std D