home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
07
/
S735A.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1998-01-12
|
5KB
|
149 lines
uzavf
m7_pokl
ident_pok
m7_poklo
u7_meny
mena_c
u7_poklm
ident_pok
u7_obrp
cis_dok
u7_obrpp
cis_dok
m7_meny
mena_c
m7_poklm
ident_pok
m7_obrp
cis_dok
m7_obrpp
cis_dok
Pokladn
hotovost pokladny :
RIIS 7.35
mod_proc
Pokladna neexistuje
mod_proc
Pro zadanou pokladnu nem
te opr
mod_proc
c7_poklm
c7_poklm
c7_poklm
zobrf
Detail
Detail
s735a
Pokladn
hotovost pokladny F
- uz
Pokladn
hotovost - uz
Pokladn
hotovost pokladny F
, dne :
Pokladn
hotovost, dne : FF$
RIIS 7.35
' '+mena
Za den: Po
.stav
' '+str(stav_d,10,2)
stav_d
P
str(prij_d,10,2)
prij_d
V
str(vyd_d,10,2)
vyd_d
Kon.stav
str(zasoba,10,2)
zasoba
j.dokl.
' '+str(poc_pd,5)
poc_pd
d.dokl.
' '+str(poc_vd,5)
poc_vd
c: Po
. stav
' '+str(stav_m,10,2)
stav_m
P
str(prij_m,10,2)
prij_m
V
str(vyd_m,10,2)
vyd_m
Kon. stav
str(zasoba,10,2)
zasoba
j.dokl.
' '+str(poc_pm,5)
poc_pm
d.dokl.
' '+str(poc_vm,5)
poc_vm
Posl.p
tran(dat_pprij,'@E')+' '
dat_pprij
Posl.v
tran(dat_pvyd,'@E')+' '
dat_pvyd
M7_POKL
IDENT_POK
M7_POKLO
U7_MENY
MENA_C
M7_MENY
U7_POKLM
M7_POKLM
U7_OBRP
CIS_DOK
M7_OBRP
U7_OBRPP
M7_OBRPP
PAR_732
PRIHLAS
W_POKL
nsiZOBR_POKL
MOD_PROC
sHLASKA
(pC7_POKLM
DRUH_MC
-----POLEX
eni FREEZE
li F1
-------F2
meno(i)ENTER
ena"DETAIL
)="DET_JM
= PROCX
zahRAMECEK
deNAZEVT
avRIIS
i)NADPIS
'+LEVA
av_d,PRAVA
hodHOR
"stav_DOL
= i+1ZAHL
ahl(iJMENO
jHODN
eno(I
(priMOD_PSV
mod7_pok
PS_LINE
ZOBR_OBRM
W_POKL
C7_POKLM
MOD7_POK
colora
set color to &color
COLOR
DETAIL
HLASKA
X:\OBEC\07\
S735A.FXP
X:\OBEC\07\S735A.PRG