TECH.RegisteredObject TECH.File.FileWriter 1 FileWriter:TECH.File.FileWriter 1 1 %Status 1 %Status %String BestandVolledigeNaam:%String,WriteImmediate:%Boolean=1 Inhoud:%String Inhoud:%String="" Stream:%Stream XMLObject:%XML.Adaptor,XMLExportOpties:%String="literal,indent",TopTag:%String="" " set To = "" do ##class(TECH.StreamUtils).Replace(..FileWriter.GetStream(),From,To) set From = "" set To = "" do ##class(TECH.StreamUtils).Replace(..FileWriter.GetStream(),From,To) set From = "" set To = "" do ##class(TECH.StreamUtils).Replace(..FileWriter.GetStream(),From,To) ]]> %GlobalCharacterStream