home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
06
/
06232.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1999-01-15
|
4KB
|
109 lines
m_param
v1_str
x1_str
RIIS 5.1
M_PARAM
0)W_DILNA_KODILNA_KOOPV1_STR
zobX1_STR
lavANSI
*TITLW_DOP
rtMOD_SYS
MOD52BX
RIIS 5.1
Operace v
hledov
ho pl
nu, d
lna operace
06232
Zadejte pracovi
m5_plan
zakazka
m5_oper
zakazka
m1_ident
ident
zakazka
zakazka
Postup
postup
postup
zev oper.
nazev_op
nazev_op
K v
str(mno_kv,12,3)
mno_kv
str(mno_pl,12,3)
mno_pl
Mno
. odv.
iif(mno_ov=0,space(12),str(mno_ov,12,3))
mno_ov
. zmet.
iif(mno_zm=0,space(12),str(mno_zm,12,3))
mno_zm
Uvoln
' '+trans(m5_plan.ter_uv,'@E')
m5_plan.ter_uv
Odv
' '+trans(m5_plan.ter_ov,'@E')
m5_plan.ter_ov
ident
ident
m1_ident.nazev
m1_ident.nazev
m1_ident.kod_pol
m1_ident.kod_pol
ptr+' '
TAC
str(tac,10,4)
str(tbc,4,0)
edpis
predpis
predpis
' '+dop
Prac.
POLEX
0)RIIS
NA_KOOBSAHX
OOPFREEZE
zobRAMECEK
avRTOP
*TITLRBOT
rtCLEFT
CRIGHT
2NAZEVT
W_DOP
ightPROCX
nazF1
' OperaF2
hledovF3
nu, F4
a operaF6
+w_dop F9
F9KEY
laviM5_PLAN
x=ZAKAZKA
M5_OPER
naM1_IDENT
uIDENT
navrCPOL
ceZAHL
aJMENO
HODN
I
ocedMOD_PSV
0)OBR
NA_KO
POCET
0)POCETC
_KOPOC
zobMOD52BX
HLASKA
(i)=6
PROCENTA
X:\OBEC\06\
06232.FXP
X:\OBEC\06\06232.PRG