home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
04
/
MOD42B.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1999-02-26
|
67KB
|
1,643 lines
m_param
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
j e m s k l a d u :
RIIS 4.2
v4_sklad
x4_sklad
v4_skl_z
x4_skl_z
&barvau
@!R XXXX
mod_proc
Sklad neexistuje
mod_proc
Nelze prov
jem na jin
materi
sklad
Pro zadan
sklad nem
te opr
mod_proc
m1_ident
material
m4_organ
m_dat
x_dat
m_cis1
x_cis1
m1_zas
x1_zas
m1_um
ident
m1_kalk
x1_kalk
m1_cen
x1_cen
m1_plan
x1_plan
m4_obj
objed
M5_AKT.DBF2
m5_akt
ident
m7_kurz
archiv
m1_obr_a
sklad
m1_obr
sklad
RIIS 4.2
&barvau
doklad
sklad
vrat
Konec
&barvau
&barvau
eANSI
endifP_ZOB
--- W_DICO
akW_NAZ_ORG
M_PARAM
W_POLE4
t POLE4
e(5)W_KOEF_VN
KOEF_VN
(2POM
_plan_TER_UZAV
eW_ROK
dW_MESIC
_pM_MENA
w_W_RADA_OBJW_KOEF_MENW_MENA
_poMOBR
w_pQ1
_o = w_Q2
lock_zQ4
ith indQ5
w_identQ6
if Q7
POC_ZAZ
ZOBR_ZAZ
rRADEK
endiQ_CENA
loPOCET1
witPOCET2
w_INDIK
if !HOR
aDOL
qPOCET
reDOP1
endifDOP2
o locPOR
with COUNT
if !CENA_NOV
qRAD
reSL
endifPOC
* ----KONTROLA
zEXISTUJE
nBARVAS
BARVAR
BARVAT
---BARVAZ
izaBARVAU
--BARVAN
selBARVAH
V4_SKLAD
sX4_SKLAD
aV4_SKL_Z
tX4_SKL_Z
mPRIHLAS
eW_SKLAD
mnSKLAD
-ZOBR_SKL
iMOD_PROC
sW_NAZEV_SKNAZEV
m1_zHLASKA
aceDRUH_SKL
tMOD_SYS
_P_KONSIG
KONSIG
iW_TYP_UM
wBARVA
M1_IDENT
rMATERIAL
tM4_ORGAN
aktualM_DAT
1_obX_DAT
M_CIS1
s_oX_CIS1
--M1_ZAS
ktuX1_ZAS
m4_M1_UM
IDENT
m4_M1_KALK
laX1_KALK
wM1_CEN
ov+X1_CEN
0),M1_PLAN
_zX1_PLAN
o_M4_OBJ
e(2OBJED
_kdoM5_AKT
o_kM7_KURZ
(2ARCHIV
e(2M1_OBR_A
JM1_OBR
bjdW_ID_ZAK
pW_CPOL
objW_ID_VYS
pW_ICO_NAZ
W_ICO
mno_W_ZAV
_polW_DOKLAD
wW_KOD_OB
)W_DAT_P
obW_DAT_K
+sW_KURZ
bj.HLAV1
)=mMENU
+str(W_SKUT_MN
W_PLAN_MN
W_CENA_MJ
W_CENA_CELW_UVN_POC
W_ZASOBA
sW_VADNE_MNW_IDENT
enW_UM
mno_dW_POPIS_O
W_NAZEV
epHLAV2
_ovKONEC
no_oI
no_dod
selecR
seek U
pobjd.zaT
'+chr(2Q
@23,62A
y ' ZMENY
,EscVOL11
coloOBR1
,2 say
&barvau
&barvas
&barvaz
&barvar
&barvaz
&barvat
jemka
Druh p.
Objedn
Faktura
Dod.list
Dodavatel
Datum
Kurz-prodej
&barvau
&barvas
&barvaz
&barvar
&barvaz
&barvat
jemka
Druh p.
Objedn
Faktura
Dod.list
Dodavatel
&barvau
M_MENA
endifW_NAZEV_SKID_ORG
&barvas
&barvau
&barvar
&barvaz
&barvat
&barvan
Mn.ob./d.l.
. skut.
. vadn
Cena/MJ
Celk. cena
&barvau
eHOR
endifDOL
ZEV_SK
&barvau
&barvas
999999.999
&barvau
eW_DOKLAD
fW_KOD_OB
KW_ID_ZAK
KW_ID_VYS
KW_ICO
W_ZAV
t M4_ORGAN
)W_ICO_NAZ
NAZEV_ORG
M1_OBR
M_MENA
eW_MENA
dW_DAT_K
_pM7_KURZ
w_W_KURZ
BJPRODEJ
MENW_KOEF_MENMNOZ
&barvas
&barvau
99999999.999
99999999.999
99999999.999
99999999.99
99999999.99
&barvau
DOKLAD
fW_IDENT
KW_UM
KW_PLAN_MN
W_SKUT_MN
W_VADNE_MNW_MJ
)W_CENA_MJ
W_NAZEV
W_POPIS_O
W_CENA_CEL\
w_doklad
@ 4,14 &vloz w_doklad pict '999999'
w_kod_ob
@ 4,30 &vloz w_kod_ob pict '@!X'
w_id_zak
@ 4,46 &vloz w_id_zak pict '@!X'
w_id_vys
@ 4,67 &vloz w_id_vys pict '@!X'
w_ico
@ 5,14 &vloz w_ico pict '@!X'
w_zav
@ 5,27 &vloz w_zav pict '@!X'
w_mena
@ 6,14 &vloz w_mena pict '@!XXX'
w_dat_k
@ 6,28 &vloz w_dat_k pict '@E'
eP_ZOB
IDENT
KPOCET1
W_RADA_OBJEXISTUJE
NID_ORG
)CIS_RADY
W_SKLAD
W_DOKLAD
W_COBJ
LCISRADY
dM1_OBR
pW_KOD_OB
_W_ICO
BJW_ZAV
MENW_ICO_NAZ
W_ID_ZAK
pW_CPOL
w_W_ID_VYS
*KOD_OB
zIDENT_ZAK
IDENT_VYS
if ZAVOD
M4_ORGAN
NAZEV_ORG
PROC1
ndiQ2
loQ3
witM4_OBJ
w_Q4
aQ6
qQ7
reQ8
ndifA
w_ident
@ x,2 &vloz w_ident pict '@!X'
ka neexistuje
kaznick
materi
l nelze na tento typ skladu p
ijmout
Lze p
mat pouze z
kaznick
materi
Nelze p
mat materi
l vlastn
@ x,15 &vloz w_um pict '@!X'
w_plan_mn
@ x,21 &vloz w_plan_mn pict '99999999.999'
w_skut_mn
@ x,34 &vloz w_skut_mn pict '99999999.999'
w_vadne_mn
@ x,47 &vloz w_vadne_mn pict '99999999.999'
colorz
/1MJ:
99999999.999
w_cena_mj
@ x,64 &vloz w_cena_mj pict '99999999.99'
w_popis_o
@ x+1,35 &vloz w_popis_o pict '@!X'
eP_ZOB
fNASTAV_Q2
M1_IDENT
_IDENT
NW_IDENT
S_RADY
HLASKA
KOD_POL
W_TYP_UM
LW_MJ
pW_NAZEV
_NAZEV
BJP_KONSIG
NW_CENA_MJ
W_UVN_POC
M1_KALK
w_PL_OD
*TYP_NAKL
zIDENT
M1_OBR
PROC2
Q2
ORGAN
ndiW_CENA_CELW_SKUT_MN
!Q_CENA
aM_MENA
qW_KOEF_MENMOBR
ndifMCOL
locX
with W_MENA
f !Q7
do proc&n
do zmen&n with 'get'
do zmen&n with 'say'
&barvau
if q<pocet&n
it pr
ci beze zm
n? (a/N)
vypln
, obrat nelze ulo
it pr
ci beze zm
n? (a/N)
KONEC
fEXISTUJE
IDENT
IDENT
_RADY
M_MENA
YP_UM
LPOCET1
NAZEV
BJDOL
NA_MJ
N_POC
VOLBA
NAP_HOD
P_ZOB
ndiK_HLAVA
ELKONTROLA
W_SKUT_MN
W_PLAN_MN
W_VADNE_MNW_CENA_MJ
W_CENA_CELW_IDENT
ifW_UM
locW_MJ
with W_POPIS_O
W_NAZEV
qHLAV1
reHLAV2
ndifPROC1
----MENU
zK_OBRATU
nRADEK
POC_ZAZ
---HLASKA
colorz
set color to &Mcolor
eMCOLOR
fMOBR
slo p
jemky mus
t vypln
KOD_OB
w_kod_ob
Lze zad
vat pouze p
dy obrat
organizace mus
t uvedena
Organizace neexistuje
Nebyl nalezen kurz platn
pro zadanou m
nu a den
KONTROLA
eW_DOKLAD
KHLASKA
IDENT
IDENT
NJMENO_C
)WJMENO_C
MOD_C2
RADEK_C
LSLOUPEC_C
MOD_C1
pW_KOD_OB
BJW_ICO
M4_ORGAN
W_ZAV
_W_ICO_NAZ
NAZEV_ORG
PROC1
M_MENA
M7_KURZ
W_MENA
W_DAT_K
W_KURZ
PRODEJ
ndiQ7
Hodnota objednan
ho mno
(na dod. listu) < 0
Hodnota skute
ho mno
t vypln
Nedostate
soba na um
Hodnota vadn
ho mno
Prove
te kondenzaci datab
ze M1_ZAS, informujte firmu SoWA
Hodnota z
sob a nov
cena bude z
, sni
te cenu
Hlavn
sklad je konsigna
jem nelze prov
Sklad se li
od hlavn
ho skladu, ulo
it? (a/N)
Skl. um
se li
od hlavn
ho skladov
ho um
, ulo
it? (a/N)
pustn
hodnota ceny polo
KONTROLA
eW_PLAN_MN
KHLASKA
IDENT
JW_SKUT_MN
M1_UM
)W_IDENT
W_SKLAD
W_TYP_UM
LZASOBA
KUT_MN
W_VADNE_MNM1_ZAS
BJIDENT
W_UVN_POC
W_CENA_MJ
ID_ORG
SKL_HLAVNIV4_SKLAD
KONSIG
VNIP_KONSIG
POM
NIOKALK
SKL_HL_UM
LOCK_ZAS
INDIK
LOCK_KALK
VYP_PR
PRIJEM
DATUM_PRIJZAPIS_OBR
m1_obr
TVRDE PRECENENI
m1_cen
m1_kalk
m1_obr
TVRDE PRECENENI
W_POLE4
eP_KONSIG
M1_UM
W_IDENT
KW_ZASOBA
IDENT
JV4_SKLAD
SKLAD
)KONSIG
DRUH_SKL
ZASOBA
W_SKLAD
LW_UM
W_TYP_UM
W_SKUT_MN
M1_OBR
BJTERMIN_OB
KOD_OB
PLAN_MNOZ
SKUT_MNOZ
VYDAL_SKL
VYD_UM_SKLTYP_UM_V
POPIS_OBR
VADNE_MNOZNAKLAD
JMENO
NIROK
MESIC
W_CENA_MJ
UM_SKL
TYP_UM
W_VADNE_MNW_UVN_POC
MM_AUTOR
JW_ROK
W_MESIC
fCENA_NOV
cM1_CEN
DATUM
CEN_PUV
qCEN_PR
reMNOZ_PR
ifCEN_PRU
--C_PRIJ
zKL_ZAZ
nW_DOKLAD
M1_KALK
-PL_OD
izaPL_DO
-DAT_AK
selTYP_NAKL
KUSY_D
sMATER
aM1_PLAN
m1_obr
m1_obr
TVRDE PRECENENI
TVRDE PRECENENI
VEDLEJSI NAKL.
m1_obr
m1_kalk
m1_cen
M1_OBR
eIDENT
TERMIN_OB
KOD_OB
KPLAN_MNOZ
SKUT_MNOZ
VYDAL_SKL
VYD_UM_SKLTYP_UM_V
POPIS_OBR
ZAVOD
LDOKL_CIS
IDENT_ZAK
IDENT_VYS
VADNE_MNOZZASOBA
NAKLAD
JMENO
L_SKL
MESIC
_SKLW_IDENT
W_DAT_P
W_KOD_OB
ZW_PLAN_MN
W_SKUT_MN
W_SKLAD
W_TYP_UM
W_POPIS_O
W_ICO
W_ZAV
E_MNW_DOKLAD
W_ID_ZAK
JW_CPOL
W_ID_VYS
fW_VADNE_MNM1_UM
W_CENA_MJ
MM_AUTOR
W_ROK
qW_MESIC
reV4_SKLAD
fW_POLE4
-P_KONSIG
zW_ZASOBA
nCENA_NOV
SKLAD
UM_SKL
-TYP_UM
izaW_KOEF_VN
M1_IDENT
lKOD_POL
ID_ORG
sCENA_NOV2
KONSIG
DRUH_SKL
NP_KOD
eP_POZN
mnM1_KALK
_NOV2
PL_OD
sPL_DO
V_SKDAT_AK
1_zTYP_NAKL
eKUSY_D
tMATER
_M1_PLAN
M1_CEN
DATUM
CEN_PUV
rCEN_PR
tMNOZ_PR
-CEN_PRU
alC_PRIJ
_obKL_ZAZ
W_UVN_POC
ZAPIS_AKT
IDENT
Prove
te kondenzaci datab
ze M1_ZAS, informujte firmu SoWA
m1_zas
znam o z
ch polo
ky FF
stupn
Prove
te kondenzaci datab
ze M1_UM, informujte firmu SoWA
m1_um
Prove
te kondenzaci datab
ze M1_UM, informujte firmu SoWA
znam o um
sob polo
ky FF
stupn
INDIK
eX_IDENT
M1_ZAS
KIDENT
HLASKA
SKL_HLAVNISKL_HL_UM
W_SKLAD
M1_UM
W_TYP_UM
SKLAD
LUM_SKL
TYP_UM
Prove
te kondenzaci datab
ze M1_KALK, informujte firmu SoWA
m1_kalk
cena p
edstavuje
% ceny star
, zalo
it? (a/N)
znam n
kladov
stupn
Prove
te kondenzaci datab
ze M1_IDENT, informujte firmu SoWA
Prove
te kondenzaci datab
ze M1_PLAN, informujte firmu SoWA
m1_plan
MNTUXYZ
FPSABCOJKG
znam pl
novac
stupn
INDIK
eW_IDENT
P_KONSIG
W_POLE4
KM1_KALK
IDENT
TYP_NAKL
IHLASKA
PL_OD
DAT_AK
POM_KOEF
LW_CENA_MJ
POM_KOEFC
OKALK
M1_IDENT
KOD_POL
M1_PLAN
TV_ZAK
KOD_KALK
LHR_DEN
znam po
objedn
vky nen
stupn
Prove
te kondenzaci datab
ze M4_POBJD, informujte firmu SoWA
znam o pokryt
zky nen
stupn
znam n
zky nen
stupn
INDIK
eM4_POBJ
HLASKA
M4_POBJD
KMAT_OBJ
PORADI
M5_PLAN
IZAKAZKA
mod_lib
mod_lib
Prob
tisk ...
ST_OBR
eM1_OBR
KOD_OB
W_SKLAD
KW_DOKLAD
P_SETUP
IP_RESET
P_6LPI
P_8LPI
P_10CPI
P_12CPI
LP_16CPI
P_20CPI
P_BOLDON
P_BOLDOFF
P_ULINEON
P_ULINEOFFP_ITALON
P_ITALOFF
P_SUPERON
P_SUPEROFFP_SUBON
P_SUBOFF
P_DBST_ON
P_DBST_OFFP_LETRQUALP_DRAFT
P_COMP_OFFP_WIDT_ON
P_WIDT_OFFP_HEIG_ON
P_HEIG_OFFP_NEWPAGE
P_KODY
JMOD_LIB
W_TISK
fNASTAV_PRNMESS
POC_RAD
qSTRANA
reS_KCS_CEL
TISK_PR2
TISK_HL
TISK_POR
TISK_KON
KTISK_NOZ
j e m s k l a d u :
MTZ-05
UCET: 112.
jemka
Druh p.:
Obj.:
Faktura :
Dod. list:
Dodavatel:
Mn.ob./d.l.
. skut.
. vadn
. skut.
. vadn
Cena/MJ
Datum
Celk. cena
eNAZEVT
VYDAL_SKL
KP_SETUP
P_COMP_OFFPCR
IP_SUBON
PODNIK
P_SUBOFF
ID_ORG
LP_LETRQUALP_BOLDON
P_BOLDOFF
P_DRAFT
DOKL_CIS
LKOD_OB
OFFIDENT_ZAK
IDENT_VYS
PERON
ZAVOD
ROFFM4_ORGAN
M1_OBR
NAZEV_ORG
99999999.999
99999999.999
99999999.999
99999999.999
99999999.999
99999999.99
99999999999
99999999.99
P_10CPI
W_SKLAD
KW_DOKLAD
VYDAL_SKL
DOKL_CIS
IIDENT
VYD_UM_SKLPLAN_MNOZ
ID_ORG
SKUT_MNOZ
VADNE_MNOZM1_IDENT
ZM1_OBR
IDENT
NAKLAD
OFFNAZEV
POPIS_OBR
TERMIN_OB
S_KCS_CEL
Cena za p
jemku celkem:
ZZZZZZZZZ
999 999 999
ZZZZZZZZZ.ZZ
999 999 999.99
Kontroloval: .........................
Datum: ...................
va vyhovuje/nevyhovuje - POV: ......................
Vystavil: .........................
Datum: ...................
P_10CPI
P_LETRQUALID_ORG
S_KCS_CEL
S_CEL
P_DRAFT
ePOC_RAD
P_10CPI
ALP_NEWPAGE
STRANA
FFFZ^D
select &st_sel
ePOC_RAD
ST_SEL
TISK_NOZ
mod_lib
jemka dosud neexistuje
et etiket :
Prob
tisk ...
c_ident
c_ident
mod41f1(!9
P_SETUP
eP_RESET
P_6LPI
P_8LPI
LP_10CPI
P_12CPI
P_16CPI
P_20CPI
P_BOLDON
LP_BOLDOFF
P_ULINEON
P_ULINEOFFP_ITALON
ZP_ITALOFF
P_SUPERON
P_SUPEROFFP_SUBON
LP_SUBOFF
FP_DBST_ON
P_DBST_OFFP_LETRQUALP_DRAFT
P_COMP_OFFP_WIDT_ON
P_WIDT_OFFP_HEIG_ON
P_HEIG_OFFP_NEWPAGE
P_KODY
OFFMOD_LIB
T_OFFMODTESTT
M1_OBR
OFFST_ZAZNAM
KOD_OB
JW_SKLAD
W_DOKLAD
fHLASKA
PRNOBRT
POC_ETIK
M1_IDENT
qST_ZAZ
eC_IDENT
IDENT
-MOD41F1
ehled dodavatel
novan
ehled objedn
Kurzovn
ehled polo
Informace o um
Informace o obratech
Zobrazen
jemky
Tisk p
jemky
ehled k
obrat
Tisk skladov
ch etiket
ehled v
voje cen
Konec
do pprg with 'zobr_organ'
do pprg with 'plan_prij'
do pprg with 'zobr_obj'
do pprg with 'zobr_kurz'
do pprg with 'zobr_pol'
do pprg with 'zobr_um'
do pprg with 'zobr_ob'
do pprg with 'zobr_dok'
do pprg with 'tisk_prij'
do pprg with 'zobr_obv'
do pprg with 'tisk_etik'
do pprg with 'zobr_cen'
deactivate popup volba
sklad
&barvau
eVOLBA
ID_ORG
LM_MENA
W_POLE4
M1_OBR
SKLAD
PROC1
LPROC2
zobr_organ
mod7_lib
plan_prij
zobr_obj
zobr_kurz
mod_proc
zobr_dok
mod_proc
zobr_pol
mod_proc
inlist(kod_pol,'M','N','T','U','X','Y','Z')
zobr_um
mod_proc
zobr_ob
mod_proc
tisk_prij
zobr_obv
mod_proc
tisk_etik
zobr_cen
mod_proc
Nespr
nastaven
pomocn
ehledu
W_TYP
eTISKS
VOLBA
ZOBR_ORGANW_ICO
W_ZAV
W_DICO
W_NAZ_ORG
MOD7_LIB
LK_HLAVA
KONTROLA
ZOBR_POROBZOBR_OBJ
ZZOBR_KURZ
W_MENA
W_DAT_K
FFW_KURZ
LMOD_PROC
FZOBR_DOK
W_SKLAD
FFW_DOKLAD
LZOBR_POL
W_IDENT
FW_NAZEV
T_OFFZOBR_UM
ZOBR_OB
FTISK_PRIJ
ZOBR_OBV
FW_KOD_OB
TISK_ETIK
ZOBR_CEN
HLASKA
_ZAZNAM
m4_pobj
objed
materi
objedn
vky nebylo nalezeno
m4_pobjd
objed
m5_plan
zakazka
m4_pobjt
objed
set color to &barva
w+/bg
ka neexistuje v souboru polo
w+/bg
set color to &barva
w+/bg
set color to &barva
w+/bg
w+/bg
w+/bg
COLORa
Vyhled
prob
podle identifikace nebo n
Hodnota :
set color to &_col
znam odpov
zadan
mu kl
i nebyl nalezen
eHMEZ
ORGANPMEZ
POLOVINA
M4_POBJ
OBJED
LW_ID_ZAK
HLASKA
M1_OBR
ROBM4_POBJD
ZM5_PLAN
ZAKAZKA
M4_POBJT
FIDENT
LM1_IDENT
FRAM7
HLAVA7
FFHELP7
STREC
FBARVA
MAT_OBJ
FFSAYRAD71
SAYRAD72
R_OBV
FPLAN_PRIJ
VOL_PP
W_REC
FSTZAZ
W_KLIC
JRKEY
W_ICO
fW_NAZEV
RNNAZEV
objedn
vky materi
W_ID_ZAK
ORGANDMEZ
zev materi
Objed.
Pl.MJ
Mno
Mno
Mno
Mno
Mno
Koeficient
Mno
.PLMJ
Mno
Identifikace
Jakostn
norma
norma
Cena obj.
ePOLOVINA
set color to &barx
eBARX
PORADI
IDENT
set color to &barx
99999999.999
99999999.999
99999999.999
9999999.999
99999999.999
999999.9999
99999999.999
99999999.999
9999999.99
eBARX
POLOVINA
NAZEV
RGANDATUM_PD
DATUM_PO
PLAN_MJ
MNO_MJ
LMNO_PO
MNO_OV
MNO_ZM
ROBMNO_ST
ZKOEF
MNO_PLMJ
MNO_KDO
FSEK_IDENT
M1_IDENT
FJAK_CSN
ROZM_CSN
FCENA_PLMJ
Konec
Aktualizace
Funkce
- Esc
- Enter
- F10
Informace o um
Specifikace po
Konec
mod_proc
w+/bg
mod_proc
ZOBR_UM
ANM4_POBJ
IDENT
MOD_PROC
BARVA
SAYRAD71
LHMEZ
SAYRAD72
ZOBR_SOBJ
MAT_OBJ
ZPORADI
ehled materi
ch objedn
penter
mod42b
Zadejte objedn
vku :
Objedn
mat_obj
mat_obj
O
ico+' '
zavod+' '
zavod
stav+' '
Dat.vys.
trans(datum_v,'@E')+' '
datum_v
KS
cislo_ks
cislo_ks
Datum KS
trans(datum_ks,'@E')+' '
datum_ks
D.odesl
trans(datum_o,'@E')+' '
datum_o
zev organizaceF
nazev_org
nazev_org
M4_OBJ
ePOLEX
PROCX
ANRBOT
CLEFT
CRIGHT
FREEZE
ORDER
LZAHL
JMENO
TITLE
ZTITLECOLORPS_LINE
_IDENT
IDENT
M_CSN
A_PLMJ
FDETAIL
F1PRG
FFF4_JM
F4PRG
FF7_JM
F7PRG
FF9KEY
F10_JM
F10PRG
DET_JM
FDETPRG
RAMECEK
JNAZEVT
fENTER
MOD_PSV
OBSAH
W_ICO
W_ZAV
ZAVOD
ANW_ICO_NAZ
NAZEV_ORG
W_ID_ZAK
MAT_OBJ
PS_RETURN
set color to b/w
set color to bg/n
set color to w+/bg
set color to b/bg,w+/rb
set color to w+/b
set color to w/n
&barvau
CISELNIK
POCET
ANDOP1
COUNT
ZAKAZNIK
POMOC
ECOLORKONTROLA
BARVA
FKONEC
IDENT
M_CSN
A_PLMJ
FFANSI
W_POLE
FW_UVN_POC
P_KONSIG
FM1_KALK
M4_POBJ
IDENT
PL_OD
FTYP_NAKL
JNOVY_Z
JMENO_C
fWJMENO_C
NRADEK_C
SLOUPEC_C
BARVAS
qBARVAR
eBARVAZ
BARVAU
-BARVAN
BARVAH
MENU_P
PORADI
-ZMENY_P
&barva
novan
Jak.norma
Rozm.norma
Identifikace
novac
Koef.
Potvrzeno
novan
(MJ)
potvrzen
n. MJ)
dodan
vadn
storno
k dod
Cena (objed.)
Cena (skut.)
Cena celkem
-
- ^End,Esc
Pohyb
Konec
99999.9999
99999999.999
99999999.999
99999999.999
99999999.999
99999999.999
99999999.999
99999999.999
99999999.999
99999999.999
9999999.99
99999999.99
99999999.99
W_POLE
eM1_IDENT
JAK_CSN
ROZM_CSN
@ 14,66 &vloz w_pole(20) pict '99999999.999'
99999999.99
@ 15,66 &vloz w_pole(21) pict '99999999.999'
colorz
/1MJ:
99999999.999
@ 17,67 &vloz w_pole(22) pict '99999999.99'
99999999.99
99999999.99
@ 19,74 &vloz w_pole(24) pict '@!X'
@ 20,63 &vloz w_pole(25) pict '@X'
_IDENT
W_POLE
Q_CENA
M_MENA
W_KOEF_MENMOBR
W_MENA
MENQ5
ECOLOR
it pr
ci beze zm
n? (a/N)
KONEC
eW_POLE4
P_KONSIG
POCET
OEF_MENI
ECOLORHOR
PROC_P
FZMEN_P
FNOVY_Z
K_UDAJU
FFOK_C
Dodan
t kladn
nesm
Cena p
jmu je povinn
Sklad se li
od hlavn
ho skladu, ulo
it? (a/N)
Skl. um
se li
od hlavn
ho skladov
ho um
, ulo
it? (a/N)
mod52g
eW_POLE
HLASKA
M1_IDENT
KOD_POL
P_KONSIG
M1_ZAS
MENID_ORG
SKL_HLAVNIW_SKLAD
MENOKALK
OLORSKL_HL_UM
W_IDENT
FW_SKUT_MN
W_PLAN_MN
W_VADNE_MNW_CENA_MJ
W_POPIS_O
LOCK_ZAS
FINDIK
LOCK_KALK
LOCK_OBJ
VYP_PR
FM1_UM
ZASOBA
FPRIJEM
DATUM_PRIJZAPIS_OBR
M4_POBJ
FMNO_OV
MNO_ZM
JMNO_KDO
M4_POBJD
fMAT_OBJ
NPORADI
MNO_DOD
MNO_ZBYT
MNO_MJ
qM5_PLAN
eZAKAZKA
-MNO_PL
ZRUS_DNP
FMOD52G
KONTROLA
M5_AKT.DBF2
M5_AKT
ident
m5_akt
ident
m5_akt
select &sel
X_IDENT
eX_DS
M5_AKT
NIDENT
ZAVRI
DUVOD
ada p
jemek:
@!R XXX
ada neexistuje, nave
te cel
prvn
slo t
slo p
jemky:
@!R XXXXXX
ada neexistuje, nave
te cel
prvn
slo t
slo p
jemky:
000000
@!R XXXXXX
slo p
jemky mus
t vypln
Bylo p
ady, zadejte znovu!
slo p
jemky mus
t numerick
eDL_CIS
DL_RAD
W_NASEL
NW_COBJ
W_RAD
_DELKA
MOD42B
W_SKLAD
ENDOKL_CIS
M1_OBR_A
I_TXT
HLASKA
MEN_L
OLOR_CIS
M1_OBR
FW_COBJ1
_KONEC
_KONDEL
MN_CHYBA
Pohyb
jemky
Funkce
Konec
<Enter>
- ^PgDn
- F10
- Esc,^End
Pohyb
jemky
Funkce
Konec
<Enter>
- ^PgDn
- F10
- Esc,^End
M_MENA
colora
set color to &col
CMESS
FFFZ^D
ordera
Zadejte
ady doklad
sklad<
sklad<
ada doklad
neexistuje, nave
te cel
ada doklad
neexistuje, nave
te cel
000000FF
set order to &st_order
select &st_sel
W_SKLAD
eW_CIS_DOK
W_KODOB
W_RADEK
NW_SLOUPEC
ST_SEL
ST_ORD
ST_ZAZ
M1_OBR
ENST_ORDER
W_DELKA
IHLASKA
SKLAD
M1_OBR_A
DEL_R
VYDAL_SKL
DOKL_CIS
KOD_OB
DEL_ZBYT
POM_CIS
w_doklad
mod_proc
w_kod_ob
mod_proc
w_mena
mod7_pok
w_dat_k
mod_proc
w_ident
mod_proc
inlist(kod_pol,'M','N','T','U','X','Y','Z')
w_skut_mn
w_plan_mn
w_vadne_mn
mod_proc
mod_proc
w_ico
w_zav
mod7_lib
Pro toto pole neexistuje pomocn
ehled hodnot
P_ZOB
eZOBR_OB
W_IDENT
MOD_PROC
NZOBR_OBV
W_KOD_OB
ZOBR_MENY
W_MENA
MOD7_POK
NZOBR_KURZ
W_DAT_K
IW_KURZ
ZOBR_POL
W_NAZEV
ZOBR_UM
ZOBR_ORGANW_ICO
W_ZAV
W_DICO
W_NAZ_ORG
MOD7_LIB
HLASKA
q&si = pocet2
q&si = 0
W_POLE4
P_KONSIG
NW_CENA_MJ
POCET2
R_MENY
MOD42B
HLAV1
HLAV2
_ _ M
PROC1
_ _ _
PROC2
_ _
ZMEN1
_ _ _
ZMEN2
_ _
ZMENY
_ _ _
HLASKA
_ _ j9
K_HLAVA
K_OBRATU
VYP_PR
ZAPIS_OBR
LOCK_ZAS
LOCK_KALK
LOCK_OBJ
TISK_PRIJ
TISK_PR2
TISK_HL
_ ek
TISK_POR
TISK_KON
TISK_NOZ
_ _ _
TISK_ETIK
VOLBA
_ _
_ _ _y
ZOBR_POROB
HLAVA7
SAYRAD71
SAYRAD72
HELP7
_ _ _
VOL_PP
ZOBR_OBJ
PENTER
_ _ Z
PLAN_PRIJ
PORADI
MENU_P
PROC_P
ZMEN_P
ZMENY_P
K_UDAJU
ZAPIS_AKT
CISRADY
^Canc
CIS_RADY
NAP_HOD
NASTAV_Q2
X:\OBEC\04\
MOD42B.FXP
X:\OBEC\04\MOD42B.PRG