set SchemaFile [file join $env(CASROOT) src XmlOcafResource XmlXcaf.xsd] pload XDE set FileSuffix "xml" # Create a new document and set UndoLimit NewDocument D XmlXCAF UndoLimit D 100 # Open a transaction NewCommand D set subgroup "xcaf_xml"