; Popis formulára 'DPH 2003 Priznanie'
; verzia z 10.1.2003; 

Author('Miroslav Kufa','e-mail:acory@acry.sk')
FileName('DPHDDT.WNS')
Name('Priznanie DPH-formulár od r.2003')
Descr('Formulár pre priznanie DPH')
IF(Version()<6)
   Error('Tento súbor nejde spracovať vo Vašej verzii WinDUO'+#13+#13+'Zaistite si vyššiu verziu...',mb_IconStop)
IF(not ExistVariable('Vzor'))
   Error('Tento súbor nemôžete volať priamo.\rVolá sa prostredníctvom súboru DPH.DDT',mb_IconStop);
IF(Vzor<>3)
   Error('Chybné volanie\rGlobálnej premennej Vzor='+Str(Vzor),mb_IconStop);
Designed('')
DeclareRec('Program')
;definícia dialógu

DlgFollowMouse(false)
;AktualCover:Integer=0
DanovyUrad:String[32]=GetDataINI('INFO','DanovyUrad')
DatumPriznania:Word=ValDate(GetDataINI('DPH','DatumPriznania'))
Ulica:String[28]=GetDataINI('INFO','Ulica')
UlicaCislo:String[8]=GetDataINI('INFO','UlicaCislo')
Obec:String[31]=GetDataINI('INFO','Obec')
PSCDPH:String[5]=GetDataINI('INFO','PSCDPH')
DIC0:String[10]=GetDataINI('INFO','DIC0')
DIC1:String[3]=GetDataINI('INFO','DIC1')
Meno:String[37]=GetDataINI('INFO','MenoZastupcu')
ObchodneMeno:String[37]=GetDataINI('INFO','ObchodneMeno')
ObchodneMeno2:String[37]=GetDataINI('INFO','ObchodneMeno2')
ObchodneMeno3:String[37]=GetDataINI('INFO','ObchodneMeno3')
ObchodneMeno4:String[37]=GetDataINI('INFO','ObchodneMeno4')
TypPriz:Byte=Val(GetDataIni('DPH','TypPriz'))
VolackaTel:String[4]=GetDataINI('INFO','VolackaTel')
Tel:String[8]=GetDataINI('INFO','Tel')
VolackaFax:String[4]=GetDataINI('INFO','VolackaFax')
Fax:String[8]=GetDataINI('INFO','Fax')
Odpocet:Byte=Val(GetDataINI('DPH','Odpocet'))
Ochranovatel:Byte=Val(GetDataINI('DPH','Ochranovatel'))
Eu:Byte=Val(GetDataINI('DPH','Eu'))
a:Byte=Val(GetDataINI('DPH','a'))
b:Byte=Val(GetDataINI('DPH','b'))
c:Byte=Val(GetDataINI('DPH','c'))

DefDialog('Údaje pre priznanie k DPH',475,420)
DlgShade(-1,'',4,4,465,350)
DlgButton(id_OK,'OK',317,356);
DlgOnLineHelp(id_OK,'Pokračuje v spracovávaní')
DlgButton(id_Cancel,'Späť',387,356);
DlgOnLineHelp(id_Cancel,'Ukonči bez spracovania')


DlgStatic(-1,'&DIČ',10,18,29)
DlgEdit(101,DIC0,41,14,85,,10,ES_RIGHT,'1234567890')
DlgOnLineHelp(101,'Údaje pre formulár...')
DlgEdit(102,DIC1,128,14,30,,3,ES_LEFT,'1234567890')
DlgOnLineHelp(102,'Údaje pre formulár...')

DlgStatic(-1,'Druh &priznania',215,18,96)
DlgCombo(103,TypPriz,314,14,137,128,9,CBS_DropDownList,'riadne','opravné','dodatočné')
DlgOnLineHelp(103,'Údaje pre formulár...')

DlgStatic(-1,'Daňový &úrad',10,46,88)
DlgEdit(104,DanovyUrad,102,42,180,,32)
DlgOnLineHelp(104,'Údaje pre formulár...')

DlgStatic(-1,'D&átum',313,46,44,,,ES_RIGHT)
DlgEditDate(105,DatumPriznania,371,42,80)
DlgOnLineHelp(105,'Údaje pre formulár...')

DlgStatic(-1,'&Obchodné meno',10,77,180)
DlgEdit(106,ObchodneMeno,191,73,260,,37)
DlgOnLineHelp(106,'Údaje pre formulár...')

DlgStatic(-1,'Do&datok obchodného mena',10,104,180)
DlgEdit(107,ObchodneMeno2,191,100,260,,37)
DlgOnLineHelp(107,'Údaje pre formulár...')

DlgStatic(-1,'&Ulica',10,134,40)
DlgEdit(108,Ulica,76,130,260,,37)
DlgOnLineHelp(108,'Údaje pre formulár...')

DlgStatic(-1,'&Číslo',345,134,40)
DlgEdit(109,UlicaCislo,386,130,65,,8)
DlgOnLineHelp(109,'Údaje pre formulár...')

DlgStatic(-1,'O&bec',10,161,40)
DlgEdit(110,Obec,76,157,260,,31)
DlgOnLineHelp(110,'Údaje pre formulár...')

DlgStatic(-1,'&PSČ',345,161,40)
DlgEdit(111,PSCDPH,386,157,65,,5,ES_LEFT,'1234567890')
DlgOnLineHelp(111,'Údaje pre formulár...')

DlgStatic(-1,'Osoba ktorá je oprávnená konať za platiteľa dane',10,192,372)
DlgStatic(-1,'&Meno a priezvysko',12,218,130)
DlgEdit(112,Meno,155,214,188,,37)
DlgOnLineHelp(112,'Údaje pre formulár...')

DlgStatic(-1,'Te&lefón',10,245,56)
DlgEdit(113,VolackaTel,68,241,40,,4,ES_LEFT,'1234567890')
DlgEdit(114,Tel,109,241,75,,8,ES_LEFT,'1234567890')
DlgOnLineHelp(113,'Predvoľba telefónneho čísla')
DlgOnLineHelp(114,'Telefón')

DlgStatic(-1,'&Fax',200,245,35)
DlgEdit(115,VolackaFax,227,241,40,,4,ES_LEFT,'1234567890')
DlgEdit(116,Fax,268,241,75,,8,ES_LEFT,'1234567890')
DlgOnLineHelp(115,'Predvoľba faxového čísla')
DlgOnLineHelp(116,'Fax')

DlgStatic(-1,'povinnosť ani nárok na odpočet dane',28,293,250,15)
DlgCheckBox(117,Odpocet,10,275,281,15,'&V zdaňovacom období nevznikla daňová')
DlgOnLineHelp(117,'Údaj pre formulár..')

DlgCheckBox(118,Ochranovatel,298,275,168,15,'&Ochraňovateľ štátnych')
DlgStatic(-1,'hmotných rezerv',316,293,120,15)
DlgOnLineHelp(118,'Údaj pre formulár..')

DlgCheckBox(119,Eu,10,313,420,17,'plnenia uskutočnené do krajín EU a do asociovaných krajín')
DlgOnLineHelp(119,'Údaj pre formulár..')

DlgStatic(-1,'Vrátenie nadmer.odpočtu dane podľa §23 ods.2písm.',10,333,340,15)
DlgCheckBox(120,a,360,333,33,15,'a)')
DlgOnLineHelp(120,'Údaj pre formulár..')
DlgCheckBox(121,b,397,333,33,15,'b)')
DlgOnLineHelp(121,'Údaj pre formulár..')
DlgCheckBox(122,c,435,333,33,15,'c)')
DlgOnLineHelp(122,'Údaj pre formulár..')

DlgDivider(6,68,458)
DlgDivider(6,184,458)
DlgDivider(6,268,458)

Result:Integer=DlgExecute()

if(Result<>id_OK)
  Halt

SetDataINI('INFO','DanovyUrad',DanovyUrad)
SetDataINI('DPH','DatumPriznania',StrDate(DatumPriznania))
SetDataINI('INFO','Ulica',Ulica)
SetDataINI('INFO','UlicaCislo',UlicaCislo)
SetDataINI('INFO','Obec',Obec)
SetDataINI('INFO','PSCDPH',PSCDPH)
SetDataINI('INFO','DIC0',DIC0)
SetDataINI('INFO','DIC1',DIC1)
SetDataINI('INFO','MenoZastupcu',Meno)
SetDataINI('INFO','ObchodneMeno',ObchodneMeno)
SetDataINI('INFO','ObchodneMeno2',ObchodneMeno2)
SetDataINI('INFO','VolackaTel',VolackaTel)
SetDataINI('INFO','Tel',Tel)
SetDataINI('INFO','VolackaFax',VolackaFax)
SetDataINI('INFO','Fax',Fax)
SetDataINI('DPH','TypPriz',TypPriz)
SetDataINI('DPH','Odpocet',Odpocet)
SetDataINI('DPH','Ochranovatel',Ochranovatel)
SetDataINI('DPH','a',a)
SetDataINI('DPH','b',b)
SetDataINI('DPH','c',c)
SetDataINI('DPH','Eu',Eu)

;texty a ramiky

Pen(0,0.5)
Box(3,27,190,18)
Box(3,46,190,34)
Box(3,81,190,86)
Box(3,168,190,62)
Box(11,231,173,50)

;rohy
Pen(0,0.7)
Line(3,6,7,0)
Line(3,6,0,7)
Line(192,6,-7,0)
Line(192,6,0,7)
Line(3,285,7,0)
Line(3,285,0,-7)
Line(192,285,-7,0)
Line(192,285,0,-7)
Pen(0,0.2)
Line(83,46,0,34)
Line(141,46,0,34)
Line(83,71,58,0)
Line(3,122,190,0)
Line(3,123,190,0)
Line(3,128,190,0)
Box(102,53,3,3)
Box(102,59,3,3)
Box(102,66,3,3)
Box(95,73,3,3)
;lomitka
Line(57,57,1.5,-3.5)
Line(26,165,1.5,-3.5)
Line(98,165,1.5,-3.5)
;bodky v datume
Pen(0,0.7)
Box(15,216,0.5,0.5)
Box(28,216,0.5,0.5)

PEN(0,0.2)
IF(TypPriz=0)
  begin
   LINE(102,53,3,3)
   LINE(105,53,-3,3)
  end;
IF(TypPriz=1)
  begin
   LINE(102,59,3,3)
   LINE(105,59,-3,3)
  end;
IF(TypPriz=2)
  begin
   LINE(102,66,3,3)
   LINE(105,66,-3,3)
  end;
IF(Ochranovatel=1)
  begin
   LINE(95,73,3,3)
   LINE(98,73,-3,3)
  end;

FontFace(Bold)
FONTSIZE(7)
TEXT(98,10,TA_CENTER|TA_BASELINE,'DAŇOVÉ PRIZNANIE')
TEXT(98,17,TA_CENTER|TA_BASELINE,'DAŇ Z PRIDANEJ HODNOTY')
FONTSIZE(4)
TEXT(5,31,TA_LEFT|TA_BASELINE,'Číselné údaje sa zarovnávajú vpravo, ostatné údaje sa píšu zľava. Nevyplnené riadky sa ponechávajú prázdne.')
FontFace(Normal)

Text(98,23,TA_CENTER|TA_BASELINE,'podľa zákona NR SR č. 289/1995 Z.z. o dani z pridanej hodnoty v znení neskorších predpisov (ďalej len "zákon")')
TEXT(5,35,TA_LEFT|TA_BASELINE,'Údaje vyplňujte paličkovým písmom (podľa tohto vzoru), písacím strojom alebo tlačiarňou čiernou prípadne tmavomodrou farbou.')
FONTSIZE(6)
STEXT(5,42,TA_LEFT|TA_BASELINE,5.1,37,'AÄBČDÉFGHÍJKLMNOPQRŠTÚVXÝŽ 123456789')
FONTSIZE(4)
TEXT(5,50,TA_LEFT|TA_BASELINE,'Daňové identifikačné číslo')
TEXT(5,62,TA_LEFT|TA_BASELINE,'Daňový úrad')
TEXT(91,50,TA_LEFT|TA_BASELINE,'Druh priznania')
FontFace(Italic)
TEXT(116,50,TA_LEFT|TA_BASELINE,'(vyznačí sa x)')
FontFace(Normal)
TEXT(107,55,TA_LEFT|TA_BASELINE,'riadne')
TEXT(107,61,TA_LEFT|TA_BASELINE,'opravné')
TEXT(107,69,TA_LEFT|TA_BASELINE,'dodatočné')
TEXT(101,75,TA_LEFT|TA_BASELINE,'ochraňovateľ štátnych')
TEXT(101,78.5,TA_LEFT|TA_BASELINE,'hmotných rezerv')
TEXT(154,50,TA_LEFT|TA_BASELINE,'Zdaňovacie obdobie')
TEXT(144,57.5,TA_LEFT|TA_BASELINE,'Mesiac')
TEXT(157,57.5,TA_LEFT|TA_BASELINE,'Štvrťrok')
TEXT(180,57.5,TA_LEFT|TA_BASELINE,'Rok')
FontFace(Italic)
TEXT(144,71,TA_LEFT|TA_BASELINE,'(01 - 12)     (1 - 4)')
FontFace(Normal)

TEXT(5,85,TA_LEFT|TA_BASELINE,'Obchodné meno platiteľa dane')
FontFace(Italic)
TEXT(48,85,TA_LEFT|TA_BASELINE,'(uvádza sa v súlade so zápisom v Obchodnom registri, t. j. aj s použitím malých písmen)')
FontFace(Normal)
FontFace(Bold)
TEXT(5,127,TA_LEFT|TA_BASELINE,'Sídlo (právnická osoba), trvalý pobyt (fyzická osoba)')
FontFace(Normal)
TEXT(5,132,TA_LEFT|TA_BASELINE,'Ulica')
TEXT(153,132,TA_LEFT|TA_BASELINE,'Číslo')
TEXT(5,145,TA_LEFT|TA_BASELINE,'PSČ')
TEXT(36,145,TA_LEFT|TA_BASELINE,'Obec')
TEXT(5,158,TA_LEFT|TA_BASELINE,'Číslo telefónu')
TEXT(76,158,TA_LEFT|TA_BASELINE,'Číslo faxu')
TEXT(5,172,TA_LEFT|TA_BASELINE,'Meno a priezvysko osoby, ktorá je oprávnená konať za platiteľa dane')
TEXT(5,209,TA_LEFT|TA_BASELINE,'Dátum')
TEXT(5,224,TA_LEFT|TA_BASELINE,'Daňové priznanie sa podáva do 25. dňa')
TEXT(5,228,TA_LEFT|TA_BASELINE,'po skončení zdaňovacieho obdobia.')
TEXT(101,229,TA_LEFT|TA_BASELINE,'Podpis oprávnenej osoby, odtlačok pečiatky')
TEXT(36,279,TA_LEFT|TA_BASELINE,'Miesto pre evidenčné číslo')
TEXT(111,279,TA_LEFT|TA_BASELINE,'Odtlačok prezentačnej pečiatky daňového úradu')

FontFace(Bold)
TEXT(7,198,TA_LEFT|TA_BASELINE,'Vyhlasujem, že uvedené údaje sú')
TEXT(7,202,TA_LEFT|TA_BASELINE,'správne a úplné.')
TEXT(15,236,TA_LEFT|TA_BASELINE,'Vyplní daňový úrad')

FONTFACE(Normal)
FONTSIZE(2.5)
TEXT(182,283.5,TA_RIGHT|TA_BASELINE,'Vytlačené systémom WinDUO')
FontSize(3)
TEXT(12,285,TA_LEFT|TA_BASELINE,'Ministerstvo financií SR / DPH 03-2003')

;tlač údajov
FONTSIZE(5)
TEXT(5,70,TA_LEFT|TA_BASELINE,GetDataINI('INFO','DanovyUrad'))
STEXT(5,93,TA_LEFT|TA_BASELINE,5.1,37,GetDataINI('INFO','ObchodneMeno'))
STEXT(5,102,TA_LEFT|TA_BASELINE,5.1,37,GetDataINI('INFO','ObchodneMeno2'))
STEXT(5,139,TA_LEFT|TA_BASELINE,5.1,28,GetDataINI('INFO','Ulica'))
STEXT(154,139,TA_LEFT|TA_BASELINE,5.1,8,GetDataINI('INFO','UlicaCislo'))
STEXT(5,57,TA_LEFT|TA_BASELINE,5.1,10,GetDataINI('INFO','DIC0'))
STEXT(63,57,TA_LEFT|TA_BASELINE,5.1,3,GetDataINI('INFO','DIC1'))
STEXT(5,152,TA_LEFT|TA_BASELINE,5.1,5,GetDataINI('INFO','PSCDPH'))
STEXT(36,152,TA_LEFT|TA_BASELINE,5.1,31,GetDataINI('INFO','Obec'))
STEXT(5,165,TA_LEFT|TA_BASELINE,5.1,4,GetDataINI('INFO','VolackaTel'))
STEXT(32,165,TA_LEFT|TA_BASELINE,5.1,8,GetDataINI('INFO','Tel'))
STEXT(76,165,TA_LEFT|TA_BASELINE,5.1,4,GetDataINI('INFO','VolackaFax'))
STEXT(104,165,TA_LEFT|TA_BASELINE,5.1,8,GetDataINI('INFO','Fax'))
STEXT(7,179,TA_CENTER|TA_BASELINE,5.1,37,GetDataINI('INFO','MenoZastupcu'))
IF(ValDate(GetDataINI('DPH','DatumPriznania'))<>0)
  begin
    STEXT(6.5,217,TA_Center|TA_BASELINE,5.1,2,DenZData(GetDataINI('DPH','DatumPriznania')))
    STEXT(19.5,217,TA_Center|TA_BASELINE,5.1,2,MesicZData(GetDataINI('DPH','DatumPriznania'),2))
    STEXT(32.5,217,TA_Center|TA_BASELINE,5.1,4,RokZData(GetDataINI('DPH','DatumPriznania')))
  end
SText(145,64,TA_CENTER|TA_BASELINE,5.1,2,OBDMESIC)
SText(164,64,TA_CENTER|TA_BASELINE,5.1,1,OBDKVART)
SText(174,64,TA_CENTER|TA_BASELINE,5.1,4,OBDROK)

;===================2. strana==============================
NextPage
Pen(0,0.7)
Line(6,4,7,0)
Line(6,4,0,7)
Line(197,4,-7,0)
Line(197,4,0,7)
Line(6,285,7,0)
Line(6,285,0,-7)
Line(197,285,-7,0)
Line(197,285,0,-7)

Pen(0,0.5)
Box(53,4,82,9)
Box(6,17,75,9)
Box(6,27,191,223)
Box(6,251,191,9)
Box(6,261,191,16)
Line(6,61,191,0)
Line(6,84,191,0)
Line(6,107,191,0)
Line(6,130,191,0)
Line(6,232,191,0)

Pen(0,0.2)
Line(6,32,191,0)
Line(6,45,191,0)
Line(6,66,191,0)
Line(6,75,191,0)
Line(6,89,191,0)
Line(6,98,191,0)
Line(6,112,191,0)
Line(6,121,191,0)
Line(6,139,191,0)
Line(6,148,191,0)
Line(6,157,191,0)
Line(6,166,191,0)
Line(6,175,191,0)
Line(6,184,191,0)
Line(6,193,191,0)
Line(6,202,191,0)
Line(6,215,191,0)
Line(6,241,191,0)
Line(6,268,191,0)

Line(69,32,0,29)
Line(133,32,0,29)
Line(80,61,0,171)
Line(138,61,0,189)
Line(138,251,0,9)
Line(138,268,0,9)

Line(16,66,0,18)
Line(16,89,0,18)
Line(16,112,0,18)
;lomitka
Line(116,10,1.5,-3.5)


FONTSIZE(4)
Box(70,20,4.5,3.5)
TEXT(70.5,23,TA_LEFT|TA_BASELINE,'01')
Box(9,37,4.5,3.5)
TEXT(9.5,40,TA_LEFT|TA_BASELINE,'02')
Box(9,54,4.5,3.5)
TEXT(9.5,57,TA_LEFT|TA_BASELINE,'03')
Box(73,37,4.5,3.5)
TEXT(73.5,40,TA_LEFT|TA_BASELINE,'04')
Box(73,54,4.5,3.5)
TEXT(73.5,57,TA_LEFT|TA_BASELINE,'05')
Box(137,37,4.5,3.5)
TEXT(137.5,40,TA_LEFT|TA_BASELINE,'06')
Box(137,54,4.5,3.5)
TEXT(137.5,57,TA_LEFT|TA_BASELINE,'07')
Box(17,68,4.5,3.5)
TEXT(17.5,71,TA_LEFT|TA_BASELINE,'08')
Box(17,77,4.5,3.5)
TEXT(17.5,80,TA_LEFT|TA_BASELINE,'09')
Box(139,68,4.5,3.5)
TEXT(139.5,71,TA_LEFT|TA_BASELINE,'10')
Box(139,77,4.5,3.5)
TEXT(139.5,80,TA_LEFT|TA_BASELINE,'11')
Box(17,91,4.5,3.5)
TEXT(17.5,94,TA_LEFT|TA_BASELINE,'12')
Box(17,100,4.5,3.5)
TEXT(17.5,103,TA_LEFT|TA_BASELINE,'13')
Box(17,114,4.5,3.5)
TEXT(17.5,117,TA_LEFT|TA_BASELINE,'14')
Box(17,123,4.5,3.5)
TEXT(17.5,126,TA_LEFT|TA_BASELINE,'15')
Box(81,91,4.5,3.5)
TEXT(81.5,94,TA_LEFT|TA_BASELINE,'16')
Box(81,100,4.5,3.5)
TEXT(81.5,103,TA_LEFT|TA_BASELINE,'17')
Box(81,114,4.5,3.5)
TEXT(81.5,117,TA_LEFT|TA_BASELINE,'18')
Box(81,123,4.5,3.5)
TEXT(81.5,126,TA_LEFT|TA_BASELINE,'19')
Box(81,132,4.5,3.5)
TEXT(81.5,135,TA_LEFT|TA_BASELINE,'20')
Box(139,132,4.5,3.5)
TEXT(139.5,135,TA_LEFT|TA_BASELINE,'21')
Box(81,141,4.5,3.5)
TEXT(81.5,144,TA_LEFT|TA_BASELINE,'22')
Box(81,150,4.5,3.5)
TEXT(81.5,153,TA_LEFT|TA_BASELINE,'23')
Box(81,159,4.5,3.5)
TEXT(81.5,162,TA_LEFT|TA_BASELINE,'24')
Box(139,168,4.5,3.5)
TEXT(139.5,171,TA_LEFT|TA_BASELINE,'25')
Box(81,177,4.5,3.5)
TEXT(81.5,180,TA_LEFT|TA_BASELINE,'26')
Box(139,177,4.5,3.5)
TEXT(139.5,180,TA_LEFT|TA_BASELINE,'27')
Box(81,186,4.5,3.5)
TEXT(81.5,189,TA_LEFT|TA_BASELINE,'28')
Box(139,186,4.5,3.5)
TEXT(139.5,189,TA_LEFT|TA_BASELINE,'29')
Box(81,195,4.5,3.5)
TEXT(81.5,198,TA_LEFT|TA_BASELINE,'30')
Box(139,195,4.5,3.5)
TEXT(139.5,198,TA_LEFT|TA_BASELINE,'31')
Box(81,208,4.5,3.5)
TEXT(81.5,211,TA_LEFT|TA_BASELINE,'32')
Box(139,208,4.5,3.5)
TEXT(139.5,211,TA_LEFT|TA_BASELINE,'33')
Box(81,226,4.5,3.5)
TEXT(81.5,229,TA_LEFT|TA_BASELINE,'34')
Box(139,226,4.5,3.5)
TEXT(139.5,229,TA_LEFT|TA_BASELINE,'35')
Box(139,235,4.5,3.5)
TEXT(139.5,238,TA_LEFT|TA_BASELINE,'36')
Box(139,244,4.5,3.5)
TEXT(139.5,247,TA_LEFT|TA_BASELINE,'37')
Box(139,254,4.5,3.5)
TEXT(139.5,257,TA_LEFT|TA_BASELINE,'38')
Box(139,271,4.5,3.5)
TEXT(139.5,274,TA_LEFT|TA_BASELINE,'39')

FONTSIZE(4)
TEXT(7,21,TA_LEFT|TA_BASELINE,'V zdaňovacom období nevznikla daňová')
TEXT(7,25,TA_LEFT|TA_BASELINE,'povinnosť ani nárok na odpočítanie dane')
Box(76,20,3,3)
IF(Odpocet=1)
  begin
   LINE(76,20,3,3)
   LINE(79,20,-3,3)
  end;
TEXT(83,25,TA_LEFT|TA_BASELINE,'Nevyplnené riadky sa ponechávajú prázdne, nepoužívajú sa čiarky, bodky a pomlčky.')
TEXT(15,35,TA_LEFT|TA_BASELINE,'oslobodené od dane (§ 26 zákona)')
TEXT(72,35,TA_LEFT|TA_BASELINE,'vývoz tovaru a služieb (§ 37,38,39 zákona)')
TEXT(72,50,TA_LEFT|TA_BASELINE,'v zahraničí s možnosťou odpočítania dane')
TEXT(135,35,TA_LEFT|TA_BASELINE,'v zahraničí bez možnosti odpočítania dane')

TEXT(13,48,TA_LEFT|TA_BASELINE,'plnenia bez dane')
TEXT(13,52,TA_LEFT|TA_BASELINE,'[§ 14 ods. 2 pism. c) zákona]')
TEXT(135,48,TA_LEFT|TA_BASELINE,'plnenia uskutočnené do krajín Európskej')
TEXT(135,52,TA_LEFT|TA_BASELINE,'únie a do asociovaných krajín')
FontFace(Italic)
TEXT(176,52,TA_LEFT|TA_BASELINE,'(vyznačí sa x)')
TEXT(112,257,TA_LEFT|TA_BASELINE,'(vyznačí sa x)')
FontFace(Normal)
TEXT(146,58,TA_LEFT|TA_BASELINE,'áno')
TEXT(176,58,TA_LEFT|TA_BASELINE,'nie')
Box(153,55,3,3)
Box(183,55,3,3)
IF(Eu=1)
  begin
   LINE(153,55,3,3)
   LINE(156,55,-3,3)
  end;
IF(Eu=0)
  begin
   LINE(183,55,3,3)
   LINE(186,55,-3,3)
  end;
TEXT(8,136,TA_LEFT|TA_BASELINE,'Daň na vstupe a daň na výstupe celkom')
TEXT(8,145,TA_LEFT|TA_BASELINE,'Odpočítanie dane')
TEXT(8,154,TA_LEFT|TA_BASELINE,'Odpočítanie dane podľa § 4 zákona')
TEXT(8,163,TA_LEFT|TA_BASELINE,'Daň vrátená podľa § 38b zákona')
TEXT(8,170,TA_LEFT|TA_BASELINE,'Odvod dane podľa § 20 ods. 8, 12, 14 a')
TEXT(8,174,TA_LEFT|TA_BASELINE,'§ 43 zákona')
TEXT(8,179,TA_LEFT|TA_BASELINE,'Úprava odpočítanej dane pri investičnom')
TEXT(8,183,TA_LEFT|TA_BASELINE,'majetku poľa § 21a zákona')
TEXT(8,191,TA_LEFT|TA_BASELINE,'Ročné vysporiadanie odpočítanej dane')
TEXT(8,200,TA_LEFT|TA_BASELINE,'Celkom')
TEXT(86,219,TA_LEFT|TA_BASELINE,'Nadmerný odpčet')
TEXT(86,223,TA_LEFT|TA_BASELINE,'po úprave podľa § 46a zákona')
TEXT(145,219,TA_LEFT|TA_BASELINE,'Vlastná daňová povinnosť'
TEXT(145,223,TA_LEFT|TA_BASELINE,'po úprave podľa § 46a zákona')
TEXT(8,238,TA_LEFT|TA_BASELINE,'Nadmerný odpočet odpočítaný od vlastnej daňovej povinnosti')
TEXT(8,247,TA_LEFT|TA_BASELINE,'Vlastná daňová povinnosť k úhrade (r. 33 - 36) alebo (r. 35 - 36)')
TEXT(8,257,TA_LEFT|TA_BASELINE,'Vrátenie nadmerného odpočtu podľa § 23 ods. 2 písm. a), b) alebo c) zákona')
TEXT(146,257,TA_LEFT|TA_BASELINE,'a)')
TEXT(165,257,TA_LEFT|TA_BASELINE,'b)')
TEXT(185,257,TA_LEFT|TA_BASELINE,'c)')
Box(151,254,3,3)
IF(a=1)
  begin
   LINE(151,254,3,3)
   LINE(154,254,-3,3)
  end;
Box(170,254,3,3)
IF(b=1)
  begin
   LINE(170,254,3,3)
   LINE(173,254,-3,3)
  end;
Box(190,254,3,3)
IF(c=1)
  begin
   LINE(190,254,3,3)
   LINE(193,254,-3,3)
  end;
  
TEXT(8,273,TA_LEFT|TA_BASELINE,'Výsledok dodatočného daňového priznania')
TEXT(160,21,TA_LEFT|TA_BASELINE,'(§ 42 ods. 4 zákona).')
FontFace(Bold)
TEXT(86,21,TA_LEFT|TA_BASELINE,'Údaje sa zaokrúhľujú na celé Sk smerom nahor')
TEXT(8,31,TA_LEFT|TA_BASELINE,'Uskutočnené zdaniteľné plnenia bez dane')
TEXT(43,65,TA_CENTER|TA_BASELINE,'Uskutočnené zdaniteľné plnenia v tuzemsku')
TEXT(166,65,TA_CENTER|TA_BASELINE,'Daň na výstupe')
TEXT(109,88,TA_CENTER|TA_BASELINE,'Daň na vstupe')
TEXT(43,88,TA_CENTER|TA_BASELINE,'Prijaté zdaniteľné plnenia v tuzemsku')
TEXT(43,111,TA_CENTER|TA_BASELINE,'Dovoz tovaru')
TEXT(109,205,TA_CENTER|TA_BASELINE,'Nadmerný odpočet (r. 30 - 31)')
TEXT(166,205,TA_CENTER|TA_BASELINE,'Vlastná daňová povinnosť (r. 31 - 30)')
TEXT(95.5,265,TA_CENTER|TA_BASELINE,'ÚDAJ DODATOČNÉHO DAŇOVÉHO PRIZNANIA')
TEXT(8,72,TA_LEFT|TA_BASELINE,'14%')
TEXT(8,81,TA_LEFT|TA_BASELINE,'20%')
TEXT(8,95,TA_LEFT|TA_BASELINE,'14%')
TEXT(8,104,TA_LEFT|TA_BASELINE,'20%')
TEXT(8,118,TA_LEFT|TA_BASELINE,'14%')
TEXT(8,127,TA_LEFT|TA_BASELINE,'20%')
FontFace(Normal)
FONTSIZE(2.5)
TEXT(188,285,TA_RIGHT|TA_BASELINE,'Vytlačené systémom WinDUO')
FontSize(3)
TEXT(15,285,TA_LEFT|TA_BASELINE,'Ministerstvo financií SR / DPH 03-2003')

FONTSIZE(4.5)
TEXT(55,10,TA_LEFT|TA_BASELINE,'DIČ')
FONTSIZE(5)
STEXT(64,10,TA_LEFT|TA_BASELINE,5.1,10,GetDataINI('INFO','DIC0'))
STEXT(120,10,TA_LEFT|TA_BASELINE,5.1,3,GetDataINI('INFO','DIC1'))

OPENWNS('HLASDPH.WNS')
TabPos(43)
DefDynSTab(16,3,65,10,5.1,TA_RIGHT|TA_BASELINE,129,10,5.1,TA_RIGHT|TA_BASELINE,193,10,5.1,TA_RIGHT|TA_BASELINE)
TabFromWns(0,0,3,$A8)
TabPos(74)
DefDynSTab(9,2,78,11,5.1,TA_RIGHT|TA_BASELINE,193,11,5.1,TA_RIGHT|TA_BASELINE)
TabFromWns(0,0,2,$88)
TabPos(97)
DefDynSTab(9,2,78,11,5.1,TA_RIGHT|TA_BASELINE,136,11,5.1,TA_RIGHT|TA_BASELINE)
TabFromWns(0,0,2,$28)
TabPos(120)
DefDynSTab(9,3,78,11,5.1,TA_RIGHT|TA_BASELINE,136,11,5.1,TA_RIGHT|TA_BASELINE,193,11,5.1,TA_RIGHT|TA_BASELINE)
TabFromWns(0,0,10,$A8)
TabPos(213)
DefDynSTab(18,2,136,11,5.1,TA_RIGHT|TA_BASELINE,193,11,5.1,TA_RIGHT|TA_BASELINE)
TabFromWns(0,0,2,$A0)
TabPos(230)
DefDynSTab(9,1,193,11,5.1,TA_RIGHT|TA_BASELINE)
TabFromWns(0,0,1,$80)
TabPos(275)
DefDynSTab(9,1,193,11,5.1,TA_RIGHT|TA_BASELINE)
TabFromWns(0,0,1,$80)

END