Tabulka obecná relační databáze pro položky oddělení O,P,M (COMMON)

Databáze universálních vět používaných v programu jako relace z položek oddělení O,P a M. V makrojazyku se k větě, která je nahrána v paměti, přistupuje pomocí klíčového slova COM a konstanta databáze je dbtComm.

Po stisku tlačítka [ mezerník ] na položce v oddělení O,P nebo M se pouze spustí makropozadí. Makrojazyk sám musí zajistit práci s větou a přidělování relace do položky.

ČísNázev položkyTyp položkySloupecMakroIdx
1 Ident Longint IDENT dbIdent *
2 Attr Word XATTR dbAttr  
3

Skupina, do které věta patří.

  1. comGrp_Prx
    Započitatelná praxe
  2. comGrp_MHMPOC
    MHMP Open Card
  3. comGrp_ParDan
    Parametry daně
  4. comGrp_DanNrez
    Daňový nerezident
  5. comGrp_VojNev
    Voják - Nevoják
    (Schopnost vykonávat vojenskou službu)
  6. comGrp_DuchSP
    Důchodové spoření (II. pilíř)
 Integer XGROUP comSkupina *
4 Ident zaměstnance, kterému věta patří Longint XMANID comZamId   
5 Jméno položky (např.:P0100), které věta patří String[5] XITEMNAME comPol    
6 Tento text bude zobrazován v položce a v historii. Je možné ho formátovat. Popis je níže. String[50] XTEXT comText   
7 Data - datum DateTime XVALDATE1 comD1   
8 Data - celé číslo Longint XVALINT1 comI1   
9 Data - desetinné číslo Real XVALREAL1 comR1   
10 Data - řetězec String[100] XVALSTR1 comS1   
11 Data - datum DateTime XVALDATE2 comD2   
12 Data - celé číslo Longint XVALINT2 comI2   
13 Data - desetinné číslo Real XVALREAL2 comR2   
14 Data - řetězec String[100] XVALSTR2 comS2   
15 Data - datum DateTime XVALDATE3 comD3   
16 Data - celé číslo Longint XVALINT3 comI3   
17 Data - desetinné číslo Real XVALREAL3 comR3   
18 Data - řetězec String[100] XVALSTR3 comS3   
19 Data - datum DateTime XVALDATE4 comD4   
20 Data - celé číslo Longint XVALINT4 comI4   
21 Data - řetězec String[100] XVALSTR4 comS4   
22 Data - řetězec String[100] XVALSTR5 comS5   
23 Data - řetězec String[100] XVALSTR6 comS6   
24 Data - řetězec String[100] XVALSTR7 comS7   

Formátování comText

Řetězec může obsahovat parametry. Parametr je ohraničen znaky: #{...}. Uvnitř je číslo položky Data ve větě Comm[] (comD1, comPrx_Hodn, comI1, ...) a formát desetinného čísla :

#{data,počet_míst_čísla,počet_desetinných_míst}

Příklad:

 Com[comText] := "#{" + _Str(comPrx_Hodn) + ",6,3} k #{" + _Str(comPrx_KDatu) + "}";

Obecný formát pro praxi je lépe použít pomocí funkce _GetSpecString(spsPraxe, COMMSTR_PRAXE_FORMAT).

Výsledný text lze zobrazit pro nahranou větu Comm[] pomocí funkce _GetSpecString(spsPraxe, COMMSTR_PRAXE_TEXT).

Speciální konstanty poplatné skupinám

comGrp_Prx

Započitatelná praxe

Data skupiny Universální data Popis
comPrx_Hodn comR1 Hodnota započitatelné praxe ve tvaru RR.DDD
comPrx_KDatu comD1 Započitatelná praxe je spočtena ke dni

comGrp_MHMPOC

MHMP Open Card

Data skupiny Universální data Popis
comMOC_UID comS1 Guid karty - jedinečné číslo (7 bytové číslo)
comMOC_CLN comS2 CLN - číslo karty zobrazené na kartě
comMOC_LogNum comI1 Logické číslo aplikace MHMP
comMOC_CVTO comD1 Platnost celé karty DO
comMOC_AVFrom comD2 Platnost aplikace MHMP OD
comMOC_AVFTo comD3 Platnost aplikace MHMP DO
comMOC_BlackList comI2 Karta je na black listu
comMOC_Anonymous comI3 Karta je anonymní

comGrp_DanNrez

Daňový nerezident

Data skupiny Universální data Popis
comDanNRez_KodSt comS1 Kód státu ve kterém je daňový rezident
comDanNRez_DanIdentCislo comS2 Číslo daňové identifikace ve státě daňové rezidence
comDanNRez_DanIdentTyp comS3 Typ daňové identifikace - relace do číselníku (UID prvku)
comDanNRez_DokladCislo comS4 Číslo dokladu totožnosti
comDanNRez_DokladTyp comS5 Typ dokladu totožnosti - relace do číselníku (UID prvku)
comDanNRez_DokladKodSt comS6

Kód státu, který vydal doklad totožnosti

comGrp_VojNev

Voják - Nevoják

Data skupiny Universální data Popis
comVojNev_Schopen comI1 Schopen (Ano / Ne)
comVojNev_Hodnost comI2 Hodnost - relace do číselníku
comVojNev_Duvod_Zprosteni comS1 Důvod zproštění
comVojNev_Seznamen comI3 Seznámen (Ano / Ne)
comVojNev_Seznamen_Dat comD1 Seznámen dne
comVojNev_Rozhodnuti comS2 Rozhodnutí

COMGRP_DuchSP

Důchodové spoření (II. pilíř)

Data skupiny Universální data Popis
comDuchSp_Odvadet comI1 Odvádět (Ano / Ne)
comDuchSp_Cislo comS1 Číslo účastníka důchodového spoření
comDuchSp_Vznik_Dat comD1 Datum vzniku spoření
comDuchSp_Oznameni_Dat comD2 Datum oznámení zaměstnancem
comDuchSp_Poznamka comS2 Poznámka

Příklad:

procedure UkazComm(    Id : Longint)
    if _FindRecId(dbtComm, Id) then
        Trace(  "comText:",     Com[comText], 
                ", comZamId:",  Com[comZamId], 
                ", comPol:",    Com[comPol], 
                ", comSkupina:",Com[comSkupina], 
                ", comD1:",     Com[comD1], 
                ", comR1:",     Com[comR1], 
                ", comI1:",     Com[comI1], 
                ", comS1:",     Com[comS1] );
    else
        Trace("Ident ", Id, " nebyl nalezen !");
    endif
endproc

procedure UpravComm(    Id  : Longint;
                        Txt : String;
                        r1  : Real)

    if _FindRecId(dbtComm, Id) then
        Com[comText] := Txt;
        Com[comR1] := r1; 
    else
        Trace("Ident ", Id, " nebyl nalezen !");
    endif
endproc