w_modulf
MATERIAL
W_MODUL
inMOD48FX
m1_obr
ident
m1_obr_a
ident
m1_ident
ident
v4_sklad
x4_sklad
m2_por
ident
m2_hlava
objednavka
Zadejte sklad : 
           od : 
           do : 
Sklad neexistuje
mod_proc
MATERIAL
Nepovolen
 druh skladu
VYROBA
Nepovolen
 druh skladu
EXPEDICE
Nepovolen
 druh skladu
Nejedn
 se o konsigna
 sklad
Chybn
 zadan
 obdob
c1_obr
  Prob
r obrat
 ...       
c1_obr
  Prob
r arch. obrat
 ...  
c1_obr
Entnahme von Konsi-Lager Nr. F
, von 
 bis 
RIIS 4.8
mod48f
Ident.odb
ratele
ident_odb
ident_odb
Identifikace
ident
ident
Datum
tran(termin_ob,'@E')
termin_ob
kod_ob
kod_ob
  Skut.mno
str(skut_mnoz,12,3)
skut_mnoz
      Z
str(zasoba,12,3)
zasoba
vyd_um_skl
vyd_um_skl
stred_obr
stred_obr
ident_zak
ident_zak
Obj.z
iif(m1_ident.ident_odb=space(20),left(m2_hlava.text,20),m1_ident.ident_odb)
iif(m1_ident.ident_odb=space(20),left(m2_hlava.text,20),m1_ident.ident_odb)
M1_OBR
inIDENT
 ;M1_OBR_A
dM1_IDENT
nV4_SKLAD
bX4_SKLAD
bM2_POR
   M2_HLAVA
 OBJEDNAVKAPOL_ARR
ydM_SKLAD
 streW_DO
 idenHLASKA
lZOBR_SKL
 MOD_PROC
W_MODUL
_oDRUH_SKL
,KONSIG
tW_TYP_SKL
C1_OBR
dTERMIN_OB
KOD_OB
_odIDENT_ODB
SKUT_MNOZ
ZASOBA
, mVYDAL_SKL
VYD_UM_SKLSTRED_OBR
IDENT_ZAK
DOKL_CIS
POCET
a.stPOCETC
 w_PROCENTA
_PRIJAL_SKLW_ID_ZAK
POLEX
FREEZE
  *LEVA
PRAVA
ct cHOR
setDOL
tion tRAMECEK
akNAZEVT
_idRIIS
reNADPIS
o lPROCX
nt_zF1
) into F2
lava adF3
go top
 ------F6
-------F9
-------ZAHL
-----JMENO
----HODN
frMOD_PSV
lOBSAH
POCET
inPOCETC
 ;POC
colora
set color to &color
inCOLOR
 ;ST_I
bMOD48FX
PROCENTA
HLASKA
X:\OBEC\04\
MOD48F.FXP
X:\OBEC\04\MOD48F.PRG