ad1, MOD67CX
RIIS 6.7
Zadejte d
lnu :
Zadejte kategorii :
Rok : 
@!XXXX
Chybn
 roku
a6_mzdy
a6_mzd
m6_zam
a6_zam
m6_dm
c6_mzdy
 Prob
r dat ...           
insert into c6_mzdy (dm, druh_pomer, skup_prac,  str_zam, str_prev, kc&wm, tup)  values  (a6_mzdy.dm, left(a6_mzdy.druh_pomer,1), w_skup,  a6_mzdy.str_zam, w_strn, a6_mzdy.castka, m6_dm.tup)
w_kc = kc&wm
replace kc&wm with w_kc+a6_mzdy.castka
Statistika mezd, rok F
Statistika mezd - st
, rok 
Stat. mezd - kat. 
, rok 
 Stat. mezd - st
, kat. 
, rok 
RIIS 6.2
Detail
mod67cd
mod67c2
Zadejte druh mzdy
dm+' '
druh_pomer
druh_pomer
skup_prac
skup_prac
zev druhu mzdy
m6_dm.nazev
m6_dm.nazev
     Sou
righ(tran(kc1+kc2+kc3+kc4+kc5+kc6+kc7+kc8+kc9+kc10+kc11+kc12,'@Z'),11)
kc1+kc2+kc3+kc4+kc5+kc6+kc7+kc8+kc9+kc10+kc11+kc12
      Leden
righ(tran(kc1,'@Z'),11)
       
righ(tran(kc2,'@Z'),11)
     B
righ(tran(kc3,'@Z'),11)
      Duben
righ(tran(kc4,'@Z'),11)
     Kv
righ(tran(kc5,'@Z'),11)
     
erven
righ(tran(kc6,'@Z'),11)
ervenec
righ(tran(kc7,'@Z'),11)
      Srpen
righ(tran(kc8,'@Z'),11)
       Z
righ(tran(kc9,'@Z'),11)
      
righ(tran(kc10,'@Z'),11)
   Listopad
righ(tran(kc11,'@Z'),11)
   Prosinec
righ(tran(kc12,'@Z'),11)
ID_ORG
1, P_SKUP
--ANSI
---STRED
----W_KAT1
---W_KAT2
---W_KAT3
---W_KAT4
---W_KAT5
finW_KAT6
zekW_KAT7
u mW_ROK
----W_RR_N
lexHLASKA
   W_KATS
   PODM_KAT
 MOD_SYS
 A6_MZDY
t ROK
ek celA6_MZD
eceOSC
f.    M6_ZAM
   A6_ZAM
   M6_DM
    DM
zobrazeC6_MZDY
kyDRUH_POMERSKUP_PRAC
STR_ZAM
anSTR_PREV
   naKC2
'StatiKC3
 mezd,KC4
'+str(KC5
,4)   KC6
avickaKC7
e streKC8
ce(4) KC9
mpty(wKC10
   KC11
='StaKC12
a mezTUP
ed. M
_MZDY
POCET
tr(wPOCETC
 &&W_STRN
PROCENTA
=CASTKA
nMESIC
ERKATEGORIE
W_SKUP
POLEX
MERFREEZE
'+sRAMECEK
4)NAZEVT
treRIIS
4) RTOP
mpty(RBOT
  CLEFT
=' SCRIGHT
d -F1
. '+strF2
, kat. F3
kats+',F4
 '+str(F6
se   
l1='DM DETAIL
y.dDET_JM
_dmENTER
tr_PROCX
riF9KEY
S 6.ZAHL
     JMENO
    HODN
    I
 id MOD_PSV
c6_mzdd
c6_mzdd
RIIS 6.2
Statistika mezd, rok F
Statistika mezd - st
, rok 
Stat. mezd - kat. 
, rok 
 Stat. mezd - st
, kat. 
, rok 
RIIS 6.2
mod67c2
Zadejte osobn
iif(eof('m6_zam'),a6_zam.prijmeni,m6_zam.prijmeni)
iif(eof('m6_zam'),a6_zam.prijmeni,m6_zam.prijmeni)
iif(eof('m6_zam'),a6_zam.jmeno,m6_zam.jmeno)
iif(eof('m6_zam'),a6_zam.jmeno,m6_zam.jmeno)
str_zam
str_zam
str_prev
str_prev
kategorie+'   '
kategorie
tran(rok,'9999')
' '+tran(mesic,'99')
mesic
righ(tran(castka,'@Z'),9)
castka
Hodiny
righ(tran(hodiny,'@Z'),6)
hodiny
        Kusy
righ(tran(kusy,'@Z'),12)
Pr.dny
righ(tran(pr_dny,'@Z'),6)
pr_dny
Kal.dny
righ(tran(ka_dny,'@Z'),7)
ka_dny
MOD_SYS
, C6_MZDD
--OSC
---SKUP_PRAC
KATEGORIE
---MESIC
---STR_ZAM
--STR_PREV
nKUSY
zekHODINY
u mCASTKA
---PR_DNY
lexKA_DNY
   NHOD
   A6_MZDY
 C6_MZDY
t DRUH_POMERW_STRN
RSTRED
 W_ROK
   P_SKUP
   M6_ZAM
   A6_ZAM
zeW_SKUP_PRAA6_MZD
W_KAT1
ERW_KAT2
anW_KAT3
kW_KAT4
 naW_KAT5
atiW_KAT6
zd,W_KAT7
tr(PS_LINE
RAPOLEX
ickaPROCX
streRTOP
e(4) RBOT
pty(wCLEFT
   CRIGHT
StaFREEZE
mezORDER
ed. ZAHL
JMENO
tr(wHODN
 &&TITLE
TITLECOLORF1
EGORIE
MERF9
'+sF10
4)DETAIL
treF1PRG
4) F4_JM
pty(F4PRG
  F7_JM
=' SF7PRG
d -F9KEY
+strF10_JM
t. F10PRG
+',DET_JM
tr(DETPRG
eRAMECEK
NAZEVT
DM RIIS
y.dTRAD1
_dmTRAD2
tr_W_KATS
riTR_HL1
 6.M6_DM
  NAZEV
    TR_HL2
id MOD_PSV
rPS_RETURN
colora
set color to &color
, COLOR
--OBR
POCET
, POCETC
--POC
colora
set color to &color
, COLOR
--MOD67CX
MOD67CD
HLASKA
PROCENTA
X:\OBEC\06\
MOD67C2.FXP
X:\OBEC\06\MOD67C2.PRG