w_zakazkaf
w_cpolf
mod_lib
m5_plan
zakazka
m1_ident
ident
m5_oper
zakazka
m5_tisk
doklad
p_tarif
xp_tarif
zakazka+cpol
zka+Po
m5_tisk
zakazka+cpol
zka+Po
RIIS 5.7
 Tisk posledn
 Tisk pro zak
 Nastaven
 Konec 
zW_ZAKAZKA
W_CPOL
v_oDOKL
dn(i)KC
zev_op"KC_CELKEM
NM_CELKEM
KS_SMENU
nTARIF
P_SETUP
"dP_RESET
i+P_6LPI
hl(P_8LPI
P_10CPI
="P_12CPI
dnP_16CPI
P_20CPI
*P_BOLDON
'P_BOLDOFF
P_ULINEON
P_ULINEOFFP_ITALON
-P_ITALOFF
P_SUPERON
P_SUPEROFFP_SUBON
--P_SUBOFF
 P_DBST_ON
P_DBST_OFFP_LETRQUALP_DRAFT
rP_COMP_OFFP_WIDT_ON
P_WIDT_OFFP_HEIG_ON
P_HEIG_OFFP_NEWPAGE
P_KODY
***MOD_LIB
**M5_PLAN
**ZAKAZKA
edM1_IDENT
IDENT
tersM5_OPER
orM5_TISK
01DOKLAD
P_TARIF
enXP_TARIF
ePODMS
o KLIC
@ 13,PODMV
(txtZAHLAVI
eaVOL1
n(txt)+3TISK1
13,(TISK2
or tNAST_TR
c_oper
index on &podms to x_pom
c_oper
Nebyl vybr
 Prob
 tisk  ... 
mod58b1(!9
zMOD_SYS
C_OPER
v_oIDENT
n(i)NAZEV
_op"ZAKAZKA
nPOSTUP
"dNAZEV_OP
+PRAC
hl(PTR
="TAC
dnDOP
*KUS_SMEN
'KC_KUS
KC_CELK
NM_CELK
FFMNO_KV
-M5_PLAN
EROFFM1_IDENT
-IDNAZ
 M5_OPER
TARIF
FFHLEDEJTR
LW_MNO_KV
rNM_CELKEM
KS_SMENU
FFKC_CELKEM
HLASKA
OBRMESS
***RAD
**P_RESET
**POCET
edMOD58B1
zakazka
zka nebyla nalezena
mod5_lib
zka nen
 uvoln
c_oznac.dbf2
c_oznac
zaznam
mod_lib
 Prob
 tisk  ... 
mod58b1(!9
zW_ZAKAZKA
W_CPOL
v_oM5_PLAN
i)ZAKAZKA
p"HLASKA
ZOBR_ZAK
MOD5_LIB
M1_IDENT
dIDENT
+IDNAZ
hl(NAZEV
="ZOBROP
dnC_OZNAC
ZAZNAM
*INDIK
'NASTAV_PRNMOD_LIB
FFRAD
-P_RESET
POCET
C_OPER
OFFTARIF
-HLEDEJTR
 NM_CELKEM
FFTAC
LMNO_PL
rMNO_OV
MNO_ZM
KS_SMENU
ELKEM
KC_CELKEM
MOD58B1
P_SETUP
**P_10CPI
c_oper+
c_oper
 operace nebyla vybr
ehled operac
zky F
RIIS 5.8
mod58b
nazev_op
nazev_op
Prac.
ZOBROP
zM5_OPER
W_ZAKAZKA
W_CPOL
i)C_OPER
p"ZAKAZKA
HLASKA
POLEX
dLEVA
+PRAVA
hl(HOR
="RAMECEK
dnNAZEVT
NADPIS
'PROCX
_PRNF1
SPACEBAR
FZAHL
-JMENO
OFFMOD_PSV
-OBSAH
colora
set color to &color
zCOLOR
KAZKA
colora
set color to &color
zCOLOR
tarif = p_tarif.tarif&tr
KAZKA
P_TARIF
i)TARIF
konec
......
.................
 STOP - d
lku kl
 nelze zv
ovat ! 
 Ukon
zLOGIC
XOPER
i)VYBER
p"VYB_POL
PODMS_N
PODMV_N
PROMZ
dPROMPT
+JMENO
="STOP
VYBER
i)ST_I
p"POLEX
Rozpiska
ident
zakazka
Operace
Postup
postup
Pracovi
. k v
str(mno_pl-mno_ov-mno_zm,12,3)
str(tac,10,4)
str(tbc,4,0)
x_pom
zakazka+cpol+oper
POLEX
zZAHL
JMENO
i)JM_IDX
p"KL_IDX
PODMS_N
PODMV_N
OBRT1B
TRIDENI
dM5_TISK
+KLIC
hl(ZAHLAVI
PODMV
="TISK1
em = 
TISK2
*tari
ZOBROP
HLASKA
 form t
HLEDEJTR
TRIDENI
VYB_POL
NAST_TR
K:\A\OBEC\05\
MOD58B.FXP
K:\A\OBEC\05\MOD58B.PRG