m_param
Rok : 
Chybn
 roku
a6_mzdy
m6_zam
a6_zam
m6_dm
c6_mzdy
 Prob
r dat ...           
w_kc = kc&wm
replace kc&wm with w_kc+a6_mzdy.castka, soucet with soucet+a6_mzdy.castka
 mzda zam
stnanc
, rok F
RIIS 6.3
hledej1 in mod612d
proc_graf
mod66e
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)
     Pr
righ(tran(soucet/poc_mes,'@Z'),11)
soucet/poc_mes
     Sou
righ(tran(soucet,'@Z'),11)
soucet
      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)
M_PARAM
,mW_PODNIK
oFIRMA
n(i)W_ROK
of('HLASKA
,a6W_RR_N
no,W_MM_N
menPOC_MES
 =A6_MZDY
l(OSC
    PrM6_ZAM
menA6_ZAM
gh(M6_DM
ucetDM
_mes,'@C6_MZDY
)="souKC2
oc_mesKC3
i = iKC4
ahl(i)KC5
  Sou
jmeno(KC7
igh(trKC8
ucet,'KC9
)="soKC11
iKC12
zahSOUCET
   PRUMER
_MZDY
igPOCET
kc1,POCETC
TYP_MZDY
MESIC
)=PROCENTA
 POLEX
RAMECEK
tuNAZEVT
ndiRIIS
f w_RTOP
 RBOT
o hlaCLEFT
h 'CCRIGHT
nFREEZE
dif   
rok = wF7
n and wF9
  F9PRG
s = F10
n - 1
F10_JM
  pF10PRG
 12PROCX
    ZAHL
useJMENO
y orHODN
useMOD_PSV
rdOBSAH
asy st
edisek 
 Tisk p
ehledu 
 Konec 
mod_psv
mod_lib
mod_lib
 Prob
 tisk  ... 
mod_lib
mod66d
mod66d
,mW_TISK
oTISK
(i)MOD_PSV
('P_SETUP
a6P_RESET
o,P_6LPI
menP_8LPI
 =P_10CPI
l(P_12CPI
PrP_16CPI
enP_20CPI
h(P_BOLDON
tP_BOLDOFF
P_ULINEON
P_ULINEOFFP_ITALON
sP_ITALOFF
P_SUPERON
P_SUPEROFFP_SUBON
o(P_SUBOFF
rP_DBST_ON
P_DBST_OFFP_LETRQUALP_DRAFT
iP_COMP_OFFP_WIDT_ON
P_WIDT_OFFP_HEIG_ON
P_HEIG_OFFP_NEWPAGE
P_KODY
MOD_LIB
INDIK
NASTAV_PRNZAZT
 OBRT
tuNASTAV_REPMOD66D
POCET
,mPOCETC
colorz
datez
german
m_dgrpop
c_PopGr
c_PopGr
     Vyvoj hrube mzdy F
 Mesic
 RIIS 6.6
   SoWA  
Castka
dgrpop
m_dgrdat
c_DatGr
c_DatGr
c_DatGr
Leden
c_DatGr
c_DatGr
Brezen
c_DatGr
Duben
c_DatGr
Kveten
c_DatGr
Cerven
c_DatGr
Cervenec
c_DatGr
Srpen
c_DatGr
c_DatGr
Rijen
c_DatGr
Listopad
c_DatGr
Prosinec
dgrdat
mm_dgr2d
!&mmgr 1 6306270498 2
set color to &m_color
set date to &M_dat
ST_ZAZK
,mOBRGR
oM_COLOR
i)M_DAT
('GERMAN
a6M_DGRPOP
,C_POPGR
enWTEXT3
 =W_ROK
l(PODNADPIS
enPOPIS_X
h(DRUH
tYMIN
POPIS_N
FFNAZEV
sPRVNI
TRETI
CTVRTY
OFFDRUHY
o(POPIS_Y
DGRPOP
M_DGRDAT
FC_DATGR
ALC6_MZDY
FFKC2
DT_ON
DT_OFFKC4
IG_ON
IG_OFFKC6
WPAGE
V_PRNKC11
 KC12
tuSKC2
V_REPSKC3
w_SKC4
 SKC5
o hlaSKC6
h 'CSKC7
nSKC8
  SKC9
 SKC10
SKC11
eSKC12
iNOR_Y
 = wY
PIS_X
 wDGRDAT
  MM_DGR2D
 MMGR
  pTISK_SEZ
PROCENTA
PROC_GRAF
X:\OBEC\06\
MOD66E.FXP
X:\OBEC\06\MOD66E.PRG