home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
07
/
S766.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1999-04-15
|
20KB
|
533 lines
RIIS 7
m7_fadod
a7_fadod
m7_hodod
a7_hodod
m7_faodb
a7_faodb
m7_hoodb
a7_hoodb
.t. = .t.
doba splatnosti faktur
m4_organ
F$FF$%
RIIS 7
Nebyly nalezeny
znamy.
fnd_naz
pre_fak
Fakt.
RIIS 7
c_hod.nazev
c_hod.nazev
c_hod.ico
c_hod.ico
' '+c_hod.zav+' '
c_hod.zav
Splatnost
str(c_hod.dny,10,2)
c_hod.dny
W_OBD
W_DOD
W_SCR1
W_FAK
W_FAKA
W_FAKH
W_FAKHA
W_ESC
W_ESCOBD
TW_PDM
W_NZV
M4_ORGAN
TW_DATOD
W_DATDO
OBDOBI
DPREH_NEZAPMOD_SYS
HLASKA
ORPOLEX
?PROCX
OCPLRTOP
HYBYRBOT
CLEFT
CRIGHT
ORFREEZE
?ORDER
COLORPRAVA
NADPIS
JMENO
Z9HODN
DBSOUC
PSOUC
TITLE
TITLECOLORPOC0
YBYF4
F0PRG
TF1ON
F1PRG
?F4_JM
F4PRG
TISKPRG
F7_JM
F7PRG
*F9PRG
?F9KEY
*F9KEY1
F10_JM
F10PRG
RAMECEK
NAZEVT
KLICO
9KLNAZ
DBSPACEBAR
TR_HL1
TR_HL2
TR_HL3
TR_HL4
TTR_HL5
TR_HL6
TR_HL7
TR_HL8
TTR_HL9
DET_JM
ENTER
DETAIL
DETPRG
PS_LINE
TPS_RETURN
PS_ZAZN
MOD_PSV
1. Prob
prava dat
c_hod
SELECT * FROM &w_fak INTO DBF c_fh WHERE (stav_fa >= '2' OR dat_spl < date()) AND (znak_f = '0' OR znak_f = '2') AND &w_pdm
SELECT * FROM &w_faka INTO DBF c_fha WHERE (stav_fa >= '2' OR dat_spl < date()) AND (znak_f = '0' OR znak_f = '2') AND &w_pdm
SELECT * FROM &w_fakh INTO DBF c_fp WHERE druh_h # '9'
SELECT * FROM &w_fakha INTO DBF c_fpa WHERE druh_h # '9'
c_fha
c_fpa
2. Prob
et doby splatnosti
W_SCR2
W_RAD
W_PROC
Z_MAX
W_RECNO
PRUBEH
C_HOD
TNAZEV
UPPERCS
TZBR_PRU
C_FHA
DC_FP
APC_FPA
CIS_FAK
DAT_V_Z
ORM4_ORGAN
?W_ICO
LW_ZAV
HYBYW_NAZEV
W_DNY
W_DNYCEL
RW_FAKNO
?W_ESC
*INI_ORG
APP_HOD
STAV_FA
ORW_DATPOS
DAT_SPL
W_DNYZPO
W_ICO
W_ZAV
W_NAZEV
M4_ORGAN
NAZEV_ORG
W_DNYCEL
TW_DNY
W_FAKNO
c_hod
W_DNY
W_DNYCEL
W_FAKNO
C_HOD
NAZEV
V_ORG
W_ICO
TW_ZAV
W_NAZEV
W_RECNO
PRUBEH
Z_MAX
W_RAD
W_PROC
set color to w+/bg
set color to w/bg
set color to n/bg
set color to w/bg
set color to w+/rb
set color to w+/w
&z_barini
&z_baremp
&z_bar1
&z_bar2
&z_barini
Z_MAX
Z_AKT
Z_RAD
Z_PROC
Z_TXT
Z_BARINI
Z_BAREMP
Z_CHAR
Z_BAR1
TZ_BAR2
Z_SKUTXT
Z_SLPTXT
Z_POCAKT
TZ_STPROC
Z_TXPROC
Z_SLPROC
DZ_STRING
Zadejte n
Vyhled
znam neexistuje !
W_SCRFND
W_REC
W_FNDNAZ
UPPERCS
PS_RETURN
Prob
prava dat ...
c_dfh
faktury nebyly nalezeny.
RIIS 7
Zadejte
slo faktury:
sum_fak
pre_pla
Platby
- faktury
RIIS 7
.faktury
c_dfh.cis_fak
c_dfh.cis_fak
stka fakt.
str(c_dfh.cast_cel,12,2)
c_dfh.cast_cel
Zapl.celkem
str(c_dfh.zap_cel,12,2)
c_dfh.zap_cel
Rozd
str((c_dfh.cast_cel-c_dfh.zap_cel),12,2)
c_dfh.cast_cel-c_dfh.zap_cel
Var.symbol
c_dfh.vars_s
c_dfh.vars_s
c_dfh.znak_f+' '
c_dfh.znak_f
c_dfh.mat_c_zu
c_dfh.mat_c_zu
D.splat.
transform(c_dfh.dat_spl,'@E')
c_dfh.dat_spl
Konst.sym.
c_dfh.kons_s
c_dfh.kons_s
Spec.sym.
c_dfh.spec_s
c_dfh.spec_s
Da
str(c_dfh.dan_cel,12,2)
c_dfh.dan_cel
Z
str(c_dfh.zal_cel,12,2)
c_dfh.zal_cel
c_dfh.ucet_dod
c_dfh.ucet_dod
D.zapl.
transform(c_dfh.dat_zap,'@E')
c_dfh.dat_zap
transform(c_dfh.dat_odes,'@E')
c_dfh.dat_odes
Celkem/m
str(c_dfh.cast_men,12,2)
c_dfh.cast_men
Zaplac./m
str(c_dfh.zap_men,12,2)
c_dfh.zap_men
Rozd
str((c_dfh.cast_men-c_dfh.zap_men),12,2)
c_dfh.cast_men-c_dfh.zap_men
loha/m
str(c_dfh.zal_men,12,2)
c_dfh.zal_men
c_dfh.mena+' '
c_dfh.mena
Kurz
str(c_dfh.kurz,14,7)
c_dfh.kurz
Zdan.pl.
transform(c_dfh.dat_pri,'@E')
c_dfh.dat_pri
c_dfh.stav_fa+' '
c_dfh.stav_fa
transform(c_dfh.dat_smir,'@E')
c_dfh.dat_smir
transform(c_dfh.dat_uct,'@E')
c_dfh.dat_uct
Autor
c_dfh.autor
c_dfh.autor
c_dfh.zapoc+' '
c_dfh.zapoc
str(c_dfh.zal_vypl,12,2)
c_dfh.zal_vypl
c_dfh.druh_f+' '
c_dfh.druh_f
c_dfh.druh_fo+' '
c_dfh.druh_fo
W_SCRFAK
MOD_SYS
W_RECFAK
W_ICO
C_HOD
W_ZAV
TW_NAZ
NAZEV
C_DFH
TCIS_FAK
HLASKA
PS_LINE
DPOLEX
PPROCX
ORCLEFT
?CRIGHT
LFREEZE
YBYORDER
RLEVA
?PRAVA
*NADPIS
JMENO
ORHODN
PSOUC
TITLE
9TITLECOLORPOC0
LECOLORF3
YBYF10
F0PRG
F1PRG
F4_JM
F4PRG
TTISKPRG
F7_JM
?F7PRG
F9PRG
F9KEY
F9KEY1
F10_JM
*F10PRG
?RAMECEK
*RIIS
NAZEVT
KLICO
KLNAZ
SPACEBAR
TR_HL1
TR_HL2
9TR_HL3
DBTR_HL4
TR_HL5
TR_HL6
TR_HL7
TR_HL8
TTR_HL9
DET_JM
ENTER
DETAIL
TDETPRG
PS_RETURN
PS_ZAZN
TW_DOD
MOD_PSV
Prob
prava dat ...
c_dfp
hodnotov
daje nebyly nalezeny.
RIIS 7
Hodnotov
daje faktury
RIIS 7
c_dfp.druh_h+' '
c_dfp.druh_h
hrady
transform(c_dfp.dat_v_z,'@E')
c_dfp.dat_v_z
c_dfp.mena+' '
c_dfp.mena
stka/m
str(c_dfp.cast_men,12,2)
c_dfp.cast_men
Kurz
str(c_dfp.kurz,14,7)
c_dfp.kurz
stka/K
str(c_dfp.cast,12,2)
c_dfp.cast
Doklad
c_dfp.cis_f_zal
c_dfp.cis_f_zal
W_SCRPLA
MOD_SYS
W_RECPLA
W_CISFAK
C_DFH
CIS_FAK
C_DFP
TDAT_V_Z
HLASKA
PS_LINE
TPOLEX
PROCX
DRBOT
PCLEFT
CRIGHT
FREEZE
ORORDER
YBYLEVA
PRAVA
NADPIS
RZAHL
?JMENO
*HODN
PSOUC
ORTITLE
TITLECOLORPOC0
LECOLORF2
LECOLORF7
F0PRG
YBYF1PRG
F4_JM
F4PRG
TISKPRG
F7_JM
F7PRG
TF9PRG
F9KEY
?F9KEY1
F10_JM
F10PRG
RAMECEK
*NAZEVT
?KLICO
*KLNAZ
SPACEBAR
TR_HL1
TR_HL2
TR_HL3
TR_HL4
TR_HL5
9TR_HL6
DBTR_HL7
TR_HL8
TR_HL9
DET_JM
ENTER
TDETAIL
DETPRG
PS_RETURN
PS_ZAZN
RETURN
MOD_PSV
filterz
AND
colorz
sum cast_cel, zap_cel, zal_cel, dan_cel, cast_men, zap_men to w_cast, w_zap, w_zal, w_dan, w_castm, w_zapm for &w_filt
RIIS 7
double
et za organizaci
Esc,^End
Faktur.
stka: K
Zaplaceno celkem: K
l: K
loha: K
Fakturovan
DPH: K
Celkem m
ny:
Zaplaceno v m
:
l v m
:
999,999,999,999.99
999,999,999,999.99
999,999,999,999.99
999,999,999,999.99
999,999,999,999.99
999,999,999,999.99
999,999,999,999.99
999,999,999,999.99
W_SCRSUM
MOD_SYS
W_FILT1
W_FILT2
W_FILT
W_RECSUM
W_COLOR
CAST_CEL
ZAP_CEL
TZAL_CEL
DAN_CEL
CAST_MEN
ZAP_MEN
TW_CAST
W_ZAP
W_ZAL
DW_DAN
PW_CASTM
W_ZAPM
MOD_WIN
Zadejte obdob
Obdob
t vypln
dat_odes BETWEEN w_datod AND w_datdo
W_DATOD
W_DATDO
W_ESCOBD
HLASKA
W_PDM
Prob
prava dat ...
SELECT * FROM &w_fak INTO DBF afak WHERE (stav_fa >= '2' OR dat_spl < date()) AND (znak_f = '0' OR znak_f = '2') AND empty(dat_odes)
SELECT * FROM &w_faka INTO DBF aafak WHERE (stav_fa >= '2' OR dat_spl < date()) AND (znak_f = '0' OR znak_f = '2') AND empty(dat_odes)
aafak
Faktury, kter
nemaj
vypln
no datum vystaven
s751a1
W_SCR1
AAFAK
CIS_FAK
W_DOD
M_DRUH
LDETAIL
PLF10
TITULEK
ZOBR_FAK
RS751A1
?S766
INI_ORG
APP_HOD
ZBR_PRU
PRUBEH
FND_NAZ
PRE_FAK
PRE_PLA
SUM_FAK
OBDOBI
PREH_NEZAP
P:\IN\SK\O\07\
S766.FXP
P:\IN\SK\O\07\S766.PRG