Index: vhLib/Logging.cls.xml =================================================================== diff -u -r3787 -r3883 --- vhLib/Logging.cls.xml (.../Logging.cls.xml) (revision 3787) +++ vhLib/Logging.cls.xml (.../Logging.cls.xml) (revision 3883) @@ -36,6 +36,17 @@ %Time + +%String +1 + Set {*}= $ZDT( {datum}_","_{tijd},3,7 ) +1 + + + +%BigInt + + "E" = error @@ -209,6 +220,10 @@ CspSessionId + +SequenceId + + 1 objectgenerator @@ -299,6 +314,8 @@ set ..GebruikerID = ##class(TECH.Context.RuntimeContext).Instance().GeefGebruikerID() set ..Gebruiker = ##class(TECH.Context.RuntimeContext).Instance().GeefGebruikerInitialen() set ..SessionID = ##class(TECH.Context.RuntimeContext).Instance().GeefSessieID() + Set ..SequenceId = $Increment(^vhLib.LoggingSequence) + if $IsObject(Detail) { Do ..DetailAsStream.CopyFrom(Detail) @@ -493,6 +510,9 @@ CspSessionId + +SequenceId +