09001
C
Skoleni 1
!EMPTY(TKP(13400, 1)) .AND. IIF(!EMPTY(TKP(13500, 1)),(TKP(13500, 1)<m.last),.T.)
Pomľcka 3
!EMPTY(TKP(13700, 3)) .AND. IIF(!EMPTY(TKP(13900, 3)),TKP(13900, 3)>m.g_date,.T.)
Pomľcka 2
!EMPTY(TKP(13700, 2)) .AND. IIF(!EMPTY(TKP(13900, 2)),TKP(13900, 2)>m.g_date,.T.)
Pomľcka 1
!EMPTY(TKP(13700, 1)) .AND. IIF(!EMPTY(TKP(13900, 1)),TKP(13900, 1)>m.g_date,.T.)
Pomľcka 4
!EMPTY(TKP(13700, 4)) .AND. IIF(!EMPTY(TKP(13900, 4)),TKP(13900, 4)>m.g_date,.T.)
Skoleni 2
!EMPTY(TKP(13400, 2)) .AND. IIF(!EMPTY(TKP(13500, 2)),(TKP(13500, 2)<m.last),.T.)
Pomľcky
!EMPTY(%POM1%) .OR. !EMPTY(%POM2%) .OR. !EMPTY(%POM3%) .OR. !EMPTY(%POM4%)
51  52  53  54
Skoleni 3
!EMPTY(TKP(13400, 3)) .AND. IIF(!EMPTY(TKP(13500, 3)),(TKP(13500, 3)<m.last),.T.)
Skoleni 4
!EMPTY(TKP(13400, 4)) .AND. IIF(!EMPTY(TKP(13500, 4)),(TKP(13500, 4)>m.last),.T.)
Nevyplnłná poji.
EMPTY(TKP(12100))
Vyplnłná poji.
!EMPTY(TKP(12100))
Inicializace SPROM1
VRATMI('SPROM1','0',.F.)
SPROM1+1
VRATMI('SPROM1',STR(VAL(SPROM1)+1,5,2),.F.)
DoplĄovací ęádek 5 pęed konec
m.delka-m.paticka-m.radek+1
m.delka-m.paticka-m.radek<4
P
Identifikaçní çíslo
[ID çíslo ]
ZAMEST.IDCISLO
Pęíjmení a jméno
[Pęíjmení a jméno
TRIM(zamest.prijmeni-(" "+zamest.jmeno))
Rodné çíslo
[R.çíslo  ]
zamest.rodnec
Název firmy
[XNAZEV FIRMYX]
m.g_firmnm
Dítł - jméno                 1
[Jméno dítłte               1]
TKP(11700, 1)
Trvalé bydliĘtł - PSÇ
[PSÇ ]
TKP(10500)
Pęíjmení+jméno+titul
[Pęíjmení+jméno+TITUL        ]
allt(zamest.prijmeni)+" "+allt(zamest.jmeno)+iif(!empty(zamest.titul),', '+ALLT(zamest.titul),'')
Titul-5 znakľ
[Ti5]
allt(zamest.titul)
Pęechodné bydliĘtł - PSÇ
TKP(10900)
Çíslo zdravotní pojiĘčovny
[ZP]
TKP(12100)
Telefon
[Telefon      ]
TKP(10600)
Pęech çi trv bydliĘtł - młsto
[Pęech çi trv byd - młsto
ALLT(IIF(!EMPTY(TKP(10800)),TKP(10800),TKP(10400)))
Pęech çi trv bydliĘtł - PSÇ
[MPSÇ]
ALLT(IIF(TKP(10900)#' ',TKP(10900),TKP(10500)))
Pęech çi trv bydliĘtł - ulice
[Pęechodné bydliĘtł - uli
ALLT(IIF(!EMPTY(TKP(10700)),TKP(10700),TKP(10300)))
Adresa zamłstnance
[XXXXXXXXXXXXXXXXXXXXADRESAXXXXXXXXXXXX]
%POM1%+', '+%POM2%+', '+%POM3%+' Tel:'+%POM4%
45  43  44  36
Pęechodné bydliĘtł - młsto  25
[Pęech bydliĘtł - młsto25
TKP(10800)
Pęechodné bydliĘtł - ulice  25
[Pęech bydliĘtł - ulice25
TKP(10700)
Trvalé bydliĘtł - młsto     25
[Młsto 25
TKP(10400)
Trvalé bydliĘtł - ulice     25
[Ulice   25
TKP(10300)
Svłęená pomľcka - popis      1
[Svłęená pomľcka - popis     ]
TKP(13700, 1)
Svłęená pomľcka - popis      2
TKP(13700, 2)
Svłęená pomľcka - popis      3
TKP(13700, 3)
Svłęená pomľcka - popis      4
TKP(13700, 4)
Svłęená pomľcka - zapľjçena  1
[Pľjçen]
TKP(13800, 1)
Svłęená pomľcka - zapľjçena  2
TKP(13800, 2)
Svłęená pomľcka - zapľjçena  3
TKP(13800, 3)
Svłęená pomľcka - zapľjçena  4
TKP(13800, 4)
Svłęená pomľcka - cena       1
[PomCena]
TKP(14000, 1)
Svłęená pomľcka - cena       2
TKP(14000, 2)
Svłęená pomľcka - cena       3
TKP(14000, 3)
Svłęená pomľcka - cena       4
TKP(14000, 4)
Ťkolení - druh               1
[Druh Ękolení ]
TKP(13400, 1)
Ťkolení - druh               2
TKP(13400, 2)
Ťkolení - druh               3
TKP(13400, 3)
Ťkolení - druh               4
TKP(13400, 4)
Firma ulice
[XFIRMA ULICEX]
firmdata.ulice
Firma mesto
[XFIRMA MESTOX]
firmdata.mesto
Firma PSC
[FPSC]
firmdata.psc
Firma ICO
[FIRMA ICO]
firmdata.ico
SPROM1
STR(VAL(SPROM1),7,0)
Ťkolení - datum platnosti    1
[Dat.pl]
TKP(13500, 1)
Ťkolení - datum platnosti    2
TKP(13500, 2)
Ťkolení - datum platnosti    3
TKP(13500, 3)
Ťkolení - datum platnosti    4
TKP(13500, 4)
Konec období
KONEC
M.LAST
RÇ, Pęíjmení+jméno+titul
[RÇ         Pęíjmení+jméno+tit.]
zamest.rodnec+' '+TRIM(ALLT(zamest.titul)+IIF(!EMPTY(zamest.titul),' ','')+zamest.prijmeni-(" "+zamest.jmeno))
Název zdravotní pojiĘčovny
X Název zdravotní pojiĘčovny X
stab('zdravpoj',tkp(12100),'nazev','C')
S
Pojistovna
09002
Dítł1
!EMPTY(TKP(11700, 1))
Dítł2
!EMPTY(TKP(11700, 2))
Dítł3
!EMPTY(TKP(11700, 3))
Dítł4
!EMPTY(TKP(11700, 4))
Den nást. a vśst. - ini.
vratmi('SPROM1',stav.nastup,.f.).or.vratmi('SPROM2',stav.vystup,.f.)
Mzdu na ucet
IIF(TKS(11300),.T.,.F.)
Mzdu hotovł
IIF(TKS(11300),.F.,.T.)
Stud. volno
!EMPTY(TKS(12900, 1))
Den nást. a vśst. - tab.
vratmi('SPROM1',min(stav.nastup,SPROM1),.f.).or.vratmi('SPROM2',max(stav.vystup,SPROM2),.f.)
Młsíçní mzda
IIF(TKS(10500)#0,.T.,.F.)
Hodinová mzda
IIF(TKS(10500)=0,.T.,.F.)
NEMDAVKY - Otevęení
vratmi('SPROM1',usedbf('nemdavky',m.g_fpath+'m09\nemdavky.dbf','doklad'),.f.)
DoplĄovací ęádek
m.delka-m.radek-m.paticka+1
m.radek>1
Prac. pomłr ukonçen
!EMPTY(STAV.VYSTUP)
Na dobu urçitou
Na dobu neurçitou
EMPTY(STAV.VYSTUP)
VyplĄ. młs. mzda
!EMPTY(TKS(10500))
VyplĄ. hod. mzda
!EMPTY(TKS(10600)) .and. EMPTY(TKS(10500))
Inicializace SPROM2
VRATMI('SPROM2','    0',.F.)
Inicializace SPROM3
VRATMI('SPROM3','0',.F.)
NEMDAVKY - Uzavęení
vratmi('SPROM1',unusedbf('nemdavky',SPROM1),.f.)
SPROM+1 IF...
IIF(!EMPTY(TKP(12800)) .AND. TKP(12800)<M.FIRST,VRATMI('SPROM1',STR(VAL(SPROM1)+1,5),.F.),.F.)
Poçet prac. celkem
IIF(1=1,VRATMI('SPROM3',STR(VAL(SPROM3)+1,5),.F.),.F.)
Inicializace SPROM4
VRATMI('SPROM4','0',.F.)
Inicializace SPROM5
VRATMI('SPROM5','0',.F.)
Inicializace SPROM6
VRATMI('SPROM6','0',.F.)
Nemoc
tkndl('P|NEM',0,SPROM5,12)
vratmi('SPROM5',%POM1%,.t.).and.tkndl('V',0,SPROM5,12).and.vratmi('SPROM4',0,.t.)
16
Poçet vśst.
IIF(BETWEEN(STAV.VYSTUP,m.first,m.last),VRATMI('SPROM6',STR(VAL(SPROM6)+1,5),.F.),.F.)
91
Poçet nast.
IIF(BETWEEN(stav.nastup,m.first,m.last),VRATMI('SPROM5',STR(VAL(SPROM5)+1,5),.F.),.F.)
SPROM2+1 IF...
IIF(TKP(12500)='C'.OR. TKP(12500)='P' .OR. TKP(12500)='Z',VRATMI('SPROM2',STR(VAL(SPROM2)+1,5),.F.),.F.)
SPROM4+1 IF...
IIF(TKP(12400),VRATMI('SPROM4',STR(VAL(SPROM4)+1,5),.F.),.F.)
1. ęádek v tabulce
M.PORADI=1
DalĘí ęádek v tabulce
M.PORADI>1
SRAZKY - Otevęení
vratmi('SPROM1',usedbf('sraz_h',m.g_fpath+'m09\sraz_h.dbf','poradi'),.f.)
SRAZKY - Uzavęení
vratmi('SPROM1',unusedbf('sraz_h',SPROM1),.f.)
SráĹka
tksrl('P',0,SPROM5)
vratmi('SPROM5',%POM1%,.t.).and.tksrl('V',0,SPROM5).and.vratmi('SPROM4',0,.t.)
DoplĄovací ęádek 7 pęed konec
m.delka-m.radek-m.paticka-6
Pamłč pro filtr
vratmi('sprom7',filter(),.f.)
Filtr - jen aktivní PP
iif(""=filtruj("stav.nastup<=m.last.and.(empty(stav.vystup).or.stav.vystup>=m.first)"),.f.,.f.)
Vrácení pľvodního filtru
iif(""=filtruj(m.sprom7),.f.,.f.)
zamest.idcislo
Den nástupu - min.
Den.Nást
min(stav.nastup,SPROM1)
Status - pracovní pomłr
[Status - pracovní pomłr     ]
STAV.STATUS
Dítł - jméno                 2
[Jméno dítłte               2]
TKP(11700, 2)
Dítł - jméno                 3
[Jméno dítłte               3]
TKP(11700, 3)
Dítł - jméno                 4
[Jméno dítłte               4]
TKP(11700, 4)
Dítł - rodné çíslo           1
[RÇ dítł 1]
TKP(11800, 1)
Dítł - rodné çíslo           2
[RÇ dítł 2]
TKP(11800, 2)
Dítł - rodné çíslo           3
[RÇ dítł 3]
TKP(11800, 3)
Dítł - rodné çíslo           4
[RÇ dítł 4]
TKP(11800, 4)
Pohlaví
Pohl
IIF(uppe(ZAMEST.POHLAVI)='M','MuĹ ',IIF(uppe(ZAMEST.POHLAVI)$'ĺZ','ĺena',' '))
DęívłjĘí pęíjmení
[DęívłjĘí pęíjmení ]
TKP(10000)
Datum narození
[DatNar]
zamest.datumnar
Den vśstupu - max.
Den.Vśst
max(stav.vystup,SPROM2)
Zapoçtené roky
Z.R
TKP(14800)+odprac(%POM1%,%POM2%,"R")+floor((odprac(%POM1%,%POM2%,"D")+TKP(14100))/365)
2  16
Zapoçtené dny
Z.D
mod(TKP(14100)+odprac(%POM1%,%POM2%,'D'),365)
2  16  17
Trvalé bydliĘtł - ulice
[Ulice                       ]
Trvalé bydliĘtł - młsto
[Młsto                       ]
TRIM(zamest.prijmeni-(" "+zamest.jmeno-(" "+zamest.titul)))
Zapoçtená doba slovy
XX     Zapoçtená doba slovy     XXXXXXXX
'rokľ '+num2str(%POM1%)+', dnľ '+num2str(%POM2%)+'.'
17  18
Pęechodné bydliĘtł - ulice
[Pęechodné bydliĘtł - ulice  ]
Pęechodné bydliĘtł - młsto
[Pęechodné bydliĘtł - młsto  ]
Místo narození
[Místo narození    ]
zamest.mistonar
Státní pęísluĘnost
StP
TKP(11200)
Çíslo OP
[Çíslo OP      ]
TKP(10100)
×idiçskś prľkaz
[×. prľk.]
TKP(10200)
Rodinnś stav
[Rodinnś stav ]
TKP(11300)
ManĹel(ka) - jméno
[ManĹel(ka) - jméno
TKP(11400)
ManĹel(ka) - rodné çíslo
[ManĹel-RC]
TKP(11500)
Poçet pracovních pomłrľ
PocPP
1
DosaĹené vzdłlání
[Vzdłlání          ]
TKP(11000)
Obor vzdłlání
[Obor vzdłlání     ]
TKP(11100)
První nástup do zamłstnání
[První ]
TKP(12200)
Zapoçtená odborná praxe (let)
[ZápPrax]
TKP(14300)
Zapoçtené dny nemoci
[ZápoçNm]
TKP(14200)
Nemoc - dalĘí
Po
iif(vratmi('SPROM4',SPROM4+1,.t.).and.vratmi('SPROM3',tkndl('R|NEM',SPROM4,SPROM5,12),.t.).and.empty(pgo(SPROM3,'nemdavky')),SPROM4,SPROM4)
ALLT(IIF(TKP(10800)#' ',TKP(10800),TKP(10400)))
ALLT(IIF(TKP(10700)#' ',TKP(10700),TKP(10300)))
Nemoc - popis
XX  Nemoc - popis   XXXXXXXXXX
nemdavky.poznamka
Nemoc - od
Nemoc od
nemdavky.od
Nemoc - do
Nemoc do
iif(empty(nemdavky.do),%POM1%,nemdavky.do)
Nemoc - poçet dnľ
NemD
iif(empty(nemdavky.do),%POM1%,nemdavky.do)-nemdavky.od+1
SráĹka - dalĘí
iif(vratmi('SPROM4',SPROM4+1,.t.).and.vratmi('SPROM3',tksrl('R',SPROM4,SPROM5),.t.).and.empty(pgo(SPROM3,'sraz_h')),SPROM4,SPROM4)
SráĹka - popis
XXX  SráĹka - popis  XXX
left(stab('sraztyp',sraz_h.typ,'popis','C'),24)
SráĹka - splaceno
Splacen
tksrl('S',SPROM4,SPROM5)
SráĹka - pohledávka
Pohledá
iif(sraz_h.celkem=0,0,sraz_h.celkem-%POM1%)
52
SráĹka - młsíçní splátka
Splatka
sraz_h.splatka
SráĹka - çíslo úçtu
XXX     Çíalo úçtu     XX
iif(sraz_h.interni,'POHLEDĆVKA FIRMY',sraz_h.ucet)
SráĹka - variabilní symbol
Var.symbol
iif(sraz_h.interni,space(10),sraz_h.varsymb)
SráĹka - konstantní symbol
K.S.
iif(sraz_h.interni,space(4),sraz_h.konsymb)
SráĹka - specifickś symbol
Spec. symbol
iif(sraz_h.interni,space(12),sraz_h.spesymb)
Nemoc - druh dávky
XXX     Druh dávky     XXXXXXX
stab('nddruh',nemdavky.druh,'popis','C')
Telefon mzdové úçtárny
XX  Telefon mzdové úçtárny  XX
stab('TEXTY','TELMUCT','obsah','C')
ZL - pokus
.,sdfxn
str(m.radek,3,0)+', '+str(m.paticka,2,0)+', '+str(m.delka,3,0)
Rodné pęíjmení
[Rodné pęíjmení    ]
TKP(10000,0,zamest.datumnar)
Den nástupu do PP
[Nást. ]
STAV.NASTUP
Den ukonçení PP
[Vśst. ]
IIF(!EMPTY(STAV.VYSTUP),STAV.VYSTUP,'')
Stęedisko
STR
STAV.STRED
Pracovní zaęazení
[Pracovní zaęazení ]
TKS(10000)
Místo vśkonu práce
[Místo vśkonu práce]
TKS(10300)
[MesMzd
TKS(10500)
Pracovní doba
[Pracovní doba]
TKS(10800)
ZkuĘební doba (młsíce)
[Z]
TKS(12500)
Çíslo úçtu
[Çíslo úçtu            ]
TKS(11400)
Studijní volno - popis       1
[Studijní volno - popis      ]
TKS(12900, 1)
Studijní volno - hodin tśdn  1
[St.vol.]
TKS(13000, 1)
Poçet dłtí
[XXXXPOC DTIXXX]
IIF(!EMPTY(%POM4%),'4',IIF(!EMPTY(%POM3%),'3',IIF(!EMPTY(%POM2%),'2',IIF(!EMPTY(%POM1%),'1','0'))))
5   6   7   8
[Hod
TKS(10600)
Śvazek
[Śvaz
ALLT(STR(TKS(10900),5,1))
Firma - ulice
Firma - młsto
Firma - PSC
[PSC]]
Firma - ICO
[XFIRM ICOX]
Název zdrav poj
[XXPOJISTXX]
STAB('ZDRAVPOJ',TKP(12100),'NAZEV')
Vłk zam.
VEK
VEK(zamest.datumnar)
Kód
K
STAV.TYPPP
Kategorie
Kat
TKS(10200)
Hod. mzda za młs.
CELKM
TKS(10600)*TKS(10900)*m.d_dnymes00/5
Celkem mzdy
MZDY CELKEM
%POM1%+%POM2%
94  72
Dľvod ukonçení PP
[Dľvod ukonçení              ]
STAV.DUVOD
Poçet dłlníkľ
PODEL
IIF(%POM1%='D',1,0)
92
Poçet THP
POTHP
IIF(%POM1%='T',1,0)
Poçet prac. celkem SPROM3
PRCEL
SPROM3
Poçet DOPC,...
PODOP
IIF(%POM1%='B' .OR. %POM1%='C' .OR. %POM1%='D' .OR. %POM1%='E',1,0)
Poçet nast. SPROM5
PON
SPROM5
Poçet vśst. SPROM6
POVYS
SPROM6
Období
OBdoBő
DTOC(M.FIRST)+'-'+DTOC(M.LAST)
Poçet OON
POC O
IIF(%POM1%='C' .OR. %POM1%='D' .OR. %POM1%='E',1,0)
SPRO1
SPROM2
SPRO2
SPROM4
SPRO4
Nárok na dovolenou - dny     1
DoN
TKS(12000, 1)+TKS(12300, 1)
Çerpaná dovolená             1
DoÇ
TKS(12100, 1)+TKS(12200, 1)
Zľstatek dovolené            1
DoZ
%POM1% - %POM2%
109 110
Ťkoda - text závazku
XXX Text závazku  XXXXXXXXXXXXXXXXXXXXXX
padr(trim(zadat(trim(%POM2%)+' '+trim(%POM1%)+' uznává svľj závazek ; ','C',50))+' ',50,'.')
22 114
Ťkoda - vśĘe
VśĘe Ękody
zadat(' VśĘe Ękody pracovníka: '+trim(%POM1%)+' ; ','N',10,2,'SPROM3')
22
Oslovení
Osl.
iif(zamest.pohlavi='M','Pan','Paní')
Ťkoda - zpľsob úhrady
XXX Zpľsob úhrady XXXXXXXXXXXXXXXXXXXXXX
zadat(trim(%POM2%)+' '+trim(%POM1%)+' ; se zavazuje vzniklou vśĘi Ękody uhradit (zpľsob úhrady) ; ','C',74)
Sprom 3...
Zamłstnanec
sys(15,g_cs,zamest.prijmeni+zamest.jmeno)+str(unicislo,5)+hnizdo
stav.stred
09003
(!EMPTY(TKP(11700, 1)))
195
(!EMPTY(TKP(11700, 2)))
196
(!EMPTY(TKP(11700, 3)))
197
(!EMPTY(TKP(11700, 4)))
198
F
.F.
SPROM1>0
val(SPROM1)>0
DoplĄovací ęádek 30 pęed konce
29>m.delka-m.radek
Text do SPROM2 pro vśplatnice
iif(empty(zadat('Zadejte pokraçování textu, kterś bude tiĘtłn na spodní ęádce vśplatní pásky:;','C',78,0,'SPROM2')),.f.,.f.)
Roçní zúçtování - pęeplatek
%POM1%>0
283
Roçní zúçtování - nedoplatek
309
DoplĄovací ęádek 10 pęed konce
9>m.delka-m.radek
Zjisti hl. prac. pomłr
IIF(STAV.RIDICI,VRATMI('SPROM1',STAV.TYPPP,.F.),.F.)
DoplĄovací ęádek 3 pęed - ELDP
3+2*(year(m.posledni)-year(m.prvni)+1)>m.delka-m.radek
VRATMI('SPROM1',STR(VAL(SPROM1)+1,4),.F.)
VRATMI('SPROM2','0',.F.)
SPROM2+1 jestliĹe podepsal
IIF(%POM1%,VRATMI('SPROM2',STR(VAL(SPROM2)+1,4),.F.),.F.)
96
Je vyplnłna zdrav. poj.
Neni vyplnłna zdrav. poj.
SPROM1#SPROM2
Poçet zam-cľ pro stravenky
IIF(%POM1%#0 .OR. %POM2%#0,VRATMI('SPROM1',STR(VAL(SPROM1)+1,4,0),.T.),.F.)
132S146S
Text do SPROM1 pro vśplatnice
iif(empty(zadat('Zadejte text, kterś bude tiĘtłn na spodní ęádce vśplatní pásky:;','C',78,0,'SPROM1')),.f.,.f.)
Odprac. dny#0
TK(10300)#0
Odprac. hod#0
TK(10300)=0
Je invalida
SPROM5#'11111'
Inicializace SPROM1=111111-1..
VRATMI('SPROM1','111111-111111',.F.)
Období pro dłti-zaçátek      1
IIF(%POM1%='A' .AND. SPROM1='111111',VRATMI('SPROM1',str(rok,4)+str(mesic,2)+RIGHT(SPROM1,7),.F.),.F.)
Období pro dłti-konec        1
IIF(%POM1%='A',VRATMI('SPROM1',LEFT(SPROM1,7)+str(rok,4)+str(mesic,2),.F.),.F.)
Inicializace SPROM2=111111-1..
VRATMI('SPROM2','111111-111111',.F.)
Inicializace SPROM3=111111-1..
VRATMI('SPROM3','111111-111111',.F.)
Inicializace SPROM4=111111-1..
VRATMI('SPROM4','111111-111111',.F.)
Období pro dłti-zaçátek      2
IIF(%POM1%='A' .AND. SPROM2='111111',VRATMI('SPROM2',str(rok,4)+str(mesic,2)+RIGHT(SPROM2,7),.F.),.F.)
Období pro dłti-konec        2
IIF(%POM1%='A',VRATMI('SPROM2',LEFT(SPROM2,7)+str(rok,4)+str(mesic,2),.F.),.F.)
Období pro dłti-zaçátek      3
IIF(%POM1%='A' .AND. SPROM3='111111',VRATMI('SPROM3',str(rok,4)+str(mesic,2)+RIGHT(SPROM3,7),.F.),.F.)
Období pro dłti-konec        3
IIF(%POM1%='A',VRATMI('SPROM3',LEFT(SPROM3,7)+str(rok,4)+str(mesic,2),.F.),.F.)
Období pro dłti-zaçátek      4
IIF(%POM1%='A' .AND. SPROM4='111111',VRATMI('SPROM4',str(rok,4)+str(mesic,2)+RIGHT(SPROM4,7),.F.),.F.)
Období pro dłti-konec        4
IIF(%POM1%='A',VRATMI('SPROM4',LEFT(SPROM4,7)+str(rok,4)+str(mesic,2),.F.),.F.)
Inicializace SPROM5=111111-1..
VRATMI('SPROM5','111111-111111',.F.)
Období pro inv.-zaçátek      1
IIF((SPROM5='11111') .AND. (TKP(12500)='C' .OR. TKP(12500)='Z' .OR. TKP(12500)='P'),VRATMI('SPROM5',str(rok,4)+str(mesic,2)+RIGHT(SPROM5,7),.F.),.F.)
Období pro inv.-konec        1
IIF(TKP(12500)='C' .OR. TKP(12500)='Z' .OR. TKP(12500)='P',VRATMI('SPROM5',LEFT(SPROM5,7)+str(rok,4)+str(mesic,2),.F.),.F.)
SPROM2+1
VRATMI('SPROM2',STR(VAL(SPROM2)+1,4),.F.)
DoplĄovací ęádek 20 pęed konce
IIF(M.STRANA=1,20 > m.delka-m.radek,10>m.delka-m.radek)
Není konec
!m.konec
Dítł4 exist
ManĹel(ka)
!EMPTY(TKP(11400))
Pracoval v období
277S
DoplĄovací ęádek od 20 dál
m.radek>20
Poçet podepsanśch
IIF(!%POM1%,VRATMI('SPROM1',STR(VAL(SPROM1)+1,2),.T.),.F.)
74
Poçet podepsanśch záloh
IIF(%POM1%>0,VRATMI('SPROM1',STR(VAL(SPROM1)+1,2),.T.),.F.)
134S
Záloha na mzdu
Není SPROM2=1
val(SPROM2)>1
SPROM2+UVAZEK
VRATMI('SPROM2',STR(VAL(SPROM2)+TKS(10900)*NDNY('PS')/KDNY('PS'),9,2),.F.)
84
Poçet kalendáęních dní - nemoc
NemKalD
TKND('NEM','N')
IIF(UPPE(ZAMEST.POHLAVI)='M','MuĹ ',IIF(UPPE(ZAMEST.POHLAVI)$'Zĺ','ĺena',' '))
Jméno
[Jméno             ]
zamest.jmeno
SPROM2 - 78 znakľ
XXXXX SPROM2 .. 78 znakľ ...............
Poçet kalendáęních dní - OCR
OCRKalD
TKND('OC','N')
iif(month(m.prvni)=_obdobi.mesic,1,0)
Základ zdrav. poj. ęídící
[ZákZPę
TK(25700)
(allt(zamest.prijmeni)+" "+ALLT(zamest.jmeno)+' '+zamest.titul)
Zobrazovanś rok
[ROK]
ROK
Základ zdrav. poj. ęídící    p
[ZkZPęp
%POM1%/M.PORADI
20S
Poçet vydanśch stravenek
Str
TK(27100)
Pęevedeno na úçet
[Na úçe
TK(31500)
Jméno a pęíjmení
TRIM(zamest.jmeno-(' '+zamest.prijmeni))
Hrubá mzda + VPP p
HRUB+VP
225S
Vyplaceno hotovł
[Hotovł
TK(31600)
Variabilní symbol
[Var.sym.]
TKS(11500)
Konstantní symbol
[KS]
TKS(11600)
Specifickś symbol
[Spec.symb.]
TKS(11700)
Pęevedeno na úçet - poçet
Ś-Poç
iif(%POM1%,1,0)
Vyplaceno hotovł - poçet
H-Poç
iif(%POM1%,0,1)
Zdrav. + soc. pojiĘtłní
[SoZaPo
iif(%POM1%,SECTIML('26300;25900;25800',.t.),0)
163
Základ danł
[ZáklDa
%POM1%-%POM2%
55  49
Zálohová daĄ
[DaĄ
TK(30200)
Odpoçet na invaliditu (Ne, typ
I
IIF(TKP(12500)='N','',TKP(12500))
XX  FIRMA ULICE   XXXXXXX
FIRMDATA.ULICE
Firma-młsto
XX  FIRMA MESTO   XXXXXXX
FIRMDATA.MESTO
Fi-PSC
FIRMDATA.PSC
Doplatek mzdy
[Doplat
TK(31400)
Młsíc tisknuvĘí se
MM
str(mesic,2)
Firma IÇO
[XXFIRMAICOXX]
FIRMDATA.ICO
Młsíc tisknuvĘí se-název
[MMNAZEV]
_MESICE(mesic)
Firma+Adresa firmy
ADRESA FIRMY
ALLT(M.G_FIRMNM)+', '+ALLT(%POM1%)+', '+ALLT(%POM2%)+' PSÇ: '+%POM3%
53  54  56
SráĹková daĄ
[SráĹDa
TK(30400)
Poslední młs. zobr. období-naz
[POSLME]
_MESICE(MONT(M.POSLEDNI))
Oprava danł (sráĹkové)
[SraDaĄ
TK(30300)
Blahopęání k narozeninám
XXXXX Blahopęání k narozeninám .........
"K VaĘemu Ĺivotnímu jubileu Vám pęejeme mnoho úspłchľ a pevné zdraví."
month(gomonth(zamest.datumnar,-1))=val(%POM1%)
58
Základ sociálního pojiĘtłní
[SPZákl
TK(26200) - TK(22400)
IIF(!EMPTY(STAV.VYSTUP),STAV.VYSTUP,'    ')
Ostatní jednorázové sráĹky
[OstSrá
TK(31700)
Ostatní sráĹky typu "B"
OSTSR B
TKSRAZ(PTSUMA('sraztyp','sraztyp','"B"$skupina'))
Mzda na úçet?
U
TKS(11300)
Zdravotní pojiĘtłní - oprava
[ZPOpra
TK(28100)
Sociální pojiĘtłní - oprava
[SPOpra
TK(28000)
×ídící pracovní pomłr-KOD
IIF(STAV.RIDICI,STAV.TYPPP,'');
IIF(EMPTY(zamest.rodnec),padr(dtoc(zamest.datumnar),11),zamest.rodnec)
Podepsal prohláĘení od-do
ProhláĘ.  od-do
dtom(TKHP('12900',0,'A',0,max(m.prvni,start(left(SPROM3,6))),min(m.posledni,stop(str(rok,4)+str(mesic,2)))),99)
Roçní zúçtování danł - bylo
XX  Roçní zľçtování danł bylo/nebylo  XX
iif(empty(%POM1%),'nebylo provedeno.','bylo provedeno s tímto vśsledkem:')
Roçní zúçtování danł - nedopl.
[Roç.Da
-1*TK(  300)
Odmłny jednatelľ s.r.o (ş6/1b)
[OdmJed
TK(22900)
[HodM
[Śvaze
TKS(10900)
Neplacené volno (prac.dny - pr
[NepVo
TK(13800)
Odvedená zálohová daĄ
ODVZDAN
51 280
Odmłny çlenľ stat.org. (ş6/1c)
[OdmSta
TK(23000)
ELDP - Zapoçtenś młsíc
X
iif(SJAK('M').and.TK(26200)-TK(22400)=0.and.TKND('',iif(m.g_09vemaor=1,'N','P')+'D')=0.and.%POM1%<MESDNY(),'X',' ')
129
Poçet zam.
POCZA
padl(SPROM1,5)
Obdobi
[OBDOBI]
DTOC(M.PRVNI)+'-'+DTOC(M.POSLEDNI)
Hrubá mzda
[HrubáM
TK(25000)
Základ zdravotního pojiĘtłní
[ZáklZP
iif(stav.ridici,TK(25700)-TK(22300),TK(25600))
Zdravotní pojiĘtłní - z-ec
[ZPZ-ec
SECTIML('25800;25900',.t.)
Sociální pojiĘtłní
[SocPoj
TK(26300)
Podepsal prohláĘení k dani?
D
TKP(12900)
Podepsalo - SPROM2
PODP
padl(SPROM2,4)
Prľmłr na nemoc
[PrľmN
TK(14100)
Prľmłr na dovolenou
[PrľmD
TK(14200)
Odpracované hodiny celkovł
[CelkH
TK(10700)
Hodiny na zakázkách  - celkem
[OdHZa
TK(11300)
Pęesçasové hodiny - celkem
[PęesH
TK(16300)
Hodiny ve svátek - celkem
[SvatH
TK(11600)
Rok tisknutś
Rok.
str(rok,4,0)
Neodpracované svátky (dny) - c
[Svát
TK(12900)
Proplacená dovolená (dny)
PropDo
TK(13500)
Zľstatek dovolené
ZľstDo
TK(  200)
Nemocenské náhrady - kal dny
[Nemoc
TKND('','N')
Pracovní volno placené (hod.)
[PlaVo
TK(13000)
Neomluvená absence (hod.)
[Absen
TK(13700)
Prémie
[Prémie
TK(19900)
Pęíplatek za pęesças
[PęPęes
TK(18800)
Pęíplatek za práci ve svátek
[PęSvát
TK(18200)
Pęíplatek za práci v noci
[PęNoc]
TK(18400)
Pęíplatek za prostęedí
[PęPros
TK(18600)
Ostatní pęíplatky - Kç   1,2
[OstPęí
TK(12600, 0)+TK(18900)
Ostatní danłné pęíjmy ho HM
[Ostat
TK(22000)
Mimoęádné odmłny - vĘechny
[MimOdm
TK(20200)+TK(20100)+TK(20000)
Çástka za çerpanou dovolenou
[DovCas
TK(19600)
Çástka za proplacenou dovoleno
[PropCa
TK(19800)
Vojenská povinnost
[VojPov
TK(20800)
Placené volno
[PlacVo
TK(19400)
Podíly na zakázkách - celkem
[PodZak
TK(14700)
Odstupné - celkem
[Odstup
TK(21200)
Naturální pęíjem
[NaturP
TK(20400)
Nezdanitelné minimum
[Ned.mi
TK(29500)
Odpoçet na dłti
[OdpDłt
TK(29800)
Çistá mzda - mezisouçet
[ÇMMezi
TK(31000)
ELDP - Dny vojenské sluĹby
VDn
SJAK('VPV')+SJAK('VPC')
Nemocenské náhrady - penłĹní d
[NemocK
TK(14000)
SráĹky celkem
[SráĹky
TK(31200)
Stravenky za plnou cenu-poç
[StrPlP
INT(TK(27200)/tkgp('STRAPL'))
Stravenky celkem Kç
STRCELK
144 145
[Záloha
TK(31100)
PROM1
Název zdrav. pojiĘčovny
[XXXXXXNAZEV POJISXXXXXXX]
Zdravotní pojiĘtłní - z-tel
[ZPZ-te
TK(26000)
Souçet zdr. poj
SOUCZDRA
TK(26000)+TK(25800)+TK(25900)
Procento SP tel
SPTEL
tkgp('SPZTEL')
Procento ZP tel
ZPTEL
tkgp('ZPZTEL')
ELDP - Dny
Dny
iif(empty(%POM2%),ndny(),%POM1%)
129  89
Odpoçet na invaliditu
[Invali
TK(29700)
Odpoçet na studenta
[Studen
TK(29600)
Stravenky za plnou cenu
[StraPl
TK(27200)
Stravenky za sníĹenou cenu
[StraNi
TK(27300)
Stravenky za sníĹenou cenu-poç
[StrNiP
INT(TK(27300)/tkgp('STRANI'))
Mzdové náklady
MZDY NA
%POM1% * iif(stav.pojist.and.!stav.typpp$'ES',(tkgp('ZPZTEL')+tkgp('SPZTEL')+100)/100,1)
Hrubś pęíjem
HRUBPRI
TK(30500)
ELDP - Vylouçené doby
VylD
vydo(max(m.prvni,start(str(rok,4))), min(m.posledni,stop(str(rok,4))))+%POM1%
129S
ELDP - Nstup a vśstup
X Nástup a vśstup X
dtoc(stav.nastup)+' - '+dtoc(stav.vystup)
_pocet(m.vnoreni)=1
Druh çinnosti
DC
ALLT(CHRTRAN(stav.typpp,'ABCDEJS','0165670'))
77
SP celkem
SPCELK...
209  95
Prľmłrnś poç. zam.
PRUMZAM
ZAOK(VAL(SPROM2)/tkgp('uvazek'),'2 1')
Çástka za odpracovanou dobu
[Çástka
TK(18000)
Hodiny odpracované mimo úkol
[OdHMU
TK(11000)
Hodiny v noci - celkem
[Noc-H
TK(11900)
Hodiny ve Ękodlivém prostęedí
[ProsH
TK(12200)
Pracovní pohotovost (hod.)- ce
[Poho
TK(16600)
Ostatní pęíplatky - hodiny 1+2
[OPęíH
TK(12500, 0)
ELDP - Pracovní pomłr
Çerpaná dovolená (dny)
ÇerpDo
TK(13300)
Śkolová mzda - celkem
[ŚkolMz
TK(15000)
Zálohová daĄ (pęíznak)
z
tk(31800)
Náhrada za pohotovost
[Pohoto
TK(20600)
Odmłna za vynálezy a ZN
[Vynále
TK(26800)
Název firmy dlouhś
XXX  NAZEV FIRMY           XXX
7 promile z vym.základu
7 promile
%POM1%*7/1000
66
Datum
datum...
m.g_date
Ostatní plnłní
[OsPln.
TK(21800, 0)
Ostatní odeçitatelné poloĹky
[Ost.Od
TK(29200)+TK(29300)
Spoęení interní
SPORINT
TKSRAZ('SP','I')
Spoęení externí
SPOREXT
TKSRAZ('SP','E')
Pľjçky interní
PUJCINT
TKSRAZ('PU','I')
Pľjçky externí
PUJCEXT
TKSRAZ('PU','E')
Ťkody interní
SKODINT
TKSRAZ('SK','I')
Ťkody externí
SKODEXT
TKSRAZ('SK','E')
VśĹivné
VYZIVNE
TKSRAZ('VYZ')
PojiĘtłní
POJIST.
TKSRAZ('POJ')
Exekuce
EXEKUCE
TKSRAZ('EXE')
Spoęení souçet
SPORSOU
TKSRAZ('SP')
Odpracované dny - celkem
[OdpDC
TK(10300)
Odpracované hodiny - celkem
[OdpHC
TK(10600)
Proplacené svátky
[Svát.K
TK(19200)
Poçet proplacenśch dní - nemoc
NEMOC D
TKND('NEM','P',TK(10000))
Pľjçky souçet
PUJCSOU
TKSRAZ('PU')
Ostatní odeçitatelné poloĹky p
[OsOd.p
170S
SráĹky celkem +zal+strav
SECTIML('30700;31100;31200',.t.)+%POM1%
133
TKS(12000, 1)
Ťkody souçet
SKODSOU
TKSRAZ('SK')
Renta
[Renta
TK(26500)
Firma DIÇO
[XXFIRMADICOXX]
FIRMDATA.DIC
1. Zobrazovanś młsíc
CI
MONTH(SPROM1)
Poslední młs. zobr. období-cis
CP
MONTH(SPROM2)
Dítł - odpoçet (Ne,Ano,ZTP-  1
O
TKP(12000, 1)
Dítł - odpoçet (Ne,Ano,ZTP-  2
TKP(12000, 2)
Dítł - odpoçet (Ne,Ano,ZTP-  3
TKP(12000, 3)
Dítł - odpoçet (Ne,Ano,ZTP-  4
TKP(12000, 4)
SPROM1-15 znakľ
SPROM 15
SUBSTR(SPROM1,5,2)+'.'+LEFT(SPROM1,4)+'-'+RIGHT(SPROM1,2)+'.'+SUBSTR(SPROM1,8,4)
SPROM2-15 znakľ
SPROM2 15
SUBSTR(SPROM2,5,2)+'.'+LEFT(SPROM2,4)+'-'+RIGHT(SPROM2,2)+'.'+SUBSTR(SPROM2,8,4)
SPROM3-15 znakľ
SPROM3 15
SUBSTR(SPROM3,5,2)+'.'+LEFT(SPROM3,4)+'-'+RIGHT(SPROM3,2)+'.'+SUBSTR(SPROM3,8,4)
SPROM4-15 znakľ
SPROM4 15
CHRT(SUBSTR(SPROM4,5,2)+'-'+RIGHT(SPROM4,2),' ','0')
SPROM4#'111111-111111'
SPROM5-15 znakľ
SPROM5 15
CHRT(SUBSTR(SPROM5,5,2)+'-'+RIGHT(SPROM5,2),' ','0')
Omluvená absence
OMABS
KDNY()-%POM1%+TKND('','N')-TKND('VPT','N')+TK(15800)+TK(13600)+SJAK('VPV')+SJAK('VPC')+SJAK('VPM')-TKND('MD1;MD2','N')
277
Vojenská povinnost (dny)
[VojPo
TK(13100)
Náhradní doby
NAHRD
TKND('NEM|OPR',iif(m.g_09vemaor=1,'N','P'))+TKND('OC1|OC2|MD1|MD2','N')+TK(15800)+sjak('VPV')+SJAK('VPC')
Sociální celkem
SOC.S.Cel
297  95C
Den vśplat
DEV
ALLT(STR(tkgp('DEND'),2))+'.'
Základ soc * 26% celkovś souç.
SUMZS*26
ZAOK(((%POM1%*tkgp('SPZTEL'))/100),'3 1')
66C
Dľchod od data
[DuchOd]
IIF(!EMPTY(TKP(12800)),TKP(12800),' ')
Stravenky celkem kusľ
STRCPoç
132 146
Ostatní plnłní - çástka
[OstNáh
TK(21500, 0)
KAT
Pęidłlenś var. symbol
PVS
stab('text','SSZPVS','obsah','C')
SPROM1 4,0
SPR1
Firma Fax
FPFAX
FIRMDATA.FAX
Ostatní sráĹky typu "C"
OSTSR C
TKSRAZ(PTSUMA('sraztyp','sraztyp','"C"$skupina'))
Firma stát
[XXFIRMASTATXX]
FIRMDATA.STAT
Tęináctś plat
13PLAT
TK(22500)+TK(22600)
Oprava HM
OprHrMz
TK(24900)
Bolestné
[Bolest
TK(26900)
Ostatní sráĹky 'OST'
OSTSR O
TKSRAZ('OST')
Hrubá mzda + VPP
HRUB +V
TK(25000)+TK(22200)+TK(22100)
Filtr - jen ęídící prac. pomłr
JEN RIDICI
FILTRUJ('STAV.RIDICI')
Pohyblivá çást mzdy
POHYB
TK(25000)+TK(22200)+TK(22100)-TK(18000)
Ost. náhrady + voj +renta....
[ON+R+V
TK(21500, 0)+TK(26500)+TK(20800)+TK(25200)+TK(26400)+TK(26800)
Základ danł dílçí
[ZDaĄDí
TK(25000)+TK(22200)+TK(22100)+TK(21500, 0)+TK(26500)+TK(20800)-TK(26300)-TK(25900)+TK(33200)
SníĹ. základ danł
SNIZZDA
%POM1%-TK(29500)-TK(29800)-TK(29700)-TK(29600)-TK(29300)-TK(29200)
229
Zamłstnanec - ulice
ZAM ULICE
IIF(!EMPTY(TKP(10700)),TKP(10700),TKP(10300))
Zamłstnanec - młsto
ZAM MESTO
IIF(!EMPTY(TKP(10800)),TKP(10800),TKP(10400))
Zamłstnanec - PSÇ
ZAM PS
IIF(!EMPTY(TKP(10900)),TKP(10900),TKP(10500))
ManĹel(ka) - odpoçet (Ne,Ano,Z
TKP(11600)
Náhrada vśdaje celkem
[Vśd. K
TK(26700, 0)
Zdravotní pojiĘtłní 9% za abse
[ZPAbsN
TK(25800)
SPROM2 4,0
SPR2
Ulice , młsto
[XXXXXULICE+MESTOXXXXXXXXX]
ALLT(%POM1%)+', '+ALLT(%POM2%)
45  43
Pohyblivá çást mzdy-prľmłr
POHYBp
227S
Ost. náhrady + voj +renta....p
228S
Zdravotní pojiĘtłní - zamłstnp
[ZP Z-e
94S
Sociální pojiĘtłní p
95S
Zdrav. + soc. pojiĘtłní p
244 245
Základ danł dílçí p
229S
Zálohová daĄ p
[DaĄ  p
51S
SráĹková daĄ p
62S
Nemocenské náhrady -penłĹní dp
130S
Çistá mzda - mezisouçet      p
[ÇMMezp
128S
Nezdanitelné minimum p
126S
Odpoçet na dłti p
127S
Odpoçet na invaliditu p
142S
Odpoçet na studenta p
143S
SníĹ. základ danł p
231S
Stravenky celkem Kç p
STRCELp
(%POM1%+%POM2%)/M.PORADI
144S145S
VśĹivné p
VYZIV p
177S
Spoęení souçet p
SPORS p
180S
Pľjçky souçet p
PUJCS p
185S
Exekuce p
EXEC  p
179S
PojiĘtłní p
POJISTp
178S
Ostatní sráĹky typu "B"      p
OSSR Bp
73S
SráĹky celkem p
131S
Doplatek mzdy p
57S
Základ zdravotního pojiĘtłní p
[ZákZPp
93S
Peníze za nemoc
P NEMOC
TKND('NEM','C')
Poçet proplacenśch dní - OCR
OCR D
TKND('OC','P',TK(10000))
Peníze za OCR
P OCR
TKND('OC','C')
PenłĹitá pomoc v mateęství
P MATER
TKND('MD','C')
Peníze za VPT
P VPT
TKND('VPT','C')
Rozdíl pojistné - vyplacené d
POJ-NEM
207 274C
Nemocenské náhr. peníze TKND
SOUCPN
%POM1%+%POM2%+%POM3%+%POM4%
271 268 270 272
SPCELK..
209  95C
Kalendáęní dny v zamłstnání
KZ
NDNY()
Telefonní çíslo mzdové úçtárny
X Telefon mzd.úłt. X
stab('text','TELMUCT','obsah','C')
Ostatní náhrady
TK(27000)
Roçní zúçtování danł - pęepl.
TK(  300)
Nedoplatky danł
DaĄNedo
iif(tk(300)>0,0,abs(tk(300)))
Pęeplatky danł
DaĄPęep
iif(tk(300)>0,tk(300),0)
Çíslo úçtu firmy
XX Çíslo úçtu  XXXXXXXXXX
m.tiskucet
Ztráta na vśdłlku
[Ztráta
TK(22700)
SluĹební auto
[SluĹAu
TK(26400)
Ostatní sráĹky typu "A"
OSTSR A
TKSRAZ(PTSUMA('sraztyp','sraztyp','"A"$skupina'))
Çástka na úçet - text
"Çástka na úçet
iif(TKS(11300),'Çástka na úçet','Doplatek')
SPROM1 - 78 znakľ
XXXXX SPROM1 .. 78 znakľ ...............
Zálohová daĄ + zúçtování
[DaĄ-RŚ
TK(30200)-TK(300)
Základ danł pro vśpoçet
TK(30000)
Základ danł zvláĘtní sazbou
[ZáklSr
TK(30600)
Peníze za opravné doklady ND
P OPRnd
TKND('OPR','C')
Hrubá mzda - nákladové mzdy
[HrMNák
iif(stav.typpp$'CDE',0,tk(25000)-tk(22700)-tk(21200))
Hrubá mzda - OON
[HrMOON
iif(stav.typpp$'CDE',tk(25000),tk(21200))
Doplatek mzdy - pęevod na úçet
[DoŚçet
iif(tks(11300),TK(31400),0)
Základ soc * 26% SKUP. souç.
66S
Sociální za skupinu
SOC.S.Sk.
297  95S
Doplatek mzdy - hotovł
[DoHoto
iif(tks(11300),0,TK(31400))
Doplatek do minimální mzdy
[DMinMz
TK(25200)
Çíslo strany ML
CS
mod(m.strana-1,3)+1
Telefon zamłstnance
Nárok na odpoçet u studenta
TKP(12400)
Fond pracovní doby - hodiny
[Fpd H
TK(16000)
Pęíjmy pro úçely starobního dľ
Dľch.pę
TK(29400)
Základ ZP - oprava
TK(25500)
Základ SP - oprava
[SPZakO
TK(26100)
Oprava základu danł
[ZáklD.
TK(29900)
Oprava danł (zálohové)
[ZálDaĄ
TK(30100)
SráĹka 9% ZP za neplacené voln
[SráĹ.Z
TK(30700)
PauĘální náhrada cestovních vś
[PauĘMH
TK(27600)
Procento SP zec
SPZEC
tkgp('SPZEC')
Nemocenské náhrady - opravy
[NemocO
TK(15200)
Młsíc
str(rok,4)+str(mesic,2)
Prac. pomłr
str(p_unikod,5)+p_hnizdo
Rok
str(rok,4)
09004
Jeden młsíc
gomonth(m.prvni,1)-1 = m.posledni
Oba konce
gomonth(m.prvni,1)-1 < m.posledni
Název banky
XXXXX Název banky XXXXXXX
m.tiskbanka
XXXXX Çíslo úçtu XXXXXXXX
Poçet  1
Poçet1
iif(fcount()>7,eval(field(8)),0)
fcount()>7
Poçet  2
Poçet2
iif(fcount()>8,eval(field(9)),0)
fcount()>8
Çástka Kç
Çástka.
castka_kc
Období - jeden młsíc
XXXXX Období XXXXXXXXXXX
padc('za období '+_mesice(month(m.prvni))+' '+str(year(m.prvni),4),24)
Období - oba konce
XXXXX Období od - do XXXXXXXXXXXXXXXXXXX
padc('za období '+_mesice(month(m.prvni))+' '+str(year(m.prvni),4)+' - '+_mesice(month(m.posledni))+' '+str(year(m.posledni),4),40)
Poçet  3
Poçet3
iif(fcount()>9,eval(field(10)),0)
fcount()>9
Poçet  4
Poçet4
iif(fcount()>10,eval(field(11)),0)
fcount()>10
Hodnota  1
Hodn 1
iif(fcount()>7,str(val(chrt(substr(field(8),2),'_','.')),6,0),'')
Hodnota  2
Hodn 2
iif(fcount()>8,str(val(chrt(substr(field(9),2),'_','.')),6,0),'')
X Pęíjmení a jméno X
zamest.prijmeni-(' '+zamest.jmeno-(' '+zamest.titul))
Osobní çíslo
Os. çíslo .
Hodnota  3
Hodn 3
iif(fcount()>9,str(val(chrt(substr(field(10),2),'_','.')),6,0),'')
Hodnota  4
Hodn 4
iif(fcount()>10,str(val(chrt(substr(field(11),2),'_','.')),6,0),'')
Hodnota  5
Hodn 5
iif(fcount()>11,str(val(chrt(substr(field(12),2),'_','.')),6,0),'')
fcount()>11
Hodnota  6
Hodn 6
iif(fcount()>12,str(val(chrt(substr(field(13),2),'_','.')),6,0),'')
fcount()>12
Hodnota  7
Hodn 7
iif(fcount()>13,str(val(chrt(substr(field(14),2),'_','.')),6,0),'')
fcount()>13
Hodnota  8
Hodn 8
iif(fcount()>14,str(val(chrt(substr(field(15),2),'_','.')),6,0),'')
fcount()>14
Hodnota  9
Hodn 9
iif(fcount()>15,str(val(chrt(substr(field(16),2),'_','.')),6,0),'')
fcount()>15
Hodnota 10
Hodn10
iif(fcount()>16,str(val(chrt(substr(field(17),2),'_','.')),6,0),'')
fcount()>16
Hodnota 11
Hodn11
iif(fcount()>17,str(val(chrt(substr(field(18),2),'_','.')),6,0),'')
fcount()>17
Hodnota 12
Hodn12
iif(fcount()>18,str(val(chrt(substr(field(19),2),'_','.')),6,0),'')
fcount()>18
Poçet  5
Poçet5
iif(fcount()>11,eval(field(12)),0)
Poçet  6
Poçet6
iif(fcount()>12,eval(field(13)),0)
Poçet  7
Poçet7
iif(fcount()>13,eval(field(14)),0)
Poçet  8
Poçet8
iif(fcount()>14,eval(field(15)),0)
Poçet  9
Poçet9
iif(fcount()>15,eval(field(16)),0)
Poçet 10
Poçe10
iif(fcount()>16,eval(field(17)),0)
Poçet 11
Poçe11
iif(fcount()>17,eval(field(18)),0)
Poçet 12
Poçe12
iif(fcount()>18,eval(field(19)),0)
Suma  1
iif(fcount()>7,val(chrt(substr(field(8),2),'_','.'))*eval(field(8)),0)
Suma  2
iif(fcount()>8,val(chrt(substr(field(9),2),'_','.'))*eval(field(9)),0)
Suma  3
iif(fcount()>9,val(chrt(substr(field(10),2),'_','.'))*eval(field(10)),0)
Suma  4
iif(fcount()>10,val(chrt(substr(field(11),2),'_','.'))*eval(field(11)),0)
Suma  5
iif(fcount()>11,val(chrt(substr(field(12),2),'_','.'))*eval(field(12)),0)
Suma  6
iif(fcount()>12,val(chrt(substr(field(13),2),'_','.'))*eval(field(13)),0)
Suma  7
iif(fcount()>13,val(chrt(substr(field(14),2),'_','.'))*eval(field(14)),0)
Suma  8
iif(fcount()>14,val(chrt(substr(field(15),2),'_','.'))*eval(field(15)),0)
Suma  9
iif(fcount()>15,val(chrt(substr(field(16),2),'_','.'))*eval(field(16)),0)
Suma 10
iif(fcount()>16,val(chrt(substr(field(17),2),'_','.'))*eval(field(17)),0)
Suma 11
iif(fcount()>17,val(chrt(substr(field(18),2),'_','.'))*eval(field(18)),0)
Suma 12
iif(fcount()>18,val(chrt(substr(field(19),2),'_','.'))*eval(field(19)),0)
09005
Ne personální listy
m.m_evidence#'P'
Název poloĹky
XX  Název poloĹky   XXXXXXXXXXXXXXXXXXXX
popis
Hodnota poloĹky
XX  Hodnota poloĹky   XXXXXXXX
hodnota
Agenda
XX  Agenda   XXXXXXX
iif(m.m_evidence='P','PERSONĆLNőCH LISTŽ',iif(m.m_evidence='S','PRACOVNőCH POMëRŽ',iif(m.m_evidence='M','MZDOVŁCH LISTŽ','')))
XX Období  XXX
_mesice(_mesic)+' '+str(_rok,4)
Osobní çís.
XX  Pęíjmení a jméno   XXXXXXX
Pracovní pomłr
XX   Pracovní pomłr   XXXXXXXX
stav.status
09201
Jen 1. ęádek v tabulce
Jen  dalĘí ęádek v tabulce
DoplĄovací ęádek 4 pęed konec
m.delka-m.paticka-m.radek<3
Prľmłr
[Prľmł
prumery.prumer
Pęíjmení a jméno a titul
[Pęíjmení                    ]
ALLT(zamest.prijmeni)+' '+ALLT(zamest.jmeno)+' '+ALLT(zamest.titul)
Typ prľmłru
[Typ  ]
iif(prumery.typ='N','nemoc  ','náhrady')
Platí od
PLATI OD
prumery.platiod
Platí do
PLATI DO
prumery.platido
Typ PP
stav.typpp
Firma-ulice
FIRMA ULICE
FIRMA MESTO
Firma-PSC
FIPSC
OBDOBI
Text u prľmłru
TEXT PRUM
prumery.prum_txt
STR(P_UNIKOD,5)+P_HNIZDO
09202
vratmi("sprom3",1,.f.)
Inkrement SPROM3
vratmi("SPROM3",m.sprom3+1,.f.)
M.sprom3=1
Jen dalĘí ęádek v tabulce
M.sprom3>1
Poçet nemocí - SPROM1+1
vratmi('SPROM1',str(val(SPROM1)+iif(m.poradi=1 .or. !nemdavky.prenos,1,0),5),.f.)
Poçet neukonçenśc - SPROM2
vratmi('SPROM2',str(val(SPROM2)+iif(empty(nemdavky.do),1,0),5),.f.)
Jednorázová dávka
"C"$nemdavky.typ
Není to jednorázová dávka
!"C"$nemdavky.typ
Doklad
[Doklad]
nemdavky.druh+'-'+padl(nd_cislo,5,'0')+'/'+right(dtoc(nd_datum),2)+'-'+padl(allt(str(nd_mesic,2)),2,'0')+'.'+right(str(nd_rok,4),2)
Jen tento młsíc
!
filtruj('nd_rok=_rok .and. nd_mesic=_mesic')
Çíslo strany
m.strana
Text z ND
[Text uvedenś na dokladu ND  ]
Pęíjmení
zamest.prijmeni
Titul
[Titul   ]
zamest.titul
Pęíj + jméno + titul
PRIJ JMENO TITUL
ALLT(%POM1%)+' '+ALLT(%POM2%)+' '+ALLT(%POM3%)
10   9  11
Proplaceno od
PROPLOD
nemdavky.proplod
Proplaceno do
PROPLDO
nemdavky.propldo
Çástka 50%
CASTK50
NEMDAVKY.CASTKA-%POM1%
Çástka 69%
CASTK69
nd69(nemdavky.dnu69, nemdavky.propldo, nemdavky.prumer)
PRUMER
nemdavky.prumer
FIRMAULICE
Firma-PSÇ
FAPSC
Nemoc celkem
NEM69+5
iif("C"$nemdavky.typ,nemdavky.castka+nemdavky.oprava,IIF(nemdavky.druh='NEM',nemdavky.castka+nemdavky.oprava,0))
15  16
OÇR
OCR
IIF(nemdavky.druh='OC',nemdavky.castka+nemdavky.oprava,0)
Mateę. dov.
MATER
IIF(nemdavky.druh='MD',nemdavky.castka+nemdavky.oprava,0)
VPT
IIF(nemdavky.druh='VPT',nemdavky.castka+nemdavky.oprava,0)
[Śvazek ]
Zdravotní pojiĘtłní - zamłstna
[ZPZ-tel]
Základ soc * 26% souçet celkem
SOC*26
ZAOK(%POM1%,'3 1')
38C
[SPZákl.]
TK(26200)
Oprava
OPRAVA
IIF(nemdavky.druh='OPR',nemdavky.castka+nemdavky.oprava,0)
Dní 50 + 69
DNY56
nemdavky.dnu50+nemdavky.dnu69
Dní NEMOCI 50 + 69
IIF(nemdavky.druh='NEM',nemdavky.dnu50+nemdavky.dnu69,0)
Dní OÇR
DNYOC
IIF(nemdavky.druh='OC',nemdavky.dnu50+nemdavky.dnu69,0)
Nemocen od
OD
Nemocen do
DO
nemdavky.do
Çástka
CASTKA
nemdavky.castka
Dní NEMOCI 50
DNY50
IIF(nemdavky.druh='NEM',nemdavky.dnu50,0)
Dní NEMOCI 69
DNY69
IIF(nemdavky.druh='NEM',nemdavky.dnu69,0)
Oprava nemoci
OPNEM
iif("C"$nemdavky.typ,nemdavky.oprava,IIF(nemdavky.druh='NEM',nemdavky.oprava,0))
Oprava OÇR
OPOCR
IIF(nemdavky.druh='OC',nemdavky.oprava,0)
Oprava vĘe
OPRAVAV
nemdavky.oprava
Poçet ND za období - SPROM1
PocND
Poçet neukonçenśch ND - SPROM2
PoNDn
sys(15,g_cs,zamest.prijmeni+zamest.jmeno)+str(unicislo,5)+hnizdo+str(p_unikod,5)+p_hnizdo
Doklad nemocenské dávky
str(nd_cislo,5)+nd_hnizdo+left(dtos(nd_datum),4)+str(rok,4)+str(mesic,2)
Młsíc a datum ND
str(rok,4)+str(mesic,2)+dtos(nemdavky.od)
09203
_pocet(m.vnoreni)>1
Více młsícľ
reccount('_obdobi')>1
8 ęádek pęed koncem
IIF(M.STRANA=1,18>M.DELKA-M.RADEK,8>M.DELKA-M.RADEK)
Externí
!sraz_h.interni .AND. _pocet(m.vnoreni)=1
DoplĄovací ęádek 6 pęed konec
m.delka-m.paticka-m.radek<5
Externí spoęení
EXTERSP
IIF(sraz_h.typ='SPE',SRAZKY.SPLATKA,0)
sraz_h.spesymb
Skuteçná splátka
[Skute
SRAZKY.SPLATKA
TiĘtłné období
_mesice(mesic)+' '+str(rok,4)
Typ sráĹky
[Typ sráĹky        ]
stab('sraztyp',sraz_h.typ,'valid.popis')
Śçet
[Śçet                   ]
sraz_h.ucet
Pęíjm. + jméno + titul
ALLT(ALLT(%POM1%)+' '+ALLT(%POM2%)+' '+ALLT(%POM3%))
Interní spoęení
INTERSP
IIF(sraz_h.typ='SPI',SRAZKY.SPLATKA,0)
OBDOBí
Interní pľjçky
INTERPU
IIF(sraz_h.typ='PUI',SRAZKY.SPLATKA,0)
Externí pľjçky
EXTERPU
IIF(sraz_h.typ='PUE',SRAZKY.SPLATKA,0)
Celkem
CELKEM
IIF(sraz_h.celkem#0,STR(sraz_h.celkem,9,2),'N')
Interní / Externí
I/E
iif(sraz_h.interni,'INT','EXT')
POJIST
IIF(sraz_h.typ='POJ',SRAZKY.SPLATKA,0)
VYZIV
IIF(sraz_h.typ='VYZ',SRAZKY.SPLATKA,0)
IIF(sraz_h.typ='EXE',SRAZKY.SPLATKA,0)
ROKU
Zbśvá
ZBYVA
IIF(sraz_h.celkem-%POM1%>0,sraz_h.celkem-%POM1%,0)
5S
Perioda
PE
sraz_h.perioda
Poçet
PO
IIF(sraz_h.pocet#0,sraz_h.pocet,'N')
Poznámka
POZNAMKA
sraz_h.poznamka
Splátka
SPLATKA
STR(sraz_h.splatka,8,2)+IIF(sraz_h.procent,' %  z ÇM','')
sraz_h.varsymb
sraz_h.konsymb
Zbśvá- souçet za skupinu
ZBYVASK
IIF(sraz_h.celkem#0,STR(%POM1%,9,2),'N')
28
Název młsíce
NAZ MES
_MESICE(MESIC)
SKODY
IIF(sraz_h.typ='SK',SRAZKY.SPLATKA,0)
Ostatní sráĹky
IIF(!INLI(SRAZ_H.TYP,'SPE','SPI','PUE','PUI','POJ','VYZ','SKE','SKI','EXE'),SRAZKY.SPLATKA,0)
sraz_h.typ
str(unicislo,5)+hnizdo+str(p_unikod,5)+p_hnizdo+str(sraz_h.sr_cislo,5)
09204
Jen souçtové poloĹky
poradi='Z'
DoplĄovací ęádek 2 pęed konec
m.delka-m.paticka-m.radek<1
Poçátek vśpisového období
[OD]
str(prvrok,4)
Konec vśpisového období
str(posrok,4)
Firma - Ulice
[Firma - ulice..........]
Firma - Młsto
[Firma - młsto...............]
Firma - Psç
[FPSÇ]
left(firmdata.psc,3)+' '+substr(firmdata.psc,4,2)
Identifikaçní çíslo zamce
[IDENT.ÇőS]
Jméno, pęíjmení, titul (40zn.)
[pęíjmení, jmeno a titul................
alltrim(zamest.prijmeni)+' '+alltrim(zamest.jmeno)+','+alltrim(zamest.titul)
Vłk
[Vłk
vek()
Śhrn dílçích základľ
[UHRZAK]
zucto.zaklad
Pojistné
[POJIST]
zucto.pojistne
[DET]
zucto.detiodp
Odpoçet na manĹela(ku)
[MAN]
zucto.manzodp
Odp. na çásteçnou invaliditu
[CID]
zucto.invacodp
Odp. na plnou invaliditu
[PID]
zucto.invapodp
Odp. na ZTP(P)
[ZTP]
zucto.invazodp
Odp. na studenta
[STD]
zucto.studodp
Nezdanitelná çástka
[NEZDAN]
zucto.nezdancast
SníĹenś základ
[SNIZAK]
zucto.snizzakl
Vypoçtená daĄ
[VYPDAN]
zucto.vypdan
DaĄové zálohy
[ZALOHA]
zucto.zaloha
Pęeplatek danł
[PREPL.]
zucto.preplatek
Odpoçty - nezdanitelné minimum
[ODM]
zucto.miniodp
ZAMEST.RODNEC
Odpoçet na dary
[Dar]
zucto.nadary
ZdaĄovací období
Obdo
zucto.rok
Datum zúçtování
[DatZúçt
stop(iif(empty(zucto.preneseno), str(zucto.rok+1,4)+' 1',zucto.preneseno))
[SraDaĄ]
zucto.pausdan
SráĹková daĄ - základ
[SraZák]
zucto.zaklpaus
Rozhodnś pęíjem
[Rozhod]
%POM1%-%POM2%+%POM3%-%POM4%+%POM5%
9  20  31  30  35
Nemocenské dávky
[NemDav]
zucto.nemdavky
09205
Kód vśkonu
Kód.
kod
Popis vśkonu
XX  Popis vśkonu  XXXXXXXXXXXX
vykon
Jednotka
Jednotka .
jednotka
X Poçet X
pocet
Sazba
X Sazba X
sazba
Datum ..
datum
Stę
stred
Zakázka
XX  Zakázka  XX
dej_zak(zakazka_h,zakazka,.t.)
Obchodní pęípad
dej_obch(obchodni_h,obchodni,.t.)
XX  Období   XXXXXX
dtoc(m.prvni)+' - '+dtoc(m.posledni)
Pęíjmení, jméno, titul
X  Pęíjmení, jméno, titul  XXX
trim(zamest.prijmeni-(' '+zamest.jmeno-(' '+zamest.titul)))
Celkem Kç
Celkem ..
pocet*sazba
XX  Pracovní pomłr  XXXXXXXXXX
Popis vśkonu - 25
XX  Popis vśkonu  XXXXXXX
left(vykon,25)
Jednotka - 8
left(jednotka,8)
left(dtos(datum),6)
sys(15,g_cs,zamest.prijmeni+zamest.jmeno+str(unicislo,5)+hnizdo)
09301
Popis
Pole
POLE
09302
Celś ęádek
polozky
chrtran(eval(ostbaze.polozky),'│',' ')
Hlaviçka
Hlavice
chrtran(ostbaze.hlavice,'|',' ')
Název tabulky
'" '+ALLT(OSTBAZE.POPIS)+' "'
09400
Je vyplnłn úçet
!EMPTY(UCET) .OR. !EMPTY(VARSYMB) .OR. !EMPTY(KONSYMB)
Çíslo ZP
CISL
ZDRAVPOJ
Název ZP
NAZEV
Adresa ZP
ADRESA
ALLT(ULICE)+', '+ALLT(MESTO)+' PSÇ: '+ALLT(PSC)
UCET
VARSYMB
KONS
KONSYMB
09401
RIGH(OBDOBI,2)+' '+LEFT(OBDOBI,4)
Kalendáęní dny
KAL
KALDNY
Pracovní dny
PRA
PRACDNY
Poçet svátkľ
SV
SVATKY
Pracovních hodin
PRACH
PRACHOD
Poçet prac. hod. vçetnł svátkľ
PH+SV
PRSVHOD
Dny svátkľ
SVATKY DNY
SVATDNY
LEFT(OBDOBI,4)
09402
DaĄ=0
DAN=0
DaĄ>0
DAN>0
Dolní mez
DOLMEZ
DOLNIMEZ
Horní mez
HORMEZ
HORNIMEZ
DaĄ
DAN
Procento
PRO
STR(PROCENTO,5,2)+' %'
Název
uppe(OSTBAZE.POPIS)
09801
Status
!P_STATUS
Podtatus
P_STATUS
Kód pracovního pomłru
TYPPP
STATUS
Do evidençního stavu
E
EVSTAV
Poçítat mzdu
M
MZDA
Kód prac. pomłru
09802
vratmi('SPROM1','',.f.)
Naplnłní SPROM1
vratmi('SPROM1',alltrim(prom_jmeno)+prom_hn,.f.)
XXX   Popis promłnné   XXXXXXX
SPROM1#alltrim(prom_jmeno)+prom_hn
Jméno promłnné
X  JMENO  XX
alltrim(prom_jmeno)+prom_hn
Hodnota
HODNOTA ..
HODNOTA
PLATIOD.
PLATIOD
PLATIDO.
PLATIDO
Typ hodnoty
T
typ
09803
Neurçena cílová databáze
EMPTY(TRANS.DBF09)
Urçena cílová databáze
!EMPTY(TRANS.DBF09)
Zdrojová databáze
DATABAZE
NAZEVBAZE
Název zdrojového pole
NAZEZPOLE
POPISPOLE
Cílová databáze
CILDATA
IIF(TRANS.DBF09='S','STAV',IIF(TRANS.DBF09='Z','ZAMEST',IIF(TRANS.DBF09='M','MZDY','NezjiĘtłna')))
Nepęevádłt
PREVOD CI NEPREVOD
IIF(!RUSENI,'Nepęevádłt','!!!! N E D E F I N O V Ć N O !!!!')
Jaká sestava
IIF(NAZEVBAZE='ZAMEST','PERSONĆLNő LISTY','MZDOVÉ LISTY')
Název cílového pole
NAZEVCPOLE
IIF(TRANS.POVINNA,'■','')+EVAL(IIF(TRANS.DBF09='S','STAVDEF.NAZEV',IIF(TRANS.DBF09='Z' .OR. TRANS.DBF09='M','DEFINICE.NAZEV','  ')))
09804
Typ=A
ROZDEL='A'
Typ=B (není vśkon)
ROZDEL='B'.and.sk_data#'V'
Typ=C
ROZDEL='C'
Typ=D (není vśkon)
ROZDEL='D'.and.!"VV"$sk_ukdef
Typ=B a neprázdná tabulka (NV)
ROZDEL='B' .AND. !EMPTY(TABULKA).and.sk_data#'V'
Typ=B a 1. ęádek v tab.(NV)
M.PORADI=1 .AND. ROZDEL='B'.and.sk_data#'V'
Typ=D a 1. ęádek v tab.
m.sprom1=1 .AND. ROZDEL='D'
Typ=B a prázdná tabulka (NV)
ROZDEL='B' .AND. EMPTY(TABULKA).and.sk_data#'V'
Dloouuuuhś vśraz a typ=A
ROZDEL='A' .AND.!EMPTY(%POM1%)
17
Dloouuuuhś vśraz a typD (NV)
ROZDEL='D' .AND. !EMPTY(%POM1%).and.!"VV"$sk_ukdef
Jsou to vśkony
sk_data="V"
Typ D a vśkony (2.ęádek)
"VV"$sk_ukdef.and.len(alltrim(tvykon))>70
Jsou to vśkony (3.ęádek)
sk_data="V".and.len(alltrim(vyraz))>140
Pomocná promłnná
vratmi("sprom1",1,.f.)
Typ=D (inkrementovat sprom1)
iif(ROZDEL='D',vratmi("sprom1",sprom1+1,.f.),.f.)
Typ=D (vśkon)
ROZDEL='D'.and."VV"$sk_ukdef
Typ D a vśkony (3.ęádek)
"VV"$sk_ukdef.and.len(alltrim(tvykon))>140
Typ=D
rozdel='D'
Jsou to vśkony (2.ęádek)
sk_data='V'.and.len(alltrim(vyraz))>70
Text
TEXT
Vśraz (znaky 001-070)
Vśraz, prvních 70 znakľ.................
padr(vyraz,70,' ')
Vśraz (znaky 071-140)
Vśraz, druhśch 70 znakľ.................
iif(len(vyraz)>70,padr(substr(vyraz,71),70,' '),'')
MD
MDA
UCET_MD
DA
UCET_D
Název dokladu
TYPY_RAD.NAZEV
Śçtovat
UCTOVAT
Název mezisouç. poloĹky
NAZEV MEZI POLOZKY
EVAL(IIF(SK_DATA='P','DEFPERS.NAZEV',IIF(SK_DATA='M','DEFMZDY.NAZEV',(IIF(SK_DATA='S','DEFSTAV.NAZEV','')))))
Tabulka
TABULKA
Śçtovat na stranu
MDD
IIF(MD_D=2,'MD',IIF(MD_D=1,'D ','N'))
Název poloĹky  z mzd. listu
DEFMZDY.NAZEV
Hodnota def
DEF HOD
DEFHOD
NAZEV TAB
OSTBAZE.POPIS
NAZEV POL
OSTDEF.NAZEV
VYRAZ  1. 60 znakľ
VYRAZ  1. 60
VYRAZ  1. 60-140 znak
VYRAZ   60-140
SUBSTR(VYRAZ,61,80)
Vśraz (znaky 141-200)
Vśraz, tęetích 60 znakľ.................
iif(len(vyraz)>140,padr(substr(vyraz,141),60,' '),'')
Tvykon (znaky 001-070)
Tvykon, prvních 70 znakľ................
padr(tvykon,70,' ')
Tvykon (znaky 071-140)
Tvykon, druhśch 70 znakľ................
iif(len(tvykon)>70,padr(substr(tvykon,71),70,' '),'')
Tvykon (znaky 141-200)
Tvykon, tęetích 60 znakľ................
iif(len(tvykon)>140,padr(substr(tvykon,141),60,' '),'')
STR(Z_UNIKOD,3)+Z_HNIZDO
Rozdłl
ROZDEL
Sk_data a rozdłl
iif(empty(sk_data).and.rozdel#"A","■",sk_data)+sk_ukdef+rozdel
09805
[ULICE.......................]
[PSÇ.]
left(firmdata.psc,3)+' '+substr(firmdata.psc,5,2)
[MëSTO.......................]
Datum dokladu
[DATUM.]
Çíslo dokladu
[CISLODOK..]
zkr_dokl+padl(cislo,6,'0')+'/'+right(dtoc(datum),2)
Text dokladu
[TEXT..................................]
text
[S]
Śçet MD
[MD...]
ucet_md
Śçet D
[D....]
ucet_d
[Çástka ]
XX  Název dokladu   XXXXXXXXXX
typy_rad.nazev
Text dokladu - 30
[TEXT........................]
left(text,30)
Stęedisko MD
SMD
stred_md
Stęedisko Dal
S_D
stred_d
XX Zakázka  XXX
×ada dokladľ
prefix
09806
ROZDEL='B'.and.sk_data#"V"
Typ=C (není vśkon)
ROZDEL='C'.and.sk_data#'V'
ROZDEL='D'
ROZDEL='B'.AND.!EMPTY(TABULKA).and.sk_data#"V"
Typ=B a 1. ęádek v tab.
M.PORADI=1 .AND. ROZDEL='B'
M.sprom1=1 .AND. ROZDEL='D'
Typ=B a prázdná tabulka
ROZDEL='B' .AND. EMPTY(TABULKA)
Nast. pomocné promłnné na 1
Dloouuuuhś vśraz a typD
ROZDEL='D' .AND. !EMPTY(%POM1%)
Typ=A - pęevod
ROZDEL='A' .and. inlist(sk_data,'S','P','M')
Typ=A - sráĹky
ROZDEL='A' .and. sk_data='R'
Typ=A - s korekcí
ROZDEL='A' .and. !empty(vyraz)
Typ=A - hromadnś
ROZDEL='A' .and. empty(sk_data)
Typ=D  (není vśkon)
Typ=D  (vśkon)
ROZDEL='A' .AND. !EMPTY(%POM1%)
Typ=D  (vśkon,2.ęádek)
ROZDEL='D'.and."VV"$sk_ukdef.and.len(alltrim(tvykon))>70
Typ=D  (vśkon,3.ęádek)
ROZDEL='D'.and."VV"$sk_ukdef.and.len(alltrim(tvykon))>140
Inkrement pom. promłnné
iif(rozdel="D",vratmi("sprom1",sprom1+1,.f.),.f.)
Typ=B (vykon)
ROZDEL='B'.and.sk_data="V"
Typ=B (vykon,2.ęádek)
ROZDEL='B'.and.sk_data="V".and.len(alltrim(vyraz))>70
Typ=B (vykon,3.ęádek)
ROZDEL='B'.and.sk_data="V".and.len(alltrim(vyraz))>140
Çíslo úçtu - zdroj
X Zdrojovś úçet XXXXXXXXX
c_zdrucet
Çíslo úçtu - cíl
X Cílovś úçet XXXXXXXXXXX
c_cilucet
Název banky - zdroj
X Název banky - zdroj XXX
mojebanka
Symbol - variabilní
varsymbol
Symbol - konstatntní
konsymbol
Symbol - specifickś
spesymbol
Hlavní agenda
X Hlavní agenda XXXX
iif(sk_data='P','Personální listy',iif(sk_data='S','Pracovní pomłry',iif(sk_data='M','Mzdové listy','?')))
PoloĹka - çíslo úçtu
X PoloĹka obsahující çíslo úçtu XXXXXXXX
iif(seek(left(c_cilucet,5),%POM1%),eval(%POM1%+'.nazev'),'Nedefinováno.')
24
PoloĹky - kde
DBF-pol.
iif(sk_data='P','DEFPERS',iif(sk_data='S','DEFSTAV',iif(sk_data='M','DEFMZDY','M')))
PoloĹka - variabilní symbol
X PoloĹka obsahující variabilní symbol X
iif(seek(left(varsymbol,5),%POM1%),eval(%POM1%+'.nazev'),'Nedefinováno.')
PoloĹka - konstantní symbol
X PoloĹka obsahující konstantní symbol X
iif(seek(left(konsymbol,5),%POM1%),eval(%POM1%+'.nazev'),'Nedefinováno.')
PoloĹka - specifickś symbol
X PoloĹka obsahující specifickś symbol X
iif(seek(left(spesymbol,5),%POM1%),eval(%POM1%+'.nazev'),'Nedefinováno.')
Tvykon (1-70)
Tvykon, prvních 70 znakľ
left(tvykon,70)
Tvykon (71-140)
Tvykon, znaky 71 -140
substr(tvykon,71,70)
Tvykon (141-200)
Tvykon, znaky 141 -200
substr(tvykon,141)
Vśraz (1-70)
Vśraz, prvních 70 znakľ
left(vyraz,70)
Vśraz (71-140)
Vśraz, znaky 71 -140
substr(vyraz,71,70)
Vśraz (141-200)
Vśraz, znaky 141 -200
substr(vyraz,141)
Sk_polozky+rozdel
09807
typ+cis
Vśkon
XX  Vśkon  XXXXXXXXXXXXXXXXXXX
Jednotka..
PoloĹka sazby
PoloĹka
odkud+' '+str(ukdef,5)
Základní typ
XX  Základní typ  XX
vykval('X',typ)
XX Firma - ulice  XXXXXXX
dej_pol(m.g_fpath,'firmdata','','firmdata.ulice',1,.t.)
dej_pol(m.g_fpath,'firmdata','','firmdata.mesto',1,.t.)
Firma - PSÇ
F. PSÇ
dej_pol(m.g_fpath,'firmdata','','firmdata.psc',1,.t.)
cis
09851
XX.Název.XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
nazev
X.Pole.X
field_name
Typ
field_type
Délka
[D]
field_len
Pro mzdy
promzdy
Skupina
X.Skupina.
skupina
Editace
iif(editace,'A','N')
Historie
H
iif(historie,'A','N')
Nabídka
N
iif(nabidka,'A','N')
Povinná
iif(povinna,'A','N')
Odkaz na poloĹku
XX.Odkaz.XXXXXX
iif(databaze='DODAT','UDAJP('+str(ukdef,3)+hn_ukdef+')','ZAMEST.'+field_name)
09852
XX.Popis údaje.XXXXXXXXXXXXXXXXXXXXXXXXX
[Skupina]
XX.Odkaz.XXXX
iif(databaze='DODAT','UDAJS('+str(ukdef,3)+hn_ukdef+')','STAV.'+field_name)
09853
Jsou-li kontroly młsíce
kontmes
Jsou-li roçní kontroly
kontrok
KdyĹ je nłjakś vśraz
len(trim(vyraz))>0
KdyĹ je vśraz delĘí neĹ 70
len(trim(vyraz))>70
KdyĹ je vśraz delĘí neĹ 140
len(trim(vyraz))>140
KdyĹ je vśraz delĘí neĹ 210
len(trim(vyraz))>210
KdyĹ se nłkam poçítá
hrubamzda or cistamzda or zdravotni or socialni or jetodan(dan) or !empty(prumnem) or !empty(prumdov) or !empty(hrubyprij) or !empty(srazka)
XX.Popis údaje.XXXXXXXXXXXXXXX
Del
Desetiny
Des
field_dec
Povinná poloĹka
Poçítat
iif(pocitat,'A','N')
Pęenos
R
iif(prenos,'A','N')
Speciální poloĹka
iif(special,'A','N')
Vśraz pro vśpoçet - 1
[Vśraz 1                             ...
Vśraz pro vśpoçet - 2
[Vśraz 2                             ...
Vśraz pro vśpoçet - 3
[Vśraz 3                             ...
substr(vyraz,141,70)
Vśraz pro vśpoçet - 4
[Vśraz 4                             ...
substr(vyraz,211,44)
iif(hrubamzda,'A','N')
Çistá mzda
CM
iif(cistamzda,iif(zn_cista,'+','-')+'A','N ')
Z
iif(zdravotni,'A','N')
iif(socialni,'A','N')
ZD
iif(jetodan(dan),iif(zn_Dan,'+','-')+iif(jetodan(dan,.t.),'Z','A'),'N ')
Do prľmłru: na nemoc
PrľmłrNem.
iif(empty(prumnem),' ',iif(prumnem='C','Çitatel  ','Jm. '+prumnem+iif(typ_prum=1,' hod',' dny')))
Do prľmłru na dovolenou
PrľmłrDov.
iif(empty(prumdov),' ',iif(prumdov='C','Çitatel '+str(2^typ_prum,1)+'x','Jm. '+prumdov+iif(typ_prum=1,' hod',' dny')))
h
hrubyprij
Ostatní sráĹka
s
srazka
Młsíçní minimum
[Młsíçní minimum                     ...
minmes
Młsíçní maximum
[Młsíçní maximum                     ...
maxmes
Roçní minimum
[Roçní minimum                       ...
minrok
Roçní maximum
[Roçní maximum                       ...
maxrok
XX.Odkaz.XX
'UDAJ('+str(ukdef,3)+hn_ukdef+')'
Zkratka
[Zkratka                     ]
zkratka
Popis (celś)
09854
Databáze
DATA
NAME
Vśraz
F_NAME
FIELD_NAME
Název databáze
NAME DATA
TY
FIELD_TYPE
DEL
Desetinná místa
DES
Filtr pro popis=databaze
FILTER
FILTRUJ('OSTBAZE.POLE=DATABAZE')
09855
Jméno uĹivatele
Jméno uĹivatele...............
pristup.jmeno
Typ okna
TO
iif(typ='M','ML',iif(typ='Z','PL',iif(typ='S','PP','??')))
Název okna
Název okna....................
Hodnota práva
Hodnota práva.......
pristup
Skupina uĹivatel
30
Odpoçty ostatní
[Ost]
zucto.ost_odp
Odkaz
identif
09856
XX Doklad XX
_zapisy.zkr_dokl+padl(_zapisy.cislo,6,"0")+"/"+substr(dtos(_zapisy.datum),3,2)
DatumDok
_zapisy.datum
Mzdové období
MzdObdo
str(_zapisy.mesic,2)+"/"+str(_zapisy.rok,4)
Çástka - doklad
Çástka-doklad
castka
Çástka - deník
Çástka -deník
castka_den
Popis problému
XXXXXX  Popis problému  XXXXXX
trable(problem+1)
Pęeplatek danł za minulś rok
[PRE.Lo]
dej_pol(m.g_fpath+'m09\','zucto','unicislo','zucto.preplatek',str(unicislo,5)+hnizdo+str(rok-1,4)+'Z')
ZdaĄovací období minulé
Obdm
zucto.rok-1
Neplacené volno (kal.dny)
[NepK
TK(13600)
Śhrn zdanitelnśch pęíjmľ
UHRNPRIJ
iif(tkp(12900),tk(31900),iif(tk(31800).and.(tk(22200)>0.or.prac(0)=1.or.tk(32100)),tk(31900)+tk(22200),0))
Młsíçní mzda ke konci období
[MesMzK
TKS(10500,0,m.posledni)
Hodinová mzda ke konci období
[HodMK
TKS(10600,0,m.posledni)
Inicializace SPROM1 - m.posled
VRATMI('SPROM1',m.posledni,.F.)
Inicializace SPROM2 - m.prvni
VRATMI('SPROM2',m.prvni,.F.)
Den nástupu
iif(between(stav.nastup,m.prvni,SPROM1),VRATMI('SPROM1',stav.nastup,.f.),.f.)
Den vśstupu
iif(empty(stav.vystup),VRATMI('SPROM2',m.posledni,.f.),iif(between(stav.vystup,SPROM2,m.posledni),VRATMI('SPROM2',stav.vystup,.f.),.f.))
Inicializace SPROM1 - nastup
VRATMI('SPROM1',max(stav.nastup,m.prvni),.F.)
Inicializace SPROM2 - vystup
VRATMI('SPROM2',min(stav.vystup,m.posledni),.F.)
Poslední młsíc PP
VRATMI('SPROM3',stopp(),.f.)
Pľvodní młsíc PP
iif(empty(stopp(SPROM3)),.f.,.f.)
Zúçtováno v młsících
[Zúçtováno v młsících..............]
tkobd(318,"00",0,left(dtos(m.prvni),4),unicislo,hnizdo,.t.)
IIF(!EMPTY(TKP(10500)),TKP(10500),TKP(10900))
ALLT(IIF(!EMPTY(TKP(10300)),TKP(10300),TKP(10700)))
Pęech çi trv bydliĘtł- młsto
ALLT(IIF(!EMPTY(TKP(10400)),TKP(10400),TKP(10800)))
Datum vśplat
[DatumV]
gomonth(ctod(str(tkgp('DEND'),2,0)+'.'+str(mesic,2)+'.'+str(rok,4)),1)
Roçní zúçt.d.akt.rok - çástka
[RZAkR]
dej_pol(m.g_fpath+'m09\','zucto','unicislo','preplatek',str(unicislo,5)+hnizdo+str(rok,4)+'Z')
Roçní zúçt.d.akt.rok - období
RZAROb
dej_pol(m.g_fpath+'m09\','zucto','unicislo','preneseno',str(unicislo,5)+hnizdo+str(rok,4)+'Z')
Roçní zúçt.d.akt.rok - datum
[RZARDt]
iif(empty(%POM1%),'  .  .  ', padl(int(tkgp('DEND')),2,'0')+'.'+padl(allt(right(%POM1%,2)),2,'0')+'.'+substr(%POM1%,3,2))
307
Roçní zúçt.d.akt.rok - -çástka
-1*dej_pol(m.g_fpath+'m09\','zucto','unicislo','preplatek',str(unicislo,5)+hnizdo+str(rok,4)+'Z')
Nárok na odp. stud. - období
[Odpoçet na studenta - období, kdy byl ]
DTOM(TKHP(12400,0,'A',0),50)
Dítł - odpoçet od-do         1
[.. Odpoçet od-do 1 ..]
DTOM(TKHP('12000',1,'A|Z',0,SPROM1,SPROM2),23, .t.)
Dítł - odpoçet od-do         2
[.. Odpoçet od-do 2 ..]
DTOM(TKHP('12000',2,'A|Z',0,SPROM1,SPROM2),23, .t.)
Dítł - odpoçet od-do         3
[.. Odpoçet od-do 3 ..]
DTOM(TKHP('12000',3,'A|Z',0,SPROM1,SPROM2),23, .t.)
Dítł - odpoçet od-do         4
[.. Odpoçet od-do 4 ..]
DTOM(TKHP('12000',4,'A|Z',0,SPROM1,SPROM2),23, .t.)
Çistá mzda bez ND
[ÇMbND.
TK(31000) - SECTIML('26700;17300;26900;27000;27600',.t.) + SECTIML('27200;27300;30700;30800',.t.) - TK(14000)
Çistá mzda bez ND            p
[ÇMbNDp
230S
[ÇistMz
%POM1% + TK(14000)
230
Çistá mzda                   p
[ÇistMp
311S
Śhrn zdanitelnśch pęíjmľ II
iif(tkp(12900),tk(31900),iif(tk(31800).and.(stav.ridici.or.prac(0)=1),tk(31900)+tk(22200),0))
Odpoçet úrokľ ze stavebních úv
[OdpStav]
TK(29200)
Období pro úroky.-konec
IIF(TK(29200)>0,VRATMI('SPROM4',LEFT(SPROM4,7)+str(rok,4)+str(mesic,2),.F.),.F.)
Období pro úroky.-zaçátek
IIF((SPROM4='11111').AND.TK(29200)>0,VRATMI('SPROM4',str(rok,4)+str(mesic,2)+RIGHT(SPROM4,7),.F.),.F.)
Období podepsané - zaçátek
IIF((SPROM3='11111').or.dtos(stav.nastup)<left(SPROM3,6),VRATMI('SPROM3',left(dtos(stav.nastup),6)+RIGHT(SPROM3,7),.F.),.F.)
Penz.fond - osvobozené od danł
PF-osv.
TK(33100)
Penz.fond - danłné
PF-daĄ.
TK(33200)
Penz.fond - celkem
PF-celk
TK(33100)+TK(33200)
Penz.fond - danłné p
%POM1%/m.poradi
328S
Penz.fond - daĄovś náklad
PF-nák.
TK(33300)
Penz.fond - z FKSP
PF-FKSP
TK(33400)
Poçet kal.dní - nemoc mimo
TKND(ptsuma('NDDRUH','NDDRUH','MIMO'),'N')
Dní nemoci celkem
DND
iif(empty(nemdavky.do),0,nemdavky.do-nemdavky.od+1)
Dní ND 50 bez des.
D50
nemdavky.dnu50
Dní ND 69 bez des.
D96
nemdavky.dnu69