_DiaChild

(dim Jmeno      : String;
 dim RodCis     : String;
 dim TypOdp     : Integer;
 dim DuvodPDo   : Date;
 dim Invalida   : Byte;
 dim Potvrz     : String;
 dim OstUdaje   : String;
 dim VProhl     : Byte;
 dim UplNar     : Integer;
     ProCteni   : Byte;
     Dite1Pov   : Byte;
     Dite2Pov   : Byte) : Integer

Tato funkce zobrazí dialog, který umožňuje vkládání údajů o dítěti.

Jmeno	Jméno
RodCis	Rodné číslo
TypOdp	Typ odpočtu: detTypOdp_Ne detTypOdp_Nezl detTypOdp_Studuje detTypOdp_ZdrDuvod detTypOdp_Ostatni
DuvodPDo	Datum konce platnosti důvodu odpočtu
Invalida	Je invalidní
Potvrz	Text potvrzení
OstUdaje	Ostatní údaje
VProhl	Dítě je uvedené v prohlášení poplatníka
UplNar	Uplatněný nárok ve výši: detUplNar_Nic detUplNar_Dite_1 detUplNar_Dite_2 detUplNar_Dite_Dalsi
ProCteni	true = dialog bude zobrazen pouze pro čtení
Dite1Pov	true = bude možno vybrat uplatněný nárok detUplNar_Dite_1
Dite2Pov	true = bude možno vybrat uplatněný nárok detUplNar_Dite_2

Funkce vrací cmOK nebo cmCancel.

Podívejte se na: Procedury a funkce - Objekty , _GetSpecString

Příklad:

procedure DiaChild
    dim	Jmeno    : String;
    dim	RodCis   : String;
    dim	TypOdp   : Integer;
    dim	DuvodPDo : Date;
    dim	Invalida : Byte;
    dim	Potvrz	 : String;
    dim	OstUdaje : String;
    dim VProhl	 : Byte;
    dim UplNar	 : Integer;
	
    ...
    if _DiaChild(Jmeno, RodCis, TypOdp, DuvodPDo, Invalida, Potvrz, OstUdaje, VProhl, UplNar, false, true, true) = cmOK then
        ...
    endif
endproc