home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
07
/
S713B.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1998-12-21
|
17KB
|
493 lines
RIIS 7.5
m_param
m7_ucto
cesky
Volba jazyka:
esky
mecky
cesky
nemecky
nemecky
99.999
cesky
ediskov
hlavn
kniha za obdob
Abteilungshauptbuch f
r Zeitraum :
Chybn
zadan
c obdob
volanif
MODSN
obdob
dosud nen
uzav
m7_ucet
u7_sstav
r7_ucet
p7_ucet+
p7_ucet
r7_sstav
p7_sstav+
p7_sstav
m7_ucet
m7_sstav
c7_stav
Prob
r dat ...
md_mes = md_&b
dal_mes = dal_&b
c7_stav
mod_lib
et za tB
hMD
c_sy = DAL
et za KONEC
NAZEVT
uc_M_PARAM
eW_POLE7
POLE7
_sesW_PODNIK
iFIRMA
lavnM7_UCTO
a _UZAV
'+wW_MESIC
h_PLAT_OBDOBW_ROK
knihROK
W_ROK_VYB
W_OBD
OBW_JAZ
h W_KURZ
rauID_ORG
bd+OBR_H
: '+VOLBA
urz,W_STR
h_HLASKA
'VOLANI
ngM7_UCET
OBUCET
itrauU7_SSTAV
+STAV
s: '+R7_UCET
z,P7_UCET
R7_SSTAV
P7_SSTAV
M7_SSTAV
=C7_STAV
P_S_R
v =MD_ROK
hnuDAL_ROK
_pMD_OBD
' DAL_OBD
stK_S_R
h_TRIDA
= ' SU2
EndbesSU3
hSU4
= 'SU5
l-kumuS713B
MOD_SYS
n-kumPOCET
POCETC
=MD_MES
olDAL_MES
PROCENTA
P_SETUP
abP_RESET
P_6LPI
c_tP_8LPI
me P_10CPI
P_12CPI
c_P_16CPI
meP_20CPI
.'P_BOLDON
cP_BOLDOFF
P_ULINEON
P_ULINEOFFP_ITALON
uP_ITALOFF
P_SUPERON
P_SUPEROFFP_SUBON
P_SUBOFF
oP_DBST_ON
P_DBST_OFFP_LETRQUALP_DRAFT
caP_COMP_OFFP_WIDT_ON
P_WIDT_OFFP_HEIG_ON
P_HEIG_OFFP_NEWPAGE
P_KODY
vedMOD_LIB
t.S713BX
cesky
ediskov
hlavn
kniha za obdob
Po
.stav.roku
statek roku
MD roku
DAL roku
MD obdob
DAL obdob
et za t
et za syntetiku
et celkem
ediskov
hlavn
kniha za obdob
Hlavn
kniha za obdob
Abteilungshauptbuch f
r Zeitraum:
, Kurs:
Abteilungshauptbuch f
r Zeitraum:
, Kurs:
Klasse
Konto
Bezeichnung
ffnungsstand
Endbestand
Soll-kumuliert
Haben-kumuliert
Soll-Monat
Haben-Monat
Summe f
r Klas.
Summe f
r Synt.
Gesamtsumme
Hauptbuch f
r Zeitraum
Funkce
Funkce
et(6), st
edisko(4)
detail
Detail
tisk_det
s713b
RIIS 7.1
c7_stav.ucet
c7_stav.ucet
c7_stav.str
c7_stav.str
cesky
ucet.nazev
ucet.nazev
substr(ucet.nazev2,1,35)
substr(ucet.nazev2,1,35)
tran(p_s_r,'99999 999 999.99')
p_s_r
tran(k_s_r,'999999 999 999.99')
k_s_r
tran(md_rok,'999999 999 999.99')
md_rok
tran(dal_rok,'999999 999 999.99')
dal_rok
tran(md_obd,'999999 999 999.99')
md_obd
tran(dal_obd,'999999 999 999.99')
dal_obd
W_JAZ
za tNAZEVT
hW_OBD
y = H_TRIDA
a H_UCET
H_STR
uc_H_NAZEV
eH_POC_SR
H_ZUST_R
sH_MD_R
iH_DAL_R
vnH_MD_M
a H_DAL_M
+wH_SOUC_TR
H_SOUC_SY
H_SOUC_CE
H_HL_SEST
H_HLAV2
W_KURZ
POLEX
h POC0
rauF1
bd+F2
: '+F3
urz,F4
h_F5
itrauF9
SSTAV
s: '+F10_JM
z,F10PRG
F9KEY
DETAIL
ENTER
DET_JM
RAMECEK
=TISKPRG
PROCX
v =OBRZ
hnuKLICF
_pKLICR
' KLICV
stUCET
h_RIIS
' NADPIS
besLEVA
hPRAVA
= 'HOR
l-kumuDOL
ZAHL
= JMENO
-kumHODN
=MOD_PSV
lOBSAH
Rekapitulace t
ty za syntetick
Konec
KONEC
za tVOL11
hOBR1
y = M
a S713A2
S713A3
uc_PS_RETURN
mod_lib
Prob
tisk ...
s713bs_e
s713bs
za tW_TISK
hNASTAV_PRNMOD_LIB
a OBRT
uc_ID_ORG
S713BS_E
S713BS
mod7_lib
OBR_DET
tPS_LINE
hZOBR_UCOB
MOD7_LIB
C7_STAV
uc_STR
W_MESIC
W_ROK
colora
set color to &color
tCOLOR
h_XOBR
kumulace dat ...
c7_stav
p7_rst
p7_rst
tisk_rek
s713b
RIIS 7.1
Rekapitulace
iif(p7_rst.trida='C','Celkem ','T
da '+p7_rst.trida)
tran(j.p_s_r,'99999 999 999.99')
j.p_s_r
tran(j.md_rok,'99999 999 999.99')
j.md_rok
tran(j.dal_rok,'99999 999 999.99')
j.dal_rok
tran(j.k_s_r,'99999 999 999.99')
j.k_s_r
tran(j.md_obd,'999999 999 999.99')
j.md_obd
tran(j.dal_obd,'999999 999 999.99')
j.dal_obd
RIIS 7.1
MOD_SYS
tMESS
hZAZN
C7_STAV
TRIDA
P_S_R
c_MD_ROK
DAL_ROK
MD_OBD
sDAL_OBD
iK_S_R
vnP7_RST
a HLASKA
+wOBR1
PS_RETURN
L_SEST
h ANSI
auPOLEX
bd+PROCX
: '+RTOP
urz,RBOT
h_CLEFT
'CRIGHT
ngFREEZE
OBORDER
trauZAHL
+JMENO
: '+HODN
z,TITLE
TITLECOLORF1
v =F9
hnuF10
_pDETAIL
' F1PRG
stF4_JM
h_F4PRG
' F7_JM
besF7PRG
hF9KEY
= 'F10_JM
umuF10PRG
DET_JM
= DETPRG
kumRAMECEK
NAZEVT
=RIIS
lTISKPRG
CARA
POC0
c_tOBRZ
e KLICF
KLICR
c_KLICV
meNADPIS
.'LEVA
cPRAVA
INEON
INEOFFI
uH_TRIDA
H_POC_SR
H_MD_R
OFFH_DAL_R
H_ZUST_R
oH_MD_M
H_DAL_M
FFMOD_PSV
ALOBSAH
mod_lib
Prob
tisk ...
s713c_e
s713c
tW_TISK
hNASTAV_PRNMOD_LIB
OBRT
c_ID_ORG
S713C_E
S713C
kumulace dat ...
c7_stav
p7_rst
p7_rst
tisk_srek
s713b
RIIS 7.1
Rekapitulace syntetick
iif(p7_rst.su3='C','Celkem ','SU '+p7_rst.su3)
j.str
j.str
tran(j.p_s_r,'99999 999 999.99')
j.p_s_r
tran(j.md_rok,'99999 999 999.99')
j.md_rok
tran(j.dal_rok,'99999 999 999.99')
j.dal_rok
tran(j.k_s_r,'99999 999 999.99')
j.k_s_r
tran(j.md_obd,'999999 999 999.99')
j.md_obd
tran(j.dal_obd,'999999 999 999.99')
j.dal_obd
RIIS 7.1
MOD_SYS
tMESS
hZAZN
V_PRNC7_STAV
c_P_S_R
MD_ROK
DAL_ROK
sMD_OBD
iDAL_OBD
vnK_S_R
a P7_RST
+wHLASKA
PS_RETURN
auANSI
d+POLEX
: '+PROCX
urz,RTOP
h_RBOT
'CLEFT
ngCRIGHT
OBFREEZE
rauORDER
+ZAHL
: '+JMENO
z,HODN
TITLE
OLORTITLECOLORF1
v =F7
hnuF9
_pF10
' DETAIL
stF1PRG
h_F4_JM
' F4PRG
besF7_JM
hF7PRG
= 'F9KEY
umuF10_JM
F10PRG
= DET_JM
kumDETPRG
RAMECEK
=NAZEVT
lRIIS
TISKPRG
_tKLICF
e KLICR
KLICV
c_NADPIS
meLEVA
.'PRAVA
INEON
OFFH_POC_SR
uH_MD_R
H_DAL_R
H_ZUST_R
FH_MD_M
H_DAL_M
oMOD_PSV
OBSAH
mod_lib
Prob
tisk ...
s713ds_e
s713ds
tW_TISK
hNASTAV_PRNMOD_LIB
OBRT
c_ID_ORG
S713DS_E
S713DS
colora
set color to &color
tCOLOR
POCET
tPOCETC
hPOC
S713BX
FUNKCE
TISK_DET
DETAIL
HLASKA
S713A2
TISK_REK
S713A3
TISK_SREK
PROCENTA
W:\07\
S713B.FXP
W:\07\S713B.PRG