Function to save a workspace
object into a 'JDemetra+' workspace.
Examples
# \donttest{
dir <- tempdir()
# Creation and export of an empty 'JDemetra+' workspace
wk <- new_workspace()
new_multiprocessing(wk, "sa1")
save_workspace(wk, file.path(dir, "workspace.xml"))
# }