home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
07
/
S752A.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1999-04-15
|
109KB
|
2,515 lines
w_aktf
P_aktf
P_recf
m_param
m7_fadod
cis_fak
m7_plat
m_cis1
x_cis1
m7_kurz
archiv
m4_organ
m4_uc_o
m_dat
x_dat
m7_prpol
cislo
m7_vpb
cislo
m7_tup
skupina
m7_desk
skupina
m7_faodb
vars_s
m7_hodod
cis_fak
m7_hoodb
cis_fak
m7_platt
cis_plat
m_param
m7_vpb
cislo
faktura
faktura
set color to b/w
set color to bg/n
set color to w+/w
set color to w+/bg
set color to b/bg,w+/rb
set color to w+/b
set color to w/n
A k t u a l i z a c e p l a t b y
Z o b r a z e n
p l a t b y
RIIS 7.5
Platby z vnitrobanky (V), pen
stavy (P):
plateb z vnitrobanky
Konec
aktualizace - nov
aktualizace - existuj
platby
dat z magnetick
Konec
Pozor - nen
zapojeno
&barvau
&barvau
cis_plat
Vlast.
et pen.
stavu neexistuje, najdeme dle
sla platby.
cis_plat
&barvau
W_AKT
P_AKT
P_REC
MW_ZNAK_P
MM_NAVRAT
DOPLKURZ
JINEDAT
W_UKONCI
DRZHUBU
M_PARAM
NAPAR_POLE
APOLE7
MAJICO
MAJZAV
ZAVOD
M7_FADOD
RCIS_FAK
ORM7_PLAT
UALPLAT
M_CIS1
X_CIS1
M7_KURZ
ARCHIV
VILM4_ORGAN
M4_UC_O
ILPUCET
FM_DAT
X_DAT
ORM7_PRPOL
SCISLO
M7_VPB
FM7_TUP
SKUPINA
M7_DESK
DET_TUP
M7_FAODB
VARS_S
M7_HODOD
M7_HOODB
1M7_PLATT
2CIS_PLAT
W_PLAT
W_RAD
W_UC_US
_USK1
CISELNIK
FFDOL
POCET
PRNCOUNT
WVOL11
SOUC1
SOUC2
POCET1
POCET2
POCET3
ILMCAST
MCASTM
MKURZ
W_ZOBR
PRPOL
FADOD
V_ORG
@URECO
odMNAZ
faPUV_CAST
fMMENA
wQQSALDO
'mQQCASTM
QQCAST
a =NASELFAK
'KURZROZD
DOROVROZD
MSALDO
MHODOD
POMOC
*?*?GENDOROV
*?*?*?*?KONTROLA
*BARVAS
?*?BARVAR
*?*BARVAT
?*?BARVAZ
*?*BARVAU
?*?BARVAN
? BARVAH
?L?W_CISLO
?KW_ORG
? ?F_ORG
?B?YF_ICO
Z?E?W_VARS
? W_SPEC
? ?W_KONS
? W_UC_OR
*?W_DAT_UH
*W_ZNAK_P
?W_KLIC_P
*W_STAV
?*?W_DAT_AKT
W_DAT_UCT
W_ZPRAC
?*W_OPER
?*?W_FAKTURA
W_VYPIS
W_RAD_VYP
W_KURZ
W_KURZN
W_KURZS
*?W_KURZP
*W_CAST
?*?W_CAST_M
*W_SPAR
?*?W_MENA
*?*QQ_DATUH
?QWPOM
*K_DAT_UH
?K_ZNAK_P
K_KLIC_P
?K_RAD
?KK_PR_CEL
?K_DRUH_H
YK_MENA
?E?K_CAST
? K_CAST_M
?K_KURZ
? K_PLAT
*?P_ZNAK_P
*P_KLIC_P
?P_DRUH_H
*P_DAT_UH
?P_MENA
P_CAST_M
P_KURZ
?*P_CAST
?*?P_PLAT
P_RAD
ZAD_USTAV
ZAD_UCET
KL_POMI
VOLBA
*?VOL
VNITRO
?*?MM
AST_M
?*?NOVYVYPIS
STARYVYPISUCET_UST
USTAV
ZVOL_BANK
HLASKA
?KBARVA1_C
BARVA2_C
YRADEK_C
E?SLOUPEC_C
JMENO_C
?VYSKOC
ZM_AKT
*?NOVY
*BARVA
?HLAV1
*CIS_PR
?SPEC_S
KONS_S
UCET_ORG
*DAT_UHR
?DAT_AKT
DAT_UCT
R_ZPRAC
D_OPER
ZNAK_P
KLIC_PL
(STAV_PL
;SPAR_CAST
GCAST_MEN
NAJDI_UC
ZOBRKREDEBKONEC
w_akU
PZMENY
slo v
pisu:
@!XXXXXX
dek v
pisu:
slo platby nen
vypln
no !
cis_plat
Tato platba neexistuje !
dku nen
vypln
no !
cis_plat
Platba nebyla nalezena !
Existuje v
ce plateb pro rozd
QNAVRAT
W_PLAT
W_RAD
MM_NAVRAT
HLASKA
ZOBR_PL
CIS_PLAT
QQPOKR
AW_UC_US
AUCET_UST
CIS_RAD
M4_UC_O
ZAD_UCET
ZAD_USTAV
USTAV
colorz
slo v
pisu a
|.....|..
pamet
s752a
RIIS 7.5
ehled plateb dle
pisu a
cis_plat
plat.cis_plat
plat.cis_plat
plat.cis_rad
plat.cis_rad
tu pen.
stavu
plat.ucet_ust
plat.ucet_ust
stka/m
str(plat.cast_men,12,2)
plat.cast_men
' '+plat.mena
plat.mena
Kurz
str(plat.kurz,14,7)
plat.kurz
stka/K
str(plat.kcs,12,2)
plat.kcs
str(plat.spar_cast,12,2)
plat.spar_cast
plat.znak_p
plat.znak_p
' '+plat.stav_pl
plat.stav_pl
plat.klic_pl+' '
plat.klic_pl
tran(plat.dat_uhr,'@E')
(plat.dat_uhr )
Dat.spl.
tran(plat.dat_spl,'@E')
(plat.dat_spl )
K.sym.
plat.kons_s
plat.kons_s
Var.symbol
plat.vars_s
plat.vars_s
Spec.sym.
plat.spec_s
plat.spec_s
tu organizace
plat.ucet_org
plat.ucet_org
tran(plat.dat_uct,'@E')
(plat.dat_uct )
plat.cis_pr
plat.cis_pr
s.faktury
plat.cis_fak
plat.cis_fak
Dr.Op.
' '+plat.d_oper+' '
plat.d_oper
.Zprac.
' '+plat.r_zprac+' '
plat.r_zprac
Dat.akt.
tran(plat.dat_akt,'@E')
(plat.dat_akt )
Autor
plat.autor
plat.autor
zev organizace
substr(m4_organ.nazev_org,1,25)
substr(m4_organ.nazev_org,1,25)
m4_organ.ico
m4_organ.ico
m4_organ.zavod
m4_organ.zavod
MCOLOR
QNAVRAT
POLEX
PROCX
CLEFT
CRIGHT
FREEZE
ORDER
APRAVA
ANADPIS
JMENO
TITLE
TITLECOLORPOC0
UALF1
VILF7
ORGAN
ILF10
FF0PRG
ORF1PRG
SF4_JM
F4PRG
FTISKPRG
F7_JM
F7PRG
F9PRG
F9KEY
F9KEY1
F10_JM
F10PRG
1RAMECEK
2RIIS
NAZEVT
KLICO
KLNAZ
SPACEBAR
TR_HL1
STR_HL2
FFTR_HL3
TR_HL4
TR_HL5
TR_HL6
TR_HL7
PRNTR_HL8
TR_HL9
DET_JM
ENTER
DETAIL
DETPRG
PS_LINE
ILPS_RETURN
PS_ZAZN
UCET_ORG
/M4_UC_O
ZAVOD
LM4_ORGAN
ORGAN
CIS_PLAT
MOD_PSV
M7_TUP
SKUPINA
?DET_TUP
M7_DESK
QNAVRAT
W_PLAT
CIS_PLAT
W_RAD
CIS_RAD
W_UC_US
UCET_UST
c4_uc_o
c4_uc_o
Datum
hrady:
tu:
kup:
na:
Prodej:
slo v
pisu:
Konec: ^End
slo platby nen
vypln
no !
tu:
kup: F
na:
ed: F
Prodej:F
slo platby nen
vypln
no !
kup: F
na:
ed: F
Prodej:F
Tento
et neexistuje !
kup: F
na:
ed: F
Prodej:F
kup: F
na:
ed: F
Prodej:F
slo v
pisu:
@!XXXXXX
slo platby nen
vypln
no !
ZAD_USTAV
ZAD_UCET
KL_POMI
MALIAS
M4_UC_O
MAJICO
MAJZAV
C4_UC_O
ZAVOD
POC_TUP
W_DAT_UH
QQ_DATUH
MM_NAVRAT
W_PLAT
HLASKA
LORUSTAV
W_MENA
UALW_KURZ
W_KURZN
W_KURZS
W_KURZP
ZOBR_UCET
JINEDAT
DOPLKURZ
LKONT_MEN
colorz
kl_pomi
RIIS 7.5
ehled vlastn
et
stav M
kod_uctu+' '+ucet+ustav + ' '+mena
mod_fun
QQCOL
C4_UC_O
KL_POMI
N_LMEZ
N_PMEZ
N_HMEZ
N_DMEZ
N_PROM
N_HOD
N_POC
N_RIIS
N_TEXT
N_HLAV
AN_RAD
AN_NVYH
ZOBR_NAP
MOD_FUN
ZAD_UCET
ZAD_USTAV
USTAV
LORW_MENA
UALW_KURZ
W_KURZN
W_KURZS
W_KURZP
&barvau
&barvaz
ROVAN
STKA PLATBY NA FAKTURU
Kredit:
Debet:
stav:
Znak platby:
platby:
Variab. symbol:
Konst. sym.:
Specifick
symbol:
et org.:
zev org.:
Kurz:
Ze dne:
hrady:
stka v m
stka v K
Dat.za
Faktura:
rovan
stka:
Dat.aktual:
im zpracov
Dr. oper.:
Autor:
pisu:
Stav platby:
Faktura:
Var.s.:
Zaplaceno
kazech k
ZnP.Kl
DH Dat.
hr. M
stka v m
Kurz
stka K
Faktura:
&barvau
JINEDAT
W_MENA
MMENA
Rozpis.plat.
na kurzu
Org.+
Pohyb
kazy k
Faktury
Konec
ipky,Enter
- F10
- Esc,^End
W_AKT
&barvau
999999.9999999
999999999.99
999999999.99
999999999.99
Platbu byste ji
nit, byla ji
na !
&barvau
ZAD_UCET
ZAD_USTAV
W_PLAT
W_RAD
W_ZNAK_P
W_KLIC_P
W_VARS
W_KONS
W_SPEC
W_UC_OR
W_ORG
W_MENA
W_KURZ
AJINEDAT
AQQ_DATUH
W_DAT_UH
W_CAST_M
W_CAST
W_DAT_UCT
W_FAKTURA
W_SPAR
LORW_ZPRAC
W_OPER
UALW_DAT_AKT
W_VYPIS
W_RAD_VYP
W_STAV
W_ZOBR
W_AKT
HLASKA
LZOBRKREDEB
@ 5,13 &vloz w_plat pict '@!X'
w_rad
@ 5,27 &vloz w_rad pict '999'
t uveden
dek v
pisu !
IF mhod # &mnaz
S platbou pracuje n
kdo jin
, mus
te po
kat !
w_znak_p
@ 5,51 &vloz w_znak_p pict '!!!'
if vloz='say' and mhod#&mnaz
ZNAK_P
w_znak_p
&barvau
&barvau
Znak platby mus
nat p
smeny A,B,C,D,K,L,M,N,O,P,Q,R,V,W,Z !
Znak platby C, L lze pou
t jen pro m
nu CZK !
Kurz ke dni
hrady neexistuje !
colora
Aktualizovat kurzovn
stek (A/N) ?
set color to &color
mod_fun
decimalz
EUTIT
999999999.99
&barvau
999999.9999999
@ 5,73 &vloz w_klic_p pict '!!!'
@ 6,18 &vloz w_vars pict '@!X'
@ 6,44 &vloz w_kons pict '@!X'
@ 6,69 &vloz w_spec pict '@!X'
@ 7,12 &vloz w_uc_or pict '@!'
et mus
t vypln
@ 8,7 &vloz w_mena pict '@!XXX'
MENA
w_mena
@!XXX
@ 8,18 &vloz w_kurz pict '999999.9999999'
999999999.99
@ 9,16 &vloz w_cast_m pict '999999999.99'
999999999.99
Jde o dodav. fakturu. Nem
la by b
t hodnota z
Jde o odb
rat. fakturu. Nem
la by b
t hodnota kladn
@ 9,43 &vloz w_cast pict '999999999.99'
Jde o dodav. fakturu. Nem
la by b
t hodnota z
Jde o odb
rat. fakturu. Nem
la by b
t hodnota kladn
@10,11 &vloz w_faktura pict '@!X'
@11,20 &vloz w_zprac pict '9'
@11,36 &vloz w_oper pict '9'
@12,18 &vloz w_vypis pict '@!X'
@12,32 &vloz w_rad_Vyp pict '@!X'
@12,70 &vloz w_stav pict '!'
PODNIK
W_MENA
W_KURS
DOPLKURZ
P_AKT
DATUH
T_UCT
KTURA
LORQ16
UALQ18
T_AKT
POCET1
W_ZNAK_P
W_RAD
EDEBHLASKA
SMKURZ
MCAST
FMCASTM
MMENA
W_UC_US
W_PLAT
DRZHUBU
1CIS_PLAT
2CIS_RAD
W_ORG
W_CISLO
CIS_PR
W_VYPIS
W_RAD_VYP
W_FAKTURA
CIS_FAK
W_VARS
VARS_S
W_SPEC
SPEC_S
PRNW_KONS
KONS_S
W_UC_OR
UCET_ORG
UCET_UST
W_DAT_UH
DAT_UHR
ILW_DAT_AKT
DAT_AKT
W_DAT_UCT
DAT_UCT
/ZNAK_P
W_KLIC_P
KLIC_PL
LW_ZPRAC
R_ZPRAC
W_OPER
D_OPER
W_CAST
W_SPAR
SPAR_CAST
W_CAST_M
CAST_MEN
W_KURZ
?KURZ
W_STAV
?STAV_PL
QQ_DATUH
NAJDI_UC
@PROC1
ZOBRKREDEBKONTROLA
BJMENO_C
fWJMENO_C
wTYP_C
'mOK_C
MOD_C2
a =RADEK_C
'SLOUPEC_C
MOD_C1
MW_ZNAK_P
M7_KURZ
JINEDAT
*?POKRK
*?COLOR
?*?OBRKURZ
?*W_UKONCI
?VKURZ
*?*VDATT
?*?VYBKURZ
MOD_FUN
M_DEC
KPRODEJ
?YNAKUP
STRED
MALIAS
BPUV_CAST
BSOUC11
SOUC1
*SOUC22
?SOUC2
ST_ZAZ
SOUC1
SOUC2
W_UC_US
W_PLAT
UCET_UST
CIS_PLAT
W_RAD
CIS_RAD
MP_ZNAK
AZNAK_P
m7_fadod
m7_hodod
orderz
cis_fak
vars_s
Faktura existuje v F
stce:
uhradit:
vars_s
orderz
Faktura existuje v F
stce:
uhradit:
et platby nesouhlas
slem faktury !
K var.sym. bylo nalezeno I
O, ale toto I
O nem
zadan
et !
rovat nelze, organizace nebyla nalezena
set order to &QQorder
rovat nelze, faktura nebyla nalezena
set order to &Morder
m7_faodb
m7_hoodb
orderz
cis_fak
vars_s
Faktura existuje v F
stce:
uhradit:
vars_s
orderz
Faktura existuje v F
stce:
uhradit:
et platby nesouhlas
slem faktury !
K var.sym. bylo nalezeno I
O, ale toto I
O nem
zadan
et !
rovat nelze, organizace nebyla nalezena
set order to &QQorder
rovat nelze, faktura nebyla nalezena
set order to &Morder
Znak platby nen
ani pro dod., ani odb
r. fakturu.
&barvau
MW_ZNAK_P
W_ZNAK_P
NASELFAK
MSALDO
MHODOD
M7_FADOD
MORDER
W_FAKTURA
CIS_FAK
VARS_S
W_VARS
W_UC_OR
AMENA
AW_MENA
HLASKA
CAST_CEL
CAST_MEN
ZAP_CEL
ZAP_MEN
NAPLN2
LORPLAT
M4_UC_O
ALQQORDER
ZAVOD
M7_FAODB
NAPLN2ODB
FAKTURA
KONEC
ORDOL
UC_US
SELFAK
PROC2
K_ZNAK_P
K_KLIC_P
K_DRUH_H
K_DAT_UH
K_MENA
K_CAST_M
K_KURZ
K_CAST
K_PLAT
W_PLAT
K_RAD
W_RAD
P_ZNAK_P
AP_KLIC_P
AP_DRUH_H
P_DAT_UH
P_MENA
P_CAST_M
P_KURZ
P_CAST
P_PLAT
LORP_RAD
DOROVROZD
GENDOROV
QQSALDO
QQCASTM
W_CAST_M
QQCAST
W_CAST
MCAST
MCASTM
W_FAKTURA
M7_FADOD
CIS_FAK
KURZROZD
K_CAST
AW_KURZ
ANASELFAK
W_MENA
K_ZNAK_P
K_DRUH_H
K_DAT_UH
W_DAT_UH
RK_MENA
K_CAST_M
K_KURZ
K_PLAT
W_PLAT
K_RAD
W_RAD
K_KLIC_P
DOROVROZD
P_CAST
CAST_CEL
RZAP_CEL
SP_ZNAK_P
P_KLIC_P
FP_DRUH_H
P_DAT_UH
P_MENA
P_CAST_M
W_ZNAK_P
P_KURZ
P_PLAT
P_RAD
QQSALDO
QQCASTM
W_CAST_M
QQCAST
W_CAST
MCAST
MCASTM
W_FAKTURA
M7_FAODB
CIS_FAK
KURZROZD
K_CAST
AW_KURZ
ANASELFAK
W_MENA
K_ZNAK_P
K_DRUH_H
K_DAT_UH
W_DAT_UH
RK_MENA
K_CAST_M
K_KURZ
K_PLAT
W_PLAT
K_RAD
W_RAD
K_KLIC_P
DOROVROZD
P_CAST
CAST_CEL
RZAP_CEL
SP_ZNAK_P
P_KLIC_P
FP_DRUH_H
P_DAT_UH
P_MENA
P_CAST_M
W_ZNAK_P
P_KURZ
P_PLAT
P_RAD
&barvau
@14,11 say &Msaldo..cis_fak
@14,34 say &Msaldo..vars_s
@16,2 say &Msaldo..mena color w+/bg
@16,6 say &Msaldo..cast_men pict '999999999.99'
@16,19 say &Msaldo..zap_men pict '999999999.99'
@16,32 say &Msaldo..cast_men - &Msaldo..zap_men pict '999999999.99'
if &Msaldo..mena # 'CZK'
@16,64 say &Msaldo..kurz pict '999999.9999999'
@17,6 say &Msaldo..cast_cel pict '999999999.99'
@17,19 say &Msaldo..zap_cel pict '999999999.99'
@17,32 say &Msaldo..cast_cel - &Msaldo..zap_cel pict '999999999.99'
m7_fadod
@17,46 say &Msaldo..pr_cel pict '999999999.99'
999999999.99
999999.9999999
999999999.99
999999999.99
999999.9999999
999999999.99
999999999.99
999999.9999999
999999999.99
&barvau
MSALDO
W_ZNAK_P
W_KLIC_P
W_DAT_UH
W_MENA
W_CAST_M
W_KURZ
W_CAST
W_PLAT
W_RAD
KURZROZD
K_ZNAK_P
K_KLIC_P
AK_DRUH_H
AK_DAT_UH
K_MENA
K_CAST_M
K_KURZ
K_CAST
K_PLAT
K_RAD
RDOROVROZD
P_ZNAK_P
P_KLIC_P
P_DRUH_H
P_DAT_UH
P_MENA
P_CAST_M
P_KURZ
P_CAST
P_PLAT
P_RAD
@20,3 &vloz K_znak_p pict '@!X'
Znak platby kurz. rozd
t jen Q,W !
ZNAK_P
K_znak_p
&barvau
&barvau
@20,7 &vloz K_klic_p pict '@!X'
@20,67 &vloz K_plat pict '@!XXXXXX'
@20,75 &vloz K_rad pict '999'
@21,3 &vloz P_znak_p pict '@!X'
Znak platby pro dorovn
t jen P,R !
ZNAK_P
P_znak_p
&barvau
&barvau
@21,7 &vloz P_klic_p pict '@!X'
@21,67 &vloz P_plat pict '@!XXXXXX'
@21,75 &vloz P_rad pict '999'
KURZROZD
DOROVROZD
AT_UH
AST_M
ZROZD
POCET2
K_ZNAK_P
DAT_UH
HLASKA
KONTROLA
JMENO_C
WJMENO_C
TYP_C
ROK_C
MOD_C2
RADEK_C
SLOUPEC_C
MOD_C1
K_KLIC_P
M7_TUP
_USK1
QQW_KLIC_PW_KLIC_P
DET_TUP
LIC_PP_ZNAK_P
SP_KLIC_P
&barvau
M6_ZAM.DBF2
m6_zam
UCETf
M6_SRAZK.DBF2
m6_srazk
UCETf
M6_ZP.DBF2
m6_zp
UCETf
et organizace neexistuje.
stka nen
vypln
Variabiln
symbol nen
vypln
KONS_S
w_kons
KONTROLA
W_KLIC_P
M7_TUP
_USK1
DET_TUP
M4_UC_O
W_UC_OR
NASEL
M6_ZAM
M6_SRAZK
M6_ZP
HLASKA
TROLA
W_CAST
W_CAST_M
W_MENA
W_VARS
W_ZNAK_P
JMENO_C
WJMENO_C
TYP_C
LIC_PMOD_C2
RADEK_C
_PSLOUPEC_C
MOD_C1
LIC_P
PW_KONS
M7_PRPOL
W_CISLO
CIS_PLAT
W_PLAT
W_RAD
W_STAV
W_UC_US
CIS_RAD
VARS_S
W_VARS
ZNAK_P
W_ZNAK_P
AUCET_ORG
W_UC_OR
KONS_S
W_KONS
SPEC_S
W_SPEC
UCET_UST
RDAT_UHR
W_DAT_UH
W_CAST
R_ZPRAC
W_ZPRAC
DAT_AKT
STAV_PL
D_OPER
C_PW_OPER
AUTOR
MM_AUTOR
PKLIC_PL
W_KLIC_P
CIS_PR
PMENA
W_MENA
CAST_MEN
W_CAST_M
W_KURZ
CIS_FAK
W_FAKTURA
W_DAT_AKT
ZM_AKT
platba
it platbu
vrat
Konec
Opravdu zru
it tento z
znam? (a/n)
Nelze zru
it - platba ji
byla z
na !
Nelze zru
it - platba ji
byla sp
na !
Nelze zru
it - platba ji
byla
na !
Platba byla zru
ena !
&barvau
W_AKT
KONEC
VYSKOC
P_AKT
VOL11
MKURZ
MCAST
MCASTM
MMENA
W_ORG
W_VARS
AW_SPEC
W_KONS
W_UC_OR
W_ZNAK_P
W_KLIC_P
W_RAD
W_DAT_AKT
W_CISLO
W_CAST
W_CAST_M
SOUC1
SOUC2
W_SPAR
W_ZOBR
W_FAKTURA
W_VYPIS
_PW_RAD_VYP
W_DAT_UCT
DRZHUBU
PPLN2PRAZD
ZOBRKREDEBOBR2
W_UC_US
W_PLAT
DAT_UCT
HLASKA
STAV_PL
SPAR_CAST
M7_PRPOL
CIS_PR
CIS_PLAT
M7_PLATT
CIS_RAD
PROC1
,PgDn,PgUp
- F6
- Esc
Pohyb
rovat
Konec
do proc&n
do zmen&n with 'get'
do zmen&n with 'say'
colorz
DO MENU&n
Nelze, platba ji
byla sp
na !
stky v na
a ciz
rozd
znam
nka !
vrat - ESC
Pozor, platba ji
byla za
Budete p
esto p
rovat (A/N) ?
&barvau
&barvau
Platba ji
byla sp
na !
vrat - ESC
Generovat dorovn
(A/N) ?
&barvau
&barvau
Platba ji
byla sp
na !
Pro "CZK" nelze pou
Znak platby mus
t vypln
nu kurzu lze pou
t pouze u aktual. nov
pisu.
Lze pou
t pouze u neza
tovan
platby.
Lze pou
t pouze u platby dodavateli nebo pro platby z mezd.
&barvau
vypln
et pl
tce !
colorz
orderz
et pl
tce neexistuje, nelze naj
O a k n
mu faktury !
set order to &QQorder
*** N
zev nebyl nalezen ***
set order to &QQorder
Faktury pro I
Dodavatelsk
ratelsk
Pokud si vyberete fakturu zde, budete muset zm
nit znak platby.
orderz
c7_sal+
set order to &MorderF
Pro dan
O nejsou
faktury.
RIIS 7.5
Pokud si vyberete fakturu zde, budete muset zm
nit znak platby.
orderz
c7_sal+
set order to &MorderF
Pro dan
O nejsou
faktury.
RIIS 7.5
&barvau
999999999.99
999999.9999999
999999999.99
colorz
Tato platba nebyla nalezena.
s752d
Konec beze zm
n ? (A/N):
&barvau
&barvau
Konec bez p
(A/N) ?
&barvau
&barvau
&barvau
if q<=pocet&n
KONEC
W_AKT
AZM_AKT
NAPOVEDA
QCOLW
W_STAV
HLASKA
W_ZNAK_P
W_CAST
W_CAST_M
W_DAT_UCT
W_ZOBR
GENPX
K_PLATBY
KONTROLA
PZAPIS_PL
NASTAVPAR
TEXTPLAT
PVYB_UC
DOROVROZD
GENDOROV
GENERPLAT
MKURZ
MCAST
MCASTM
MMENA
HLAV1
PROC1
W_MENA
W_KURZS
W_KURZN
W_KURZP
ZMENKURZ
T_UCT
PREHPRUH
C7_PRPOL
MW_ZNAK_P
W_UC_OR
MCOLORF
MQ_ALIAS
NF_ORG
F_ICO
M4_UC_O
QQORDER
M4_ORGAN
LNAZEV_ORG
HVEZDD
HVEZDO
WVOL11
/OBR11F
W_VYSKOC
IC_PL
LMOD_SYS
M7_FADOD
MORDERF
MDRUHF
C7_SAL
ZOBR_FAK
M7_FAODB
W_FAKTURA
W_KURZ
OBRF7
W_UC_US
?W_PLAT
W_RAD
?FAK_K_PLATS752D
cis_fak
insert into (Mhodod) (cis_fak, druh_h, cast, dat_akt, mena, cast_men, kurz, dat_v_z, cis_f_zal) values ( &Msaldo..cis_fak, cDruhHod, mcast, date (), w_mena, mcastm, w_kurz, w_dat_uh, w_plat + w_rad)
insert into (Mhodod) (cis_fak, druh_h, cast, dat_akt, mena, cast_men, kurz, dat_v_z, cis_f_zal) values ( &Msaldo..cis_fak, 'K', K_cast, date (), K_mena, K_cast_m, K_kurz, w_dat_uh, K_plat + K_rad)
insert into (Mhodod) (cis_fak, druh_h, cast, dat_akt, mena, cast_men, kurz, dat_v_z, cis_f_zal) values ( &Msaldo..cis_fak, 'D', P_cast, date (), P_mena, P_cast_m, P_kurz, w_dat_uh, P_plat + P_rad)
m7_fadod
replace cis_fak with &Msaldo..cis_fak, spar_cast with w_spar + mcast
MHODOD
CIS_FAK
SUMZAP
SUMZAPM
CIS_PLAT
CDRUHHOD
W_ZNAK_P
MCAST
MCASTM
KURZROZD
K_CAST
K_CAST_M
GENDOROV
AP_CAST
P_CAST_M
MSALDO
ZAP_CEL
ZAP_MEN
DAT_ZAP
W_DAT_UH
CAST_CEL
STAV_FA
W_SPAR
SPAR_CAST
MKURZ
MMENA
STAV_PL
W_STAV
Q_POLE
K_PLAT
CIS_RAD
PK_RAD
ZNAK_P
K_ZNAK_P
KLIC_PL
K_KLIC_P
K_MENA
CAST_MEN
K_KURZ
DAT_UCT
RAD_G
CIS_G
CHYBA_G
CIS_PR
P_PLAT
P_RAD
P_ZNAK_P
P_KLIC_P
P_MENA
P_KURZ
M4_UC_O
W_UC_OR
ZAVOD
M4_ORGAN
W_ORG
NAZEV_ORG
m7_prhl
cislo
c7_prpol
c7_prpol
c7_prpol
VybPrUh
s752a
Zadejte
slo p
kazu,
|.....|.
str(c7_prpol->cislo,6)
str(c7_prpol->cislo,6)
ehled p
bez p
platby
RIIS 7.5
str(c7_prpol->cislo,6)
str(c7_prpol->cislo,6)
str(c7_prpol->radek,2)
str(c7_prpol->radek,2)
Var. symbol
c7_prpol->vars_s
c7_prpol->vars_s
c7_prpol->uc_md
c7_prpol->uc_md
str(c7_prpol->kcs,12,2)
str(c7_prpol->kcs,12,2)
Dat.vyst.
tran(m7_prhl.dat_vyst,'@e')
m7_prhl.dat_vyst
Kons.s.
c7_prpol->kons_s
c7_prpol->kons_s
Spec.sym.
c7_prpol->spec_s
c7_prpol->spec_s
slo platby
c7_prpol->cis_plat
c7_prpol->cis_plat
slo fakt.
c7_prpol->cis_fak
c7_prpol->cis_fak
M7_PRHL
CISLO
M7_PRPOL
W_ZNAK_P
C7_PRPOL
VZNIK
CIS_PLAT
RADEK
POLEX
PROCX
ACLEFT
CRIGHT
FREEZE
ORDER
PRAVA
NADPIS
JMENO
TITLE
TITLECOLORPOC0
NAK_P
LIC_P
F0PRG
F1PRG
F4_JM
F4PRG
TISKPRG
F7_JM
F7PRG
F9PRG
F9KEY
F9KEY1
F10_JM
F10PRG
RAMECEK
NAZEVT
KLICO
KLNAZ
NSPACEBAR
TR_HL1
TR_HL2
TR_HL3
TR_HL4
TR_HL5
TR_HL6
LTR_HL7
TR_HL8
TR_HL9
DET_JM
/ENTER
DETAIL
DETPRG
LPS_LINE
PS_RETURN
PS_ZAZN
KLICF
KLICR
KLICV
LORMOD_PSV
W_UC_OR
UC_MD
W_CAST
W_VARS
VARS_S
W_KONS
KONS_S
W_SPEC
SPEC_S
W_CISLO
CISLO
RADEK
W_VYPIS
AW_RAD_VYP
W_FAKTURA
CIS_FAK
c7_tup
c7_tup+
c7_tup
c7_tup
kl_pomi
det_tup
ehled kl
platby (TUP)
N
zev
ty MD DAL
det_tup+' '+m7_desk.nazev+' '+ucet_1+' '+ucet_2
mod_fun
select &soub_ot
&barvau
KL_POMI
SOUB_OT
C7_TUP
M7_TUP
_USK1
SKUPINA
DET_TUP
M7_DESK
POC_TUP
P_KLIC
N_LMEZ
N_PMEZ
N_HMEZ
N_DMEZ
AN_PROM
N_HOD
N_POC
N_TEXT
N_HLAV
N_RAD
N_NVYH
ZOBR_NAP
MOD_FUN
W_KLIC_P
c4_uc_o
c4_uc_o+
c4_uc_o
kl_pomi
ehled
et
kod_uctu+' '+ucet+ustav
mod_fun
select &soub_ot
&barvau
KL_POMI
SOUB_OT
C4_UC_O
M4_UC_O
MAJICO
MAJZAV
ZAVOD
POC_TUP
ZAD_UCET
N_LMEZ
N_PMEZ
N_HMEZ
AN_DMEZ
N_PROM
N_HOD
N_POC
N_TEXT
N_HLAV
N_RAD
N_NVYH
ZOBR_NAP
MOD_FUN
VybUhVnit
Zadejte
kazu:
|.....
s752a
ehled p
pro vnitrobanku
RIIS 7.5
str(m7_vpb->cislo,6)
m7_vpb->cislo
Var. symbol
m7_vpb->vars_s
m7_vpb->vars_s
m7_vpb->uc_pr
m7_vpb->uc_pr
str(m7_vpb->castka,12,3)
m7_vpb->castka
Kons.s.
m7_vpb->kons_s
m7_vpb->kons_s
Spec.sym.
m7_vpb->spec_s
m7_vpb->spec_s
M7_VPB
W_PLAT
POLEX
PROCX
CLEFT
CRIGHT
FREEZE
ORDER
ALEVA
PRAVA
NADPIS
JMENO
TITLE
TITLECOLORPOC0
LECOLORF6
PF0PRG
F1PRG
F4_JM
F4PRG
TISKPRG
F7_JM
F7PRG
F9PRG
F9KEY
F9KEY1
F10_JM
F10PRG
RAMECEK
NAZEVT
KLICO
KLNAZ
SPACEBAR
TR_HL1
TR_HL2
TR_HL3
TR_HL4
TR_HL5
NTR_HL6
TR_HL7
TR_HL8
TR_HL9
DET_JM
ENTER
DETAIL
LDETPRG
PS_LINE
PS_RETURN
PS_ZAZN
LMOD_PSV
W_UC_OR
UC_PR
W_CAST
CASTKA
W_VARS
VARS_S
W_KONS
KONS_S
W_SPEC
SPEC_S
W_CISLO
CISLO
Zadej m
c (MMRR)
use a:&soub alias m7_plvpb
Prob
enos dat ...
m7_plat
MOD_SYS
ZNAK_P
VARS_S
UCET_ORG
DAT_UHR
CIS_PLAT
ACIS_RAD
M7_PLVPB
VAR_S
UCET_V_N
DOKLAD
KB
B
IPB
HYPO
Konec
NAB_OBR
colorz
datez
british
p_datM = ctod("01/&_pd/&_pda")
p_datM = ctod ("02/&_pd/&_pda")
p_datR = ctod("02/01/&_pda")
p_datQ = ctod("01/10/&_pda")
p_datQ = ctod ("02/10/&_pda")
p_datQ = ctod("01/07/&_pda")
p_datQ = ctod ("02/07/&_pda")
p_datQ = ctod("01/04/&_pda")
p_datQ = ctod ("02/04/&_pda")
p_datQ = ctod("01/01/&_pda")
p_datQ = ctod ("02/01/&_pda")
british
Kurz
k zadan
mu datu
nebyl nalezen !
Kurz
k datu:
neexistuje
Prov
st aktualizaci kurzovn
stku
R - vz
t kurzov
stek k datu F
Q - vz
t kurzov
stek k datu F
M - vz
t kurzov
stek k datu F
Kurz bude zad
mo v platb
set date &cDate
mod_fun
set date &cDate
decimalz
decimalz
set date &cDate
MCOLQ
P_DATM
P_DATQ
P_DATR
VOL11
CDATE
JINEDAT
DOPLKURZ
AW_KURZ
W_KURZN
W_KURZS
W_KURZP
QQ_DATUH
W_DAT_UH
BRITISH
W_MENA
POKRK
OLORM7_KURZ
HLASKA
ZAD_UCET
ZAD_USTAV
VKURZ
VDATT
LORVX
AT_UH
VYBKURZ
MOD_FUN
PW_UKONCI
M_DEC
PRODEJ
DAT_OD
STRED
NAKUP
RIIS 7.5
RIIS 7.5
chyby:
Existuj
2 zp
soby n
pravy:
Prvn
varianta:
Druh
varianta:
Esc,^End
i aktualizaci platby z banky byl nalezen V
vlastn
et, kter
te naveden.
- zru
ECHNY platby v p
ehledu, kter
jste pr
p
li (chybn
platby maj
"+" v
sle platby)
- nave
ty) od chybn
ch plateb
- obnovte textov
soubor platby (m
ponu *.ZAL
a nach
se v katalogu \RIIS\PRENOS\DN)
- prove
te nov
nahr
vky plateb.
- p
slujte platbu v aktualizaci z p
ehledu
- a pot
si IHNED opravte (nave
RIIS 7.5
Zadejte
slo faktury:
|...........
zobrEnt
s752a
c7_sal
Nezaplacen
dodavatelsk
faktury pro: F
Nezaplacen
ratelsk
faktury pro: F
s. faktury
c7_sal.cis_fak
c7_sal.cis_fak
Var. symbol
c7_sal.vars_s
c7_sal.vars_s
Ke sp
rov.K
str(c7_sal.cast_cel- c7_sal.zap_cel, 12,2)
c7_sal.cast_cel- c7_sal.zap_cel
Celkem K
str(c7_sal.cast_cel,12,2)
c7_sal.cast_cel
Zaplaceno
str(c7_sal.zap_cel,12,2)
c7_sal.zap_cel
Z
str(c7_sal.zal_cel,12,2)
c7_sal.zal_cel
Da
str(c7_sal.dan_cel,12,2)
c7_sal.dan_cel
Dat.spl.
tran(c7_sal.dat_spl,'@E')
(c7_sal.dat_spl )
c7_sal.mat_c_zu
c7_sal.mat_c_zu
Dat.zap.
tran(c7_sal.dat_zap,'@E')
(c7_sal.dat_zap )
Dat.zdan.
tran(c7_sal.dat_pri,'@E')
(c7_sal.dat_pri )
Celkem m
str(c7_sal.cast_men,12,2)
c7_sal.cast_men
Zaplac. m
str(c7_sal.zap_men,12,2)
c7_sal.zap_men
c7_sal.mena+' '
c7_sal.mena
str(c7_sal.kurz,14,7)
c7_sal.kurz
c7_sal.znak_f+' '
c7_sal.znak_f
Konst.Symb.
c7_sal.kons_s+' '
c7_sal.kons_s
Dat.odes
tran(c7_sal.dat_odes,'@E')
(c7_sal.dat_odes )
c7_sal.stav_fa+' '
c7_sal.stav_fa
Dat.Sm
tran(c7_sal.dat_smir,'@E')
c7_sal.dat_smir
tran(c7_sal.dat_uct,'@E')
c7_sal.dat_uct
Autor
c7_sal.autor
c7_sal.autor
c7_sal.zapoc+' '
c7_sal.zapoc
str(c7_sal.zal_vypl,12,2)
c7_sal.zal_vypl
Dr.fak.
c7_sal.druh_f + ' '
c7_sal.druh_f
Dr.fak.
c7_sal.druh_fo+ ' '
c7_sal.druh_fo
c7_sal.ucet_dod
c7_sal.ucet_dod
OBR3F
POLEX
PROCX
CLEFT
CRIGHT
FREEZE
ORDER
PRAVA
NADPIS
AZAHL
JMENO
TITLE
TITLECOLORPOC0
OLORF2
_UCET
_USTAV
LORF10
F0PRG
F1PRG
PF4_JM
F4PRG
TISKPRG
F7_JM
F7PRG
F9PRG
F9KEY
F9KEY1
F10_JM
F10PRG
RAMECEK
NAZEVT
KLICO
KLNAZ
SPACEBAR
TR_HL1
TR_HL2
TR_HL3
TR_HL4
TR_HL5
TR_HL6
TR_HL7
TR_HL8
NTR_HL9
DET_JM
ENTER
DETAIL
DETPRG
PS_LINE
PS_RETURN
PS_ZAZN
PAR_POLE
/C7_SAL
CIS_FAK
STAV_FA
LWVOL11
F_ORG
MOD_PSV
na platby nen
CZK, nelze pou
t pro znak platby C,L !
max.pou
itel.
stka=
Konec: ^End, ESC
Zadejte
stku ke sp
Zadejte
stku ke sp
&barvau
999999999.99
999999999.99
na ve faktu
e je jin
v platb
, nelze pou
max.pou
itel.
stka=
Konec: ^End, ESC
Zadejte
stku ke sp
&barvau
999999999.99
na platby nen
CZK, nelze pou
t pro fakturu v K
Konec: ^End, ESC
max.pou
itel.
stka=
Zadejte
stku ke sp
&barvau
999999999.99
Nelze m
a zahrani
stky rozd
znam
nka !!!
stka je v
(FFF
), ne
je mo
no sp
rovat !!
Opravdu chcete tuto fakturu p
rovat ? (a/n)
PS_LINE
W_ZNAK_P
MCAST
C7_SAL
CAST_MEN
ZAP_MEN
W_KURZ
CAST_CEL
ZAP_CEL
MCASTM
MKURZ
AKURZ
ZNAK_F
W_CAST
W_SPAR
LOR_Q3
W_MENA
HLASKA
LORMMENA
CIS_FAK
OBR2W
W_VARS
VARS_S
LORW_FAKTURA
colorz
cursorz
british
@!XXX
kup:
Prodej:
ed:
Konec: Esc, ^End
Prodej:
999999.9999999
999999999.99
M_MENA
W_ICO
W_ZAV
W_DAT
VOLJAZYK
MALIAS
MREADKEY
QQKURZ
AMOBR
W_KURZ
BRITISH
DRMENY
W_KURZN
W_KURZP
ORW_KURZS
W_CAST
LORW_CAST_M
ZOBRKREDEB
Prodej: *
kup: *
ed: *
W_KURZ
W_KURZP
W_KURZN
W_KURZS
colorz
Vyb_2Uc
s752a
vypln
n variabiln
symbol, nelze hledat.
Znak platby nen
ani pro dod., ani odb
r. fakturu.
vars_s
Neexistuj
faktury s t
mto variabiln
m symbolem.
c7_FaPom+
c7_FaPom
c7_FaPom
set order to &or_FaDod
set order to &or_FaOdb
set order to &or_Uc_O
Konec
Pohyb
- ESC
- Home,End,PgUp,PgDn,
- Enter
Faktury s var.symbolem: F
c7_FaPom.Cis_Fak
c7_FaPom.Cis_Fak
c7_FaPom.ICO
c7_FaPom.ICO
c7_FaPom.Zav
c7_FaPom.Zav
str(c7_FaPom.Cast_Cel,12,2)
c7_FaPom.Cast_Cel
set order to &or_FaDod
set order to &or_FaOdb
set order to &or_Uc_O
ZM_AKT
ZAZNAM
POM_UCET
MMCOLOR
POM_ALI
POM_ORD
POM_VETA
OT_FAODB
OR_FAODB
VE_FAODB
OT_FADOD
OR_FADOD
VE_FADOD
APOLEX
PROCX
CLEFT
CRIGHT
ORFREEZE
ORDER
LORDOL
REDEBPRAVA
NADPIS
JMENO
LORHODN
TITLE
TITLECOLORPOC0
F0PRG
F1PRG
F4_JM
F4PRG
TISKPRG
F7_JM
F7PRG
F9PRG
F9KEY
F9KEY1
F10_JM
F10PRG
RAMECEK
NRIIS
NAZEVT
KLICO
KLNAZ
SPACEBAR
TR_HL1
TR_HL2
TR_HL3
TR_HL4
RTR_HL5
TR_HL6
/TR_HL7
TR_HL8
TR_HL9
LDET_JM
ENTER
DETAIL
DETPRG
PS_LINE
PS_RETURN
PS_ZAZN
M4_UC_O
ROR_UC_O
VE_UC_O
W_VARS
?HLASKA
LATMW_ZNAK_P
M7_FADOD
M7_FAODB
VARS_S
C7_FAPOM
BJEDEN_UC
BPOCET_FA
fVYB_2UC
wW_UC_OR
mNAJDI_UC
=MOD_PSV
vypln
O organizace !
Vyb_3Uc
Novy_ucet
s752a
c4_uc_o
c4_uc_o
c4_uc_o
Neexistuje
et u t
to organizace
Esc - konec
Doplnit
et (A/n) ?
&barvau
c4_uc_o
c4_uc_o
Pohyb
Konec
- F10
- <Enter>
- Esc,^End
ty: F
c4_uc_o.kod_uctu+ ' '
c4_uc_o.kod_uctu
substr(c4_uc_o.ustav,1,20)
substr(c4_uc_o.ustav,1,20)
c4_uc_o.ucet
c4_uc_o.ucet
c4_uc_o.mena+ ' '
c4_uc_o.mena
Zp.Pl.
' ' + c4_uc_o.zp_platby +' '
c4_uc_o.zp_platby
&barvau
W_ICO
W_ZAV
POM_ANO
HOBR2
C7_FAPOM
HLASKA
POLEX
PROCX
CLEFT
CRIGHT
AFREEZE
ORDER
PRAVA
ORNADPIS
JMENO
LORHODN
REDEBTITLE
TITLECOLORPOC0
LORF1
LECOLORF6
F0PRG
F1PRG
F4_JM
F4PRG
TISKPRG
F7_JM
F7PRG
F9PRG
F9KEY
F9KEY1
F10_JM
F10PRG
RAMECEK
NAZEVT
KLICO
KLNAZ
SPACEBAR
TR_HL1
NTR_HL2
TR_HL3
TR_HL4
TR_HL5
TR_HL6
TR_HL7
TR_HL8
TR_HL9
DET_JM
RENTER
DETAIL
/DETPRG
PS_LINE
PS_RETURN
PS_ZAZN
C4_UC_O
ORM4_UC_O
ZAVOD
CISLOD
CISLOZ
MOD45A2
M4_ORGAN
NAZEV_ORG
?MOD_PSV
JEDEN_UC
ZM_AKT
POM_UCET
C7_FAPOM
PS_RETURN
c4_uc_o
c4_uc_o
&barvau
HOBR3
CISLOD
W_ICO
CISLOZ
W_ZAV
MOD45A2
C4_UC_O
PS_RETURN
ZNAK_P
w_znak_p
&barvau
&barvau
KONS_S
w_kons
&barvau
ZNAK_P
K_znak_p
&barvau
&barvau
ZNAK_P
P_znak_p
&barvau
&barvau
M_CIS1
JMENO_C
WJMENO_C
TYP_C
RADEK_C
SLOUPEC_C
MOD_C1
W_ZNAK_P
DET_TUP
AW_KLIC_P
W_KONS
K_ZNAK_P
ORQQW_KLIC_PK_KLIC_P
PP_ZNAK_P
P_KLIC_P
colorz
c7_platt+
c7_platt
KONEC
ZMENA
POMOC
POCET
DEK_C
COLOR
ALIAS
M7_PLATT
W_PLAT
W_RAD
AC7_PLATT
CIS_PLAT
CIS_RAD
BARVA
BARVAZ
ORTHLAVA
C_PTZMENY
&barvaz
Text platby
it zm
ny ? (A/N):
&barvau
DEK_C
KONEC
TPROC1
W_AKT
TZMEN1
ZMENA
C_PPOCET
CIS_PLAT
PW_PLAT
CIS_RAD
PW_RAD
PPOMOC
TMENU1
LORTULOZ
c7_platt
C7_PLATT
RAD_TX
M7_PLATT
W_PLAT
W_RAD
CIS_PLAT
CIS_RAD
TEXT_TX
&barvau
@ x,10 &vloz text_tx
POCET
&barvau
_PLATT
TEXT_TX
S_PLAT
-
,PgDn,PgUp
- ^PgUp,^PgDn
- ^Home
- ^End,Esc
Pohyb
Konec
W_AKT
S752A
STARYVYPIS
ZOBR_PL
PAMET
NOVYVYPIS
ZOBR_UCET
HLAV1
MENU1
PROC1
ZMEN1
ZOBRKREDEB
NASTAVPAR
PLN2PRAZD
NAPLN2
NAPLN2ODB
PROC2
ZMEN2
HLASKA
K_PLATBY
ZAPIS_PL
KONEC
MENU2
ZMENY
GENERPLAT
NAJDI_UC
PREHPRUH
VYBPRUH
DET_TUP
VYBER_UCT
PRIKUHR
VYBUHVNIT
VNITRO
ZVOL_BANK
KONT_MEN
HLASCHYBU
ZOBR_FAK
ZOBRENT
ZMENKURZ
DRMENY
VYB_UC
VYB_2UC
VYB_3UC
NOVY_UCET
NAPOVEDA
TEXTPLAT
THLAVA
TZMENY
TULOZ
TZMEN1
TPROC1
TMENU1
P:\IN\SK\O\07\
S752A.FXP
P:\IN\SK\O\07\S752A.PRG