/// <p>Projekt: <b>KZIS</b>
/// <p>Author : <b>M. Brousek</b>
/// <p>Created: <b>21.4.2010</b>
/// <p>Description: <b>Základní třída definující událost MW.</b>
/// <p>Vešekré procesy systému jsou spouštěny prostřednictvím událostí, volaných prostřednictvím 
/// uživatelského rozhraní systému. 
/// Událost může být vyvolána jedním ze způsobů, definovaných v rámci rozhraní systému. 
/// Viz seznam níže a třída druhů událostí <CLASS>KZIS.Data.TS.EventKind</CLASS>
/// <p>Jednotlivé nastalé události zachytává a zpracovává příslušná služba systému.
/// V principu platí, že každá třída BS (následník Ens.BusinessService) zachycuje jedinečný
/// druh události. Služba danou událost zaznamená a její instanci pak předá v rámci požadavku (Request)
/// příslušnému procesu.
/// Vzhledem k tomu, že druh události je jednoznačně určen příslušným kódem a popisem, je pro
/// každý podporovaný druh události vytvořen následeník této třídy, který daný kód a popis definuje
/// v parametrech <PARAMETER>EventCode</PARAMETER> a <PARAMETER>DefaultDescription</PARAMETER>
/// <p><b>V součansosti jsou definovány následné druhy událostí:</b>
/// <table>
/// <tr><td><b>1</b></td><td>Plánovač systému KZIS</td><td><CLASS>KZIS.Data.TS.Events.ekScheduler</CLASS></td></tr>
/// <tr><td><b>2</b></td><td>Uživatel prostřednictvím GUI</td><td><CLASS>KZIS.Data.TS.Events.ekUserGUI</CLASS></td></tr>
/// <tr><td><b>3</b></td><td>Zpracování dávkového souboru</td><td><CLASS>KZIS.Data.TS.Events.ekBatchFile</CLASS></td></tr>
/// <tr><td><b>4</b></td><td>Zpracování datového CSV souboru</td><td><CLASS>KZIS.Data.TS.Events.ekCSVFile</CLASS></td></tr>
/// <tr><td><b>5</b></td><td>Plánovač systému Ensemble</td><td><CLASS>KZIS.Data.TS.Events.ekEnsTask</CLASS></td></tr>
/// <tr><td><b>99</b></td><td>Neznámá událost</td><td><CLASS>KZIS.Data.TS.Events.ekUnknown</CLASS></td></tr>
/// </table>
/// <div style="color:red">
/// 	<p>Ne všechny popsané druhy událostí jsou v současné době využity! 
/// 		<p><b>V případě doplnění nové události je třeba doplnit tento seznam z důvodu evidence a zachování jednoznačnosti použitých kódů</b>
/// 		(špatně se to pak dohledává po jednotlivých definovaných třídách)
/// </div>
Class KZIS.Data.TS.MWEvent Extends %Persistent
{

/// Jednoznačný kód druhu události
Parameter EventCode = 0;

/// Popis daného druhu události
Parameter DefaultDescription = "Abstract event";

/// Instance třídy druhu události, odpovídající definovanému kódu a popisu
Property Kind As KZIS.Data.TS.EventKind;

/// Čas zaznamenání události
Property ExecutionTime As %TimeStamp;

/// Zaznamená událost této třídy (daného druhu) a vrátí její instanci.
ClassMethod MarkEvent() As KZIS.Data.TS.MWEvent
{
	set tNewEvent = ##class(KZIS.Data.TS.MWEvent).%New()
	set tNewEvent.Kind = ##class(KZIS.Data.TS.EventKind).OpenCode(..#EventCode, ..#DefaultDescription)
	set tNewEvent.ExecutionTime = ##class(KZLibrary.DateTimeUtils).JustNow() 
	set tSC = tNewEvent.%Save()
	quit tNewEvent
}

}