Sub Activity_Create(FirstTime As Boolean)
Dim x As XMLBuilder
x = x.create("Projects")
x = x.element("java-xmlbuilder") _
.attribute("language", "Java") _
.attribute("scm", "SVN") _
.element("Location") _
.up() _
.up() _
.element("JetS3t")
Dim props As Map
props.Initialize
props.Put("{http://xml.apache.org/xslt}indent-amount", "4")
props.Put("indent", "yes")
Log(x.asString2(props))
End Sub