Index: TECH/PubSub/impl/EventDispatcher.cls.xml =================================================================== diff -u -r2959 -r3309 --- TECH/PubSub/impl/EventDispatcher.cls.xml (.../EventDispatcher.cls.xml) (revision 2959) +++ TECH/PubSub/impl/EventDispatcher.cls.xml (.../EventDispatcher.cls.xml) (revision 3309) @@ -107,14 +107,12 @@ do XmlStream.Rewind() - if XmlStream.Size < 32000 { - do LogDetail.WriteLine("") - do LogDetail.WriteLine("Reinvoke:") - do LogDetail.WriteLine("Set DataString = $System.Encryption.Base64Decode("""_$System.Encryption.Base64Encode(XmlStream.Read())_""")") - do LogDetail.WriteLine("Set EventData = ##class(TECH.XMLCorrelater).%New().FromString(DataString,"""_EventDataClassname_""","""_EventDataClassname_""")") - do LogDetail.WriteLine("Set Event = ##class("_Event.%ClassName(1)_").%New(EventData)") - do LogDetail.WriteLine("Do $ZOBJCLASSMETHOD("""_Subscription.RespondingClass_""", """_Subscription.RespondingMethod_""", Event)") - } + do LogDetail.WriteLine("") + do LogDetail.WriteLine("Reinvoke:") + do LogDetail.WriteLine("Set DataString = $System.Encryption.Base64Decode("""_$System.Encryption.Base64Encode(XmlStream.Read())_""")") + do LogDetail.WriteLine("Set EventData = ##class(TECH.XMLCorrelater).%New().FromString(DataString,"""_EventDataClassname_""","""_EventDataClassname_""")") + do LogDetail.WriteLine("Set Event = ##class("_Event.%ClassName(1)_").%New(EventData)") + do LogDetail.WriteLine("Do $ZOBJCLASSMETHOD("""_Subscription.RespondingClass_""", """_Subscription.RespondingMethod_""", Event)") do LogDetail.WriteLine("") do LogDetail.WriteLine("Error: ")