m7_ucto
m_param
RIIS 7.9
Rekapitulace pokladny - v
deje za obd.:     / F
m7_obru
Nejsou 
znamy
x7_ob-st
m7_obru
c9_str
x9_str
c9_t.dbf
c9_t1.dbf
insert into c9_t1 (field_name,field_type,field_len,field_dec) values ('sum&zz', 'C', 10, 0)
c9_tisk
c9_t1
replace sum&zz with 'Str.: '+c9_str.nstr
x7_uc-st
stredisko(a1+2)=stredisko(a1+2)+val(sum&zz)
Celkem 
Rekapit
Rekap.
Funkce
funkce
mod79h
Rekapitulace pokladny - v
deje za obd.:  F
RIIS 7.9
c9_tisk.ucet
c9_tisk.ucet
 Celkem K
c9_tisk.sum_celk
c9_tisk.sum_celk
        FF
jmeno(i)="c9_tisk.sum&zz"
hodn(i)="c9_tisk.sum&zz"
KONEC
='tiA1
'  &&naW_SK
ogramM7_UCTO
POBD1
PLAT_OBDOBOBD
procxPLAT_POK
nazev pROK_POK
rM_PARAM
.tUCET_POKL
UC_POKL
  MOD_SYS
enM7_OBRU
t='Re_AA
ulace SKUPINA
- OBDOBI_MM
HLASKA
strNSTR
)+' /X7_OB
rk,4ST
       DISTINCT
aC9_STR
ICINNOST
OBI_MM
X9_STR
aviC9_T
nadDBF
      SUM_CELK
kC9_T1
dpisZZ
a=1   C9_TISK
& STREDISKO
X7_UC
  POM_STR
POM_UC
SUM_C
    SUM_STR
19    I
M_STR
 dPOLEX
PROCX
cRBOT
criCLEFT
CRIGHT
---FREEZE
ce ORDER
----ZAHL
-----JMENO
diHODN
l(polSOUC
ime jTITLE
lex)TITLECOLORF1
ouc(polF3
store F4
to soucF6
ico='riF7
* -F9
----- nF10
ni vseDETAIL
---F1PRG
----F4_JM
i = F4PRG
ahl(F7_JM
F7PRG
)="cF9KEY
ucetF10_JM
i)=F10PRG
.ucDET_JM
 i+DETPRG
hl(RAMECEK
elNAZEVT
jmRIIS
="'  TISKPRG
_pKLICO
a,10F5
dn(F8
c9_pr_tENTER
souPS_ZAZN
iNADPIS
-----PRAVA
defiHOR
polozeDOL
gramu MOD_PSV
 Rekapitulace 
 Tisk rekap. 
 Konec 
='tiKONEC
&&naVOL11
gramM
PPRIJEM
REKAPIT
OBTISK_R
c9_pr_t
c9_pr_t
Rekapit
Rekap.
Tisk-rek.
tisk_r
mod79h
Rekapitulace pokladny - p
jmy za obd.:  F
RIIS 7.9
c9_pr_t.ucet
c9_pr_t.ucet
    Celkem K
'   '+str(c9_pr_t.suma,10,2)
c9_pr_t.suma
C9_PR_T
tiUCET
&&naSUMA
gramM7_OBRU
PSKUPINA
OBCINNOST
cxUCET_POKL
azev pOBDOBI_MM
POM_UC
.tSUM_C
  DAL
enPOLEX
PROCX
='ReRTOP
lace RBOT
- CLEFT
CRIGHT
strFREEZE
' /ORDER
rk,4ZAHL
     JMENO
aHODN
ISOUC
  TITLE
TITLECOLORF1
nadF2
      F3
_CELK
dpisF6
a=1   F7
EDISKO
  DETAIL
F1PRG
F4_JM
    F4PRG
 hF7_JM
F7PRG
    F9KEY
 dF10_JM
F10PRG
DET_JM
cDETPRG
criRAMECEK
NAZEVT
---RIIS
ce TISKPRG
--KLICO
----F5
l(polENTER
me jPS_ZAZN
ORNADPIS
diLEVA
c(polPRAVA
ore HOR
o soucDOL
co='riI
* -MOD_PSV
 nPS_RETURN
german
m7_meny
ch nejsou koruny
Rekapitulace p
 za obd: F
 stav 
9999999.99
9999999.99
9999999.99
 stav 
9999999.99
et: p
ch doklad
99999
       v
dajov
ch doklad
99999
GERMAN
tiM7_MENY
naMENA
gramTXT
PHLASKA
cxSTAV_M
PRIJ_M
 pVYD_M
ZASOBA
.tPOC_PM
POC_VM
german
ipravena tisk
p_kody
p_name
Epson LX-810
m7_meny
ch nejsou koruny
Rekapitulace p
 za obd: 
 stav 
9999999.99
9999999.99
9999999.99
 stav 
9999999.99
et: p
ch doklad
99999
       v
dajov
ch doklad
99999
GERMAN
tiTTISK
naMODTESTT
PHLASKA
SOUBOR
OBP_KODY
cxP_NAME
W_TISKARNAEMP
SKARNAP_BOLDON
tEMP0
P_BOLDOFF
DOUBLE
enP_DBST_ON
NDOUBLE
ReP_DBST_OFFNLQ_ON
- P_LETRQUALDRAFT
strP_DRAFT
 /SUB_OFF
,4P_SUBOFF
 SUPER_ON
aP_SUPERON
SUPER_OFF
P_SUPEROFFHUSTE_ON
RP_10CPI
adP_COMPRESSHUSTE_OFF
P_COMP_OFFEXP
  P_WIDT_ON
P_WIDT_OFFPICA
ELITE
P_12CPI
  MALE
 hP_SUBON
RESET
    P_SETUP
 dR8LPI
P_8LPI
R6LPI
cP_6LPI
criNCON
MP_OFFNEWPAGE
SSP_NEWPAGE
---M7_MENY
diMENA
l(polR
e jOBD
ORSTAV_M
diPRIJ_M
olVYD_M
e ZASOBA
ucPOC_PM
riPOC_VM
colora
set color to &color
tiCOLOR
na_XOBR
mFUNKCE
PRIJEM
REKAPIT
TISK_R
HLASKA
X:\OBEC\07\
MOD79H.FXP
X:\OBEC\07\MOD79H.PRG