serial vhLib.Macro 1 %SerialObject,%XML.Adaptor 0 %String %String %String array s o=##class(BL.EC.pxXMLExport).%New().XMLExport() %Status "_..Tekst_"" Quit $$$OK ]]> 1 Tag:%String,String:%String="",lbAttribs:%List,OldFmtToHtml:%Boolean,InputIsHtml:%Boolean=0 pxTekstHTML String:%String,OldFmtToHtml:%Boolean=0,InputIsHtml:%String=0 ",">", $C(9),$C(160,160,160,160)) If (OldFmtToHtml)&&(String["ª") Do . Set String=$$REPLACE5^vhRtn1(String, "ªU","", "ªu","", "ªB","", "ªb","") . ;For i =1:1:$L(String) Do Set ..Tekst=..Tekst_String Quit ]]> SubTag " ]]> SubTag " ]]> SubTag " ]]> "]]> %Library.CacheSerialState pxTekstHTMLState ^BL.FOP.Basis.pxTekstHTMLS listnode "BL.FOP.Basis.pxTekstHTML" Attributes Tag Tekst