puts "========"
puts "OCC181"
puts "OCC701"
puts "========"
######################################################
# Resource_Manager class doesn't return status of saving resources in a file.
######################################################
# Add method BuildPath to OSD_Directory
######################################################

# Clear tmp-data
######################################################################
set tmp ${imagedir}
######################################################################

pload QAcommands

set log [OCC181 OCC181 ${imagedir} ${tmp}/2/2/3 0]

set list [split ${log}]
set ll [llength ${list}]
set status [lindex ${list} [expr ${ll} - 2] ]

if { ${status} == "TRUE"} then {
    puts "OCC181: OK"
} else {
    puts "OCC181: Error"
}

if { ! [file exists ${tmp}/2/2/3/OCC181] } {
  puts "Error: user resource file is not found!"
}

file delete -force ${tmp}/2
