Hromadn
et pl
n. kalkulac
 bez odpadu
              Hromadn
et  pl
ch  kalkulac
RIIS 1.7
 Chcete p
tat n
klad.
daje? 
 Pokud ano,  od tohoto  okam
 budou platit tyto nov
 hodnoty. 
          POZOR !                
 Nejsou zobrazov
ny chyby v
 Pokud byly zm
ny tarif. t
 v postupech, mus
edem pro- 
st hromadn
et tarif
  !  V
et trv
 dlouho  !      
 Ukon
lohu    
 Prov
set color to b/w
set color to w/w
 Na z
tu vznikne sestava
 polo
ek, kter
 kalkulaci   
 o dan
 procento a v
ce odli
 od d
 hodnoty.            
 Zadejte procento, od kter
ho    
 chcete zobrazovat rozd
ly mezi  
 a novou kalkulac
:      
999.99
 Pro zadan
et kus
 Pro aktu
 kusy d
 Pro re
ie kmenov
 Pro re
len operac
 Konec 
&barvax
colora
 Zadejte po
et kus
vky: 
999999
     Po
et kus
vky:     
999999
set color to &_color
&barvam
&barvax
colora
 Zadejte po
et kus
vky: 
999999
     Po
et kus
vky:     
999999
set color to &_color
&barvax
&barvam
&barvax
&barvax
&barvam
&barvax
&barvax
&barvam
&barvax
&barvax
&barvax
m_param
KLOBOUKYF
m1_ident
ident
MM_odpadf
m1_kusov
vykres
p1_plkal
m1_plan
x1_plan
zakladni\m1_normy
operace
v1_str
x1_str
v4_sklad
x4_sklad
m1_kalk
x1_kalk
m1_zas
x1_zas
m1_ceur.dbf2
m1_ceur
c1_kalk
soucasti
PORKERTF
m1_ident
FPSABCRVIOJKG
c1_ds
m1_ident
FPSABCRVIOJKG
c1_ds
ident
PORKERTF
colorz
ehled DS 
DS  Po
RIIS 1.7
t od DS:
Datum platnosti:
Tento dispozi
 stupe
 nebyl nalezen!
 Konec Esc 
teno celkem:
et pro DS=   :
et polo
et pro DS=F
RIIS 1.7
i ukon
 nebudou 
daje zalo
eny !
et ? (a/N)  
CDEHLY
create dbf &f_adr\data\p1_chcn (ident c(12), typ_nakl c(2), uvn_stare n(11,2),  uvn_nove n(11,2), rozd_proc n (8,2) )
p1_chcn
create dbf &f_adr\data\p1_chku (ident c(12), typ_nakl c(2), uvn_stare n(11,2),  uvn_nove n(11,2), rozd_proc n (8,2) )
p1_chku
Aktualizace n
chyby
m1_kalk
RIIS 1.7
 Esc 
Vznikla sestava rozd
 say 'A2
et poPOC
@2W_HMOTNOSTW_PL_REZ
W_CENA_KG
W_CENA_REZW_MATERIALW_SPOTREBAW_UVN_ODL
VZOREC
DRUH_REZ
=FKMD
   FRS
olor tFRV
  FRO
12 sayFRZ
et REC
S=' + M_VYKRES
'NAKLADY
0,_KSDAV
NAKLTYP
MDILKOOP
MDRUHKOOP
NEBERODL
_MM_ODPAD
sANSI
1_ds.ds
   IF inVOL
 MM_VYKRES
DR_KSD
DR_DIL
   W_PROC
or BARVAX
   BARVAM
 1._COLOR
   MOD_SYS
 tPREP_DS
  M_PARAM
0 POLE1
DILNA_KOOPPODNIK
 toM1_IDENT
bIDENT
    W_DATUM
tM1_KUSOV
rVYKRES
  @P1_PLKAL
 UROVEN
VYROBEK
ouOPER
 KUSY_STRUKKUSY_ROZP
dDRUH
enTYP_NAKL
 MATER
25 sKOOP
et KUSOV
KUSY_D
@ 1VR
 get t_SR
us pictZR
    OR
et cursUVN
    OPN
  OPM
set cuNMPRIP
 NMKUSOV
toPRIPCEL
 fC1_S
 C1_K
M1_PLAN
X1_PLAN
 rZAKLADNI
hOPERACE
,fV1_STR
ro,X1_STR
m_vV4_SKLAD
aX4_SKLAD
eM1_KALK
  X1_KALK
klM1_ZAS
lKoX1_ZAS
hKoKALK2
    M1_CEUR
atRADA
     C1_KALK
  PL_OD
PL_DO
NDIFDAT_AK
  S_K
pSOUCASTI
LDIST
   DS
    POC_DS
 KOD_POL
lSTAV
C1_DS
ocetMCOL
   pocetS
ocet2+1
    tedRR
pisuju M_DS
elkHLASKA
DATUM_OD
oDATUM_DO
 MMREC
2POCET2
 POCETC2
T_PRERUS
=POCET1
cetPOCETC1
*3PRER
 M_NAZEV
NAZEV
VYPOCET
prP1_CHCN
CHYBY
P1_CHKU
 pMW_UVN
tMW_PROC
  NKUSY_D
NAKLAD
ROZD_PROC
ROZDIL
Identifikace: 
JKGFPSABCRV
OMNUXYZ
c1_kp
c1_kp
OMNUXYZ
OMNUXYZ
c1_kalk
  /  /  #
c1_kalk
  /  /  #
c1_kalk
  /  /  #
ROZKLADY
@M1_PLAN
 'M_VYKRES
@2FRS
OTNOSTFRZ
NA_KG
A_REZFOPN
ERIALFKMD
TREBAZS_KMD
V1_STR
REZIE_VYR
REZIE_SPR
REZIE_ZAS
REZIE_ODB
2 sayOPN
et C1_S
=' + M_NAZEV
ROZPIS
UROVEN
_MATERIAL
sC1_K
s ALL
 IF inPORADI
 C1_KP
TYP_NAKL
NAKLTYP
  VYSTUP
or VYKRES
   UR
sC1_KALK
1.ZAPIS
  VYROBEK
 tZAPIS1
  DAT_AK
 PL_DO
MM_ODPAD
P_NASEL
oMATER
bKOOP
   PRIPCEL
tKUSOV
rKUSY_D
  @VR
vykres
vyrobek
vyrobek
vykres
PROPMAT
@CTAVENINA
M1_KUSOV
oVYKRES
2C1_K
TNOSTALL
UROVEN
REZKUSY_ROZP
KUSY_STRUKDRUH
M1_IDENT
IDENT
STUPEN
E_ODB
NEBERODL
yKOD_POL
 KUSYS
' + CV
KC_VYKRESU
KOEPROPMATMM_ODPAD
VYROBEK
SPOTREBA
s PORADI
_STRUKMDRUHKOOP
@C1_S
VYKRES
oVZOREC
2M1_PLAN
STKOD_KALK
MATER1
MATER2
REZMATER3
PORKERTF
OMNUXYZ
OMNUXYZ
MNUXYZ
CVRATSMES
M1_IDENT
KOD_POL
oPODNIK
2M1_KUSOV
TC1_S
VYROBEK
VYKRES
REZKOD_KOMP
M_MATER
M_KOOP
M_PRIP
M_KUSOV
yM_OPM
 M_OPN
' + M_UVN
KM_KUSY_D
_Q_DRUH
ATDRUH
C1_KALK
KM1_KALK
TMATER
sKOOP
s PRIP
KUSOV
UKKUSY_D
or OPM
   OPN
1.P_ZR
  M1_ZAS
  SKL_HLAVNIV4_SKLAD
PNSTR
oV1_STR
bREZIE_ZAS
P_MAT
tKUSY_STRUKZAS_REZ
 @C1_K
 UROVEN
UKKUSY_ROZP
_STRUKTYP_NAKL
ALIAS
KALK2
M1_IDENT
oC1_S
2VYKRES
TW_RADA
M1_PLAN
EZW_HMOTNOSTVAHA_MJ
M1_CEUR
STW_CENA_KG
HM_OD
HM_DO
NOSTCEN_KG
P_MAT
KUSY_STRUKUROVEN
 VYROBEK
+ KUSY_ROZP
_STRUKDRUH
ATTYP_NAKL
MATER
ALIAS
W_IDENT
oVYKRES
2KALK2
TM1_IDENT
W_RADA
EZM1_PLAN
STW_PL_REZ
PLOCHA_R
TM1_KUSOV
W_SPOTREBAW_UVN_ODL
W_HMOTNOSTIDENT
C_VYKRESU
KOD_POL
 SPOTREBA
AM1_KALK
N_ODL
VAHA_MJ
STM1_CEUR
W_CENA_REZHM_OD
KHM_DO
NOSTCEN_REZ
EZW_MATERIALW_KOOP
EBAP_MAT
_REZKUSY_STRUKUROVEN
KVYROBEK
KUSY_ROZP
_STRUKDRUH
   TYP_NAKL
sMATER
KLOBOUKYF
VYKRES
oVZOREC
2M1_PLAN
TP_KMD
ZS_KMD
KOD_KALK
TPODNIK
MKOOPKMD
TMDILKOOP
V1_STR
OTNOSTKRZ
KRESU
 KOPN
AREZIE_VYR
REZIE_SPR
REZIE_ZAS
REZIE_ODB
A_REZOPN
KDR_KSD
OSTM_VYKRES
ZPKSDAV
IAL_KSDAV
EBAC1_KALK
EZM1_KALK
UKKUSY_D
KKUSY_STRUKM1_IDENT
K_POSTUP
KC_POSTUP
 M1_NORMY
sROZPIS1
.MATER2
RUKMATER3
KLOBOUKYF
TSMZDA
SMZDAP
SMZDAK
ZSUVN
TSKOOP
TSTAC
SMZDAPCEL
POSTUP
_POSTUP
STMKOOP
MKOOPKMD
DR_DIL
AMDILKOOP
E_SPR
V1_STR
A_REZPRS
OSTPOPM
ZKOPM
IALPOPN
EBAKOPN
EZPRO
UKKRO
KPODNIK
RUKREZIE_VYR
REZIE_SPR
sREZIE_ODB
M1_NORMY
KMDRUHKOOP
KOOPERACE
LAVNIKUSY_STRUK_MZDAP
PKCSBC
oPKSDAV
b_MZDAPCEL
_KSDAV
t_MZDAK
RUKKCSAC
 @_OPMP
TRUK_OPMK
UK_OPM
_MZDC
TRUK_OPN
UK_RV
_STRUKTBC
 C1_K
5 sUROVEN
VYROBEK
t VYKRES
KUSY_ROZP
_STRUKDRUH
 pictPRIP
    KUSOV
cursTYP_NAKL
 KUSY_D
set cuSR
toUVN
 fMATER
 NMPRIP
NMKUSOV
PRIPCEL
OMNUXYZ
2VYSTUP
TMATER
ZPRIP
TKUSOV
STOPN
 MMATER
E_SPR
C1_KALK
VYKRES
M1_KALK
2VYSTUP
TMATER
KUSY_STRUKC1_KALK
TKOOP
UKKUSOV
UKUVN
UKOPN
UKOPM
colora
set color to &_color
_COLOR
colorz
et dispozi
ch stup
 rozpisek ...
chodu:
na polo
m1_kusov
vykres
m1_ident
MNTUXYZ
ident
MNTUXYZ
ZMENA
PRUCHOD
ST_ZAZ
oW_KLIC
2W_DS
TMCOLO
M1_KUSOV
KVYKRES
TM1_IDENT
REC_NUMBERCTBAR
UKDISPLAY_BOKOD_POL
UKDISPLAY_BAIDENT
MBERC_VYKRESU
CTBAR
prava p
P R O C E N T     H O T O V O
0   10   20   30   40   50
60   70   80   90  100
CTBAR
m1_kalk
x1_kalk
m1_ident
ident
if ! file ( '&f_adr\data\p1_chcn.dbf' )
 Soubor chyb neexistuje ! 
p1_chcn
rozdil
ly hromad.p
tu pl
n.kalkulac
 bez odpadu
if ! file ( '&f_adr\data\p1_chku.dbf' )
 Soubor chyb neexistuje ! 
p1_chku
rozdil
ly hromadn
tu pl
ch kalkulac
 Soubor rozd
 je pr
RIIS 1.7
Archiv
archiv_nak
mod17b2s
Identifikace
CH.ident
CH.ident
CH.typ_nakl+' '
CH.typ_nakl
m1_ident.nazev
m1_ident.nazev
str(CH.rozd_proc,8,2)
CH.rozd_proc
str(CH.uvn_stare,11,2)
CH.uvn_stare
VN nov
str(CH.uvn_nove,11,2)
CH.uvn_nove
POLEX
PROCX
oRBOT
2CLEFT
TCRIGHT
FREEZE
ORDER
KZAHL
TJMENO
UMBERTITLE
UKTITLECOLORF1
PLAY_BAF4
MBERF6
YKRESU
UKF10
E_SPR
DETAIL
F1PRG
F4_JM
EZF4PRG
KF7_JM
OSTF7PRG
ZF9KEY
IALF10_JM
EBAF10PRG
EZDET_JM
UKDETPRG
KRAMECEK
UKRIIS
NAZEVT
M1_KALK
 X1_KALK
sM1_IDENT
IDENT
KMM_ODPAD
HLASKA
P1_CHCN
NIROZDIL
RUKCH
PP1_CHKU
DAPCEL
ENTER
tNADPIS
RUKLEVA
 @PRAVA
TRUKHOR
UKDOL
TRUKMOD_PSV
colorz
mod_proc
set color to &_col
PS_LINE
oZOBR_NAKL2IDENT
TTYP_NAKL
MOD_PROC
MOD17B2S
VYPOCET
ROZKLADY
MATERIAL
MATER1
MATER2
MATER3
ROZPIS
aktuLS
ROZPIS1
ZAPIS
ZAPIS1
HLASKA
 @6,Jf
PREP_DS
   rg
DISPLAY_BA
DISPLAY_BO
MOD17B2PS
ARCHIV_NAK
X:\OBEC\01\
MOD17B2S.FXP
X:\OBEC\01\MOD17B2S.PRG