Exporting a OR file to an XML file

The below code snippet helps to export TSR file to XML file.
Set obj = CreateObject("Mercury.ObjectRepositoryUtil")
obj.ExportToXML "SourceFile", "TargetFile"
Set obj = Nothing