home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
02
/
MOD22B.FXP
(
.txt
)
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
NeXTSTEP
RISC OS
UTF-8
Wrap
MS Visual FoxPro App
|
1999-04-15
|
64.3 KB
|
1,833 lines
w_faktf
w_Dlradyf
m_param
m2_hlava
objednavka
m2_por
objednavka
m2_dod
objednavka
m2_pozak
objednavka
m2_zcen
objednavka
m2_pfakt
objednavka
m2_hfakt
faktura
e h l e d o b j e d n
v e k
m2_tobj
objednavka
m1_pozid
x1_pozid
a2_hlava
objednavka
a2_por
objednavka
a2_dod
objednavka
a2_pozak
objednavka
a2_zcen
objednavka
a2_pfakt
objednavka
a2_hfakt
faktura
e h l e d archivu o b j e d n
v e k
a2_tobj
objednavka
a1_pozid
ident
m4_organ
m1_ident
ident
m4_adr
vyb_er
vyb_er1
RIIS 2.2
Funkce
Qfunkce
Detail
por_obj
mod22b
Objedn
hlava.objednavka
hlava.objednavka
'/'+hlava.rok_obj+' '
hlava.rok_obj
substr(zakaznik.nazev_org,1,25)
zakaznik.nazev_org
hlava.ico
hlava.ico
hlava.zavod
hlava.zavod
slo obj.z
hlava.obj_zak
hlava.obj_zak
zakaznik.cislo_int
zakaznik.cislo_int
' '+hlava.stav_obj
hlava.stav_obj
hlava.typ_odb_ob+' '
hlava.typ_odb_ob
Dat.vyst.
tran(hlava.dat_vyst,'@E')
hlava.dat_vyst
Dat.p
tran(hlava.dat_prij,'@E')
hlava.dat_prij
slo KS
hlava.cislo_hs
hlava.cislo_hs
Datum KS
tran(hlava.dat_hs,'@E')
hlava.dat_hs
substr(hlava.text,1,36)
hlava.text
Autor
hlava.autor
hlava.autor
Aktual
hlava.Aktual
hlava.Aktual
Dat.akt
tran(hlava.dat_akt,'@E')
hlava.dat_akt
Dopravn
dispozice (1)
LEFT(hlava.dop_disp,50)
hlava.dop_disp
Dopravn
dispozice (2)
RIGHT(hlava.dop_disp,50)
hlava.dop_disp
FPOLEX
PROCX
ALRBOT
CLEFT
CRIGHT
FREEZE
NAORDER
NAHOR
KULEVA
PRAVA
NADPIS
LZAHL
JMENO
AHODN
RTITLE
STITLECOLORPOC0
KTPLKALF2
NACIZ
UALF6
AC_NAKLF9
A_CISTAF10
_HRUBAF0PRG
F1PRG
_F4_JM
F4PRG
NAKLTISKPRG
F7_JM
TAF7PRG
UBAF9PRG
SKUF9KEY
F9KEY1
_F10_JM
RNF10PRG
_RAMECEK
ALRIIS
_NAZEVT
AKLKLICO
KLNAZ
SPACEBAR
_TR_HL1
STATR_HL2
_TR_HL3
UBATR_HL4
_TR_HL5
SKUTR_HL6
TR_HL7
TR_HL8
LTR_HL9
_ DET_JM
ENTER
RDETAIL
DETPRG
PS_LINE
PS_RETURN
PS_ZAZN
W_FAKT
W_DLRADY
M_PARAM
MMENACIZ
POLE2
HLTXTOBJ
_AKTPOJZAK
M2_HLAVA
_OBJEDNAVKAHLAVA
M2_POR
EDNAVKAM2_DOD
DODAVKY
KAM2_POZAK
TEXTY
AVKAM2_ZCEN
CENIK
AVKAM2_PFAKT
EFAKTPOR
KAM2_HFAKT
FAKTURA
_FAKTHLA
_ M2_TOBJ
HLTEXT
VKAID_ORG
_M1_POZID
X1_POZID
_A2_HLAVA
A2_POR
VKAA2_DOD
VKAA2_POZAK
AA2_ZCEN
KAA2_PFAKT
AA2_HFAKT
AA2_TOBJ
A1_POZID
AIDENT
_M4_ORGAN
_ZAKAZNIK
M1_IDENT
M4_ADR
_ ROK
ZAVOD
MOD_PSV
FFFF$m
COLORa
Vyhled
Zadejte
slo OBJEDN
VKY + ROK :
@R /99
set color to &_col
set color to &_col
znam nebyl nalezen !
set color to &_col
FHLAVA
ALCISLO
PS_RETURN
NATYP
NAHLASKA
COLORa
Vyhled
Zadejte
slo OBJEDN
VKY :
set color to &_col
set color to &_col
znam nebyl nalezen !
set color to &_col
FHLAVA
CISLO
ALRKEY
PS_RETURN
HLASKA
colora
FHCOLOR
c2_pobj+
c2_pobj
znam!
O B J E D N
V K A
I
vod:
Adresa HL:
.obj. z
Dat.vyst.:
Dat.p
Text:
Dop.disp.: F
F
c2_tobj+
c2_tobj
tr_hl&w = 'Text obj.: ' + text_tx
tr_hl&w = ' ' + text_tx
RIIS 2.2
RIIS 2.2
Expedi
ehled po
cenicek
dodavky
textik
mod22b
str(c2_pobj.poradi,3)
c2_pobj.poradi
Identifikace
c2_pobj.ident
c2_pobj.ident
c2_pobj.typ_por
c2_pobj.typ_por
c2_pobj.stav_por
c2_pobj.stav_por
m1_ident.nazev
m1_ident.nazev
m1_ident.typ
m1_ident.typ
slo v
kresu
Extern
identifikace
m1_ident.ident_odb
m1_ident.ident_odb
str(c2_pobj.ks_pozad,10,3)
c2_pobj.ks_pozad
Term.po
tran(c2_pobj.ter_poz,'@E')
c2_pobj.ter_poz
RT-po
' ' +c2_pobj.ter_poz_tt + ' '
c2_pobj.ter_poz_tt
.pot.
str(c2_pobj.ks_potvrz,10,3)
c2_pobj.ks_potvrz
Term.pot
tran(c2_pobj.ter_ov,'@E')
c2_pobj.ter_ov
RT-pot
' ' +c2_pobj.ter_ov_tt + ' '
c2_pobj.ter_ov_tt
Cena/MJC
str(c2_pobj.cena,12,2)
c2_pobj.cena
Da
str(c2_pobj.dan,10,2)
c2_pobj.dan
.dod.
str(c2_pobj.ks_dodane,10,3)
c2_pobj.ks_dodane
Dat.akt.
tran(c2_pobj.datum_akt,'@E')
c2_pobj.datum_akt
Cena hrub
str(c2_pobj.cena_z,13,2)
c2_pobj.cena_z
' '+str(c2_pobj.proc_pri,6,2)+' '
c2_pobj.proc_pri
FMOD_SYS
PS_LINE
ALHLAVA
CISLO
OBJEDNAVKAROK
ETURN
ROK_OBJ
C2_POBJ
PORADI
KAOBJEDNAV
TEXTY
KATYP_POR
IDENT
ATEXT_TX
RHLASKA
SPS_RETURN
M1_IDENT
FPOLEX
PROCX
LKALRTOP
CLEFT
UALCRIGHT
BFFREEZE
AKLORDER
ISTAHOR
_HRUBADOL
PRAVA
_NADPIS
ZAHL
NAKLJMENO
TASOUC
UBATITLE
SKUTITLECOLORPOC0
AKLF6
CEBAR
STAF0PRG
_F1ON
UBAF1PRG
_F4_JM
SKUF4PRG
TISKPRG
F7_JM
LF7PRG
_ F9PRG
F9KEY
RF9KEY1
F10_JM
F10PRG
RAMECEK
NAZEVT
KLICO
KLNAZ
SPACEBAR
TR_HL1
TR_HL2
_TR_HL3
TR_HL4
_TR_HL5
VKATR_HL6
TR_HL7
_ TR_HL8
VKATR_HL9
DET_JM
KAENTER
DETAIL
VKADETPRG
PS_ZAZN
W_DLRADY
AZAKAZNIK
ANAZEV_ORG
_ZAVOD
_ M4_ADR
ULICE
VKAPSC
_MESTO
OBJ_ZAK
_DAT_VYST
DAT_PRIJ
ATEXT
VKADOP_DISP
AHLTXTOBJ
AHLTEXT
AC2_TOBJ
POZID
AID_ORG
AMOD_PSV
c2_pobj+
m7_kurz
aktual
c2_pobj
Storno po
Expedov
c2_pobj
c2_pobj
znam!
RIIS 2.2
cenicek
dodavky
textik
mod22b
DETAIL OBJEDN
danka zpracov
TPV na zak
EXPEDI
KAZ
vod:
Adresa :
Adresa :
.obj.z
Dat.vyst:
Dat.p
Text:
as tisku:
Text o:
Text objedn
vky:
Text:
Dop.disp.: F
F
Text obj.:
Text obj.:
c2_tobj+
c2_tobj
tr_hl&w = qT + c2_tobj.text_tx
RIIS 2.2
vyp_okno
ZadanKa
Technicko-v
specifikace:
str(c2_pobj.poradi,3)
c2_pobj.poradi
IDENTIFIKACE
c2_pobj.ident
c2_pobj.ident
c2_pobj.typ_por
c2_pobj.typ_por
c2_pobj.stav_por
c2_pobj.stav_por
m1_ident.nazev
m1_ident.nazev
SEK.IDENT.
m1_ident.sek_ident
m1_ident.sek_ident
m1_ident.typ
m1_ident.typ
SLO V
KRESU
EXTERN
IDENTIFIKACE
m1_ident.ident_odb
m1_ident.ident_odb
.POTVR.
str(c2_pobj.ks_potvrz,10,3)
c2_pobj.ks_potvrz
DAT.POTVR.
tran(c2_pobj.ter_ov,'@E')
c2_pobj.ter_ov_por
CENA CELK.K
str(c2_pobj.cena,12,2)
c2_pobj.cena
FMOD_SYS
HLAVA
ALCISLO
OBJEDNAVKAROK
DNAVKAROK_OBJ
NAID_ORG
C2_POBJ
M7_KURZ
KAAKTUAL
STAV_POR
AIDENT
KS_POTVRZ
KS_DODANE
CENIK
PORADI
KAW_KOEF_MENMENA
FNAKUP
ENMNOZ
ALCENA
TYP_POR
KATXT
HLASKA
BFPS_RETURN
OBJEDNAV
ATEXTY
KATEXT_TX
M1_IDENT
POLEX
_PROCX
RTOP
NAKLRBOT
CLEFT
TACRIGHT
UBAFREEZE
SKUORDER
OLORHOR
RNLEVA
_PRAVA
ALNADPIS
_ZAHL
AKLJMENO
_TITLE
STATITLECOLORPOC0
UBAF0
SKUF2
_ F7
F0PRG
F1PRG
F4_JM
F4PRG
TISKPRG
F7_JM
F7PRG
F9PRG
F9KEY
_F9KEY1
F10_JM
_F10PRG
VKARAMECEK
_ NAZEVT
VKAKLICO
KLNAZ
KASPACEBAR
TR_HL1
VKATR_HL2
TR_HL3
TR_HL4
ATR_HL5
ATR_HL6
TR_HL7
_TR_HL8
_ TR_HL9
DET_JM
VKAENTER
_DETAIL
DETPRG
_PS_LINE
PS_ZAZN
ZAKAZNIK
ANAZEV_ORG
AZAVOD
AM4_ADR
AULICE
KAPSC
AMESTO
_OBJ_ZAK
ADAT_VYST
_DAT_PRIJ
DOP_DISP
HLTXTOBJ
HLTEXT
C2_TOBJ
MOD_PSV
M1_POZID
FC2_POBJ
IDENT
TEXT_TX
LTYP_TX
Tisk
danek na po
Tisk p
ehledu
Konec
mod_psv
ZEV
SLO V
KRESU
KUSY
DAT.POTVR.
CENA CELK.K
Tech-v
r.specif.:
Obchodn
specif.:
mod_lib
mod_lib
Prob
tisk ...
british
POZID
_POBJ
W_TISK
LINDIK
CIDENT
ANCELKPOR
APS_RETURN
NAMOD_PSV
KAIDENT
AC2_POBJ
ODANE
PORADI
M1_IDENT
ANAZEV
_MENIDENT_ODB
KS_POTVRZ
TER_OV
ALCENA
M1_POZID
ATEXT_TX
TYP_TX
BFTEXTY
OBJEDNAVKAP_SETUP
KAP_RESET
P_6LPI
P_8LPI
_P_10CPI
P_12CPI
KLP_16CPI
P_20CPI
TAP_BOLDON
AP_BOLDOFF
P_ULINEON
P_ULINEOFFP_ITALON
NP_ITALOFF
P_SUPERON
P_SUPEROFFP_SUBON
KLP_SUBOFF
P_DBST_ON
P_DBST_OFFP_LETRQUALP_DRAFT
ORP_COMP_OFFP_WIDT_ON
P_WIDT_OFFP_HEIG_ON
P_HEIG_OFFP_NEWPAGE
P_KODY
_ MOD_LIB
NASTAV_PRNMESS
BRITISH
Prob
r faktur a dodac
ch list
...
faktpor
fakthla
znam!
RIIS 2.2
Faktury/DL pro objedn
Vystaven
faktury/DL na po
objedn
slo objedn
vky z
ka: F
mod22b
.Obj.
str(c2w.poradi,3)+' '
s.Fak./DL
c2w.faktura
Fakt.mno
str(c2w.ks_faktur,10,3)
Cena/1ks
str(c2w.cena_j,10,2)
% DPH
str(c2w.dan,5,2)
Cena/Celkem
str(c2w.ks_faktur*c2w.cena_j,12,2)
/Celkem
str(c2w.ks_faktur*c2w.cena_j*c2w.dan/100,10,2)
FMESS
HLAVA
L_KLIC
OBJEDNAVKAROK_OBJ
AM_KLIC
W_DLRADY
A_POBJ
_PROK
AVKAFAKTPOR
KAFAKTHLA
FAKTURA
KAKS_FAKTUR
PORADI
HLASKA
APS_RETURN
POLEX
PROCX
ALRBOT
CLEFT
ACRIGHT
FREEZE
BFORDER
DNAVKADOL
KALEVA
PRAVA
NADPIS
_ZAHL
JMENO
KLHODN
TATITLE
ATITLECOLORPOC0
LINEOFFF1
TALON
TALOFF
UPERON
UPEROFFF6
UBOFF
BST_ON
ST_OFFF0PRG
QUALF1ON
ORF1PRG
_OFFF4_JM
F4PRG
_OFFTISKPRG
F7_JM
_OFFF7PRG
F9PRG
_ F9KEY
F9KEY1
PRNF10_JM
F10PRG
RAMECEK
NAZEVT
KLICO
KLNAZ
SPACEBAR
TR_HL1
TR_HL2
TR_HL3
_TR_HL4
TR_HL5
_TR_HL6
VKATR_HL7
TR_HL8
_ TR_HL9
VKADET_JM
ENTER
KADETAIL
DETPRG
VKAPS_LINE
PS_ZAZN
ZAKAZNIK
ANAZEV_ORG
OBJ_ZAK
_MOD_PSV
c2_c+
znam!
RIIS 2.2
FMOD_SYS
MALIAS
ZAZN1
LPS_LINE
CISLO
AVKAOBJEDNAVKAROK
ROK_OBJ
PORADI
VKACENIK
KAC2_C
KAHLASKA
PS_RETURN
ZPRAC_NAKLMIRA_ZISKUCENA_DAN
CENA_CELK
HOD_DAN
ALPROC
robku
Dat.akt:
MJ pro cenu:
Koef.p
Zpr.n
ra zisku: %
Zisk:
Cena
skup:
ka/skup:
Cena hrub
ka/MJ cen:
Cena/MJ cen:
Autor:
Hodnota dan
/MJ cen:
Cena+da
/MJ cen:
MMENACIZ
9999.999
9999999.999
9999999.999
99999.99
9999999.999
9999999.999
999.999
9999999.999
999999
999.999
999999
999.999
999999
999.999
999999
999.999
999999
999.999
999.999
9999999999.999
9999999999.999
99.99
9999999999.999
9999999999.999
9999999999.999
PLATI_OD
FDAT_AKTUALMJ_CENOVA
PREP_MJ
LZPRAC_NAKLUVN
AVKAMIRA_ZISKUZISK
CENA_CISTACEN_SKUP
PRIR_SKUP
CENA_HRUBAMNOZ1
PRIR1
KAMNOZ2
PRIR2
MNOZ3
PRIR3
MNOZ4
NAKLPRIR4
ISKUMNOZ5
PRIR5
ALPRIR_RADA
HOD_PR_RADCENA_CELK
BFMMENACIZ
NAVKAAUTOR
KAHOD_DAN
CENA_DAN
- Esc, ^End
Konec
c2_d+
znam!
RIIS 2.2
ehled dod
mod22b
.potv.
str(dod.kusy,10,3)
dod.kusy
Term.OV
tran(dod.ter_ov,'@E')
dod.ter_ov
den-OV
' '+dod.ter_ov_tt
dod.ter_ov_tt
RIIS 2.2
FMOD_SYS
ALMALIAS
ZAZN1
LCISLO
NAKLOBJEDNAVKAROK
_ZISKUROK_OBJ
_CISTAPORADI
DODAVKY
BADOD
KAX2_D
KAHLASKA
PS_RETURN
PS_LINE
POLEX
NAKLPROCX
ISKURTOP
CLEFT
ALCRIGHT
FREEZE
RADORDER
BFDOL
NAVKAPRAVA
KANADPIS
JMENO
SOUC
KLTITLE
TITLECOLORPOC0
LECOLORF1
LINEOFFF3
TALON
TALOFF
UPERON
UPEROFFF9
KLF10
F0PRG
T_OFFF1PRG
QUALF4_JM
ORF4PRG
_OFFTISKPRG
F7_JM
_OFFF7PRG
F9PRG
_OFFF9KEY
F9KEY1
_ F10_JM
F10PRG
PRNRAMECEK
NAZEVT
KLICO
KLNAZ
SPACEBAR
TR_HL1
TR_HL2
TR_HL3
TR_HL4
TR_HL5
_TR_HL6
TR_HL7
_TR_HL8
VKATR_HL9
DET_JM
_ ENTER
VKADETAIL
DETPRG
KAPS_ZAZN
KAMOD_PSV
cursorz
RIIS 2.2
c2_t+
znam!
ehled obchodn
specifikace
text_tx
rad_tx
,b/w,,,,w+/rb
set cursor &cCursor
LZMENATXT
D_SYS
ALPOM_OBR
CALIAS
LNHOR
NAKLNLEVY
AVKANDOL
ZISKUNPRAVY
CISTAVYSKOC
OBR_TYP
JMENO_C
BAWJMENO_C
ARADEK_C
KASLOUPEC_C
CCURSOR
LJENPROHL
LJEMENU
MOD_SYS
PS_LINE
KUCISLO
OBJEDNAVKAROK
ALROK_OBJ
RADPORADI
TEXTY
BFC2_T
KAX2_T
KATXT
HLASKA
MOD_TXT
znam!
Vystaven
faktury a DL na objedn
ehled saldokonta pro odb
ratele I
O = F
ehled saldokonta pro dodavatele I
O = F
ehled po
pro v
echny objedn
ehled nedodan
ch po
; tisk expedi
kazu
ehled nedodan
ch po
pro v
echny objedn
ehl.nedod.po
r; tisk expedi
kazu
ehled nedodan
ch po
pro vybran
objedn
Detail objedn
danka zpracov
TPV na zak
Expedi
Text objedn
Konec
do Volba1
do Volba2
do Volba3
do Volba4
do Volba5
do Volba6
do Volba7
do volba9
_AOBR
M_AOBR
ALM_AL
NAKLHLASKA
VKAPS_LINE
KUFILT
MPROMPT1
AOBJEDNAVKAW_DLRADY
ROK_OBJ
BAMPROMPT2
KAZAVOD
MPROMPT3
MPROMPT4
ID_ORG
MPROMPT5
MPROMPT6
UMPROMPT7
A_ZAZ2
AVOLBA
ALHLTXTOBJ
PS_RETURN
VOLBA
_AOBR
ALFAKTURY
Ve Va
organizaci nen
ito !
Saldokonto odb
ratel
nelze v archivu prohl
et !
VOLBA
_AOBR
ALTYP
W_FAKT
LHLASKA
AKLSALDO_ODB
Ve Va
organizaci nen
ito !
Saldokonto dodavatel
nelze v archivu prohl
et !
VOLBA
_AOBR
ALTYP
W_FAKT
LHLASKA
AKLSALDO_DOD
Ve Va
organizaci nen
ito !
VOLBA
_AOBR
ALW_FAKT
HLASKA
LVSEPOR
VOLBA
_AOBR
ALNEDOD
VOLBA
_AOBR
ALEXPR
VOLBA
_AOBR
ALHLATEXT
VOLBA
M_EXIT
if ! file ( '&f_adr\data\M7_faodb.dbf' )
Nebylo nalezeno saldokonto odb
ratel
datez
c2_fak
m7_faodb
c2_fak
znam !
ehled odb
ratelsk
ho saldokonta pro I
HLASKA
MALIAS
ALMKL
LMZAP
AKLMICO
KUMDATE
VKAICO
ZAVOD
BAMOD_SYS
AC2_FAK
KACIS_FAK
DAT_ODES
CAST_CEL
ZAP_CEL
K_UHRADE
DAT_PRI
UDAT_SPL
ACIS_OBJ
AM7_FAODB
PS_RETURN
SALDICKA
if ! file ( '&f_adr\data\m7_fadod.dbf' )
Nebylo nalezeno saldokonto dodavatel
datez
c2_fak
m7_fadod
c2_fak
znam !
ehled dodavatelsk
ho saldokonta pro I
HLASKA
MALIAS
ALMKL
LMZAP
AKLMICO
KUMDATE
VKAICO
ZAVOD
BAMOD_SYS
AC2_FAK
KACIS_FAK
DAT_ODES
CAST_CEL
ZAP_CEL
K_UHRADE
DAT_PRI
UDAT_SPL
ACIS_OBJ
AM7_FADOD
PS_RETURN
SALDICKA
c2_fak
** Celkem K
RIIS 2.2
RIIS 2.2
mod22b
s.faktury
cis_fak
Fakturov
str(CAST_CEL,12,2)
Zapl. celkem
str(ZAP_CEL,12,2)
uhradit
str(k_uhrade,13,2)
Dat.spl.
dat_spl
Dat.odes.
dat_odes
Dat.p
dat_pri
Objedn
cis_obj
QTEXT
CAST_CEL
LZAP_CEL
K_UHRADE
LMCEL
AKLMZAP
KUCIS_FAK
POLEX
APROCX
VKARTOP
BACLEFT
ACRIGHT
KAFREEZE
ORDER
PRAVA
UNADPIS
AZAHL
AJMENO
LHODN
TITLE
TITLECOLORPOC0
ECOLORF0PRG
AF1ON
COLORF1PRG
F4_JM
EOFFF4PRG
NTISKPRG
F7_JM
F7PRG
ROFFF9PRG
KLF9KEY
F9KEY1
F10_JM
OFFF10PRG
UALRAMECEK
ORRIIS
_OFFNAZEVT
KLICO
_OFFKLNAZ
SPACEBAR
FTR_HL1
TR_HL2
_ TR_HL3
TR_HL4
PRNTR_HL5
TR_HL6
TR_HL7
TR_HL8
TR_HL9
DET_JM
ENTER
DETAIL
DETPRG
PS_LINE
PS_RETURN
PS_ZAZN
_MOD_PSV
KAMALIAS
MDATE
hlava,
znam!
E H L E D po
vybran
ch objedn
E H L E D po
ech objedn
RIIS 2.2
RIIS 2.2
Funkce
funkceW
Zadejte
slo OBJEDN
|.........
mod22b
Objedn
Po.objednavka
Po.objednavka
'/'+ Po.rok_obj
Po.rok_obj
str(Po.poradi,3)
Po.poradi
Po.typ_por
Po.typ_por
Po.stav_por
Po.stav_por
Identifikace
IIF (typ_por = 'N', left(texty.text_tx,12), Po.ident)
IIF (typ_por = 'N', left(texty.text_tx,12), Po.ident)
' ' + m1_ident.kod_pol + ' '
m1_ident.kod_pol
m1_ident.nazev
m1_ident.nazev
m1_ident.typ
m1_ident.typ
slo v
kresu
Extern
identifikace
m1_ident.ident_odb
m1_ident.ident_odb
Rozm.
m1_ident.rozm_csn
m1_ident.rozm_csn
str(Po.ks_pozad,10,3)
Po.ks_pozad
Term.po
tran(Po.ter_poz,'@E')
Po.ter_poz
RT-po
' ' +Po.ter_poz_tt + ' '
Po.ter_poz_tt
.pot.
str(Po.ks_potvrz,10,3)
Po.ks_potvrz
Term.pot
tran(Po.ter_ov,'@E')
Po.ter_ov
RT-pot
' ' +Po.ter_ov_tt + ' '
Po.ter_ov_tt
.dod.
str(Po.ks_dodane,10,3)
Po.ks_dodane
Vyrobit
str(Po.ks_potvrz- Po.ks_dodane,10,3)
Po.ks_potvrz- Po.ks_dodane
Cena/MJC
str(Po.cena,13,2)
Po.cena
Da
str(Po.dan,13,2)
Po.dan
Po.ico_urceni
Po.ico_urceni
Po.zav_urceni
Po.zav_urceni
zakaznik.nazev_org
zakaznik.nazev_org
slo obj.z
hlava.obj_zak
hlava.obj_zak
Dat.akt.
tran(po.datum_akt,'@E')
po.datum_akt
Cena hrub
str(po.cena_z,13,2)
po.cena_z
str(po.proc_pri,6,2)
po.proc_pri
MOD_SYS
LZAZN
HRADE
LOBJEDNAVKAROK_OBJ
PORADI
KUTEXTY
IDENT
AM1_IDENT
AICO_URCENIZAV_URCENIZAKAZNIK
AHLAVA
KATXT
HLASKA
PS_RETURN
POLEX
PROCX
URBOT
ACLEFT
ACRIGHT
LFREEZE
ORDER
ECOLORLEVA
PRAVA
KANADPIS
KAZAHL
JMENO
TITLE
KLTITLECOLORPOC0
COLORF0
COLORF2
EOFFF4
ROFFF10
KLF0PRG
F1PRG
OFFF4_JM
UALF4PRG
ORTISKPRG
FFF7_JM
F7PRG
_OFFF9PRG
F9KEY
FF9KEY1
F10_JM
_ F10PRG
RAMECEK
RNRIIS
NAZEVT
KLICO
KLNAZ
SPACEBAR
TR_HL1
TR_HL2
TR_HL3
TR_HL4
TR_HL5
TR_HL6
TR_HL7
TR_HL8
_TR_HL9
KADET_JM
ENTER
_ DETAIL
VKADETPRG
PS_LINE
KAPS_ZAZN
KAW_DLRADY
ID_ORG
AMOD_PSV
ZAVOD
_N"
Prob
prava dat ...
copy to c_sql fields objednavka, rok_obj for &filt
c_sql
znam!
hlava,
TiskPor
Exp.Ks
zme_kusy
E H L E D nedodan
ch po
vybran
ch objedn
E H L E D nedodan
ch po
ech objedn
RIIS 2.2
RIIS 2.2
Funkce
funkceW
Zadejte
slo OBJEDN
|.........
mod22b
Objedn
Por1.objednavka
Por1.objednavka
'/'+ Por1.rok_obj
Por1.rok_obj
str(Por1.poradi,3)
Por1.poradi
Identifikace
IIF (typ_por = 'N', left(texty.text_tx,12), Por1.ident)
IIF (typ_por = 'N', left(texty.text_tx,12), Por1.ident)
IIF (typ_por = 'N', substr(texty.text_tx,13,25), m1_ident.nazev)
IIF (typ_por = 'N', substr(texty.text_tx,13,25), m1_ident.nazev)
Vyrobit
str(Por1.ks_potvrz- Por1.ks_dodane,10,3)
Por1.ks_potvrz- Por1.ks_dodane
Expedovat
str(Por1.exped,10,3)
Por1.exped
.pot.
str(Por1.ks_potvrz,10,3)
Por1.ks_potvrz
Term.pot
tran(Por1.ter_ov,'@E')
Por1.ter_ov
RT-pot
' ' +Por1.ter_ov_tt + ' '
Por1.ter_ov_tt
.dod.
str(Por1.ks_dodane,10,3)
Por1.ks_dodane
Cena/MJC
str(Por1.cena,13,2)
Por1.cena
Da
str(Por1.dan,13,2)
Por1.dan
m1_ident.typ
m1_ident.typ
slo v
kresu
Extern
identifikace
m1_ident.ident_odb
m1_ident.ident_odb
Rozm.
m1_ident.rozm_csn
m1_ident.rozm_csn
str(Por1.ks_pozad,10,3)
Po.ks_pozad
Term.po
tran(Por1.ter_poz,'@E')
Por1.ter_poz
RT-po
' ' +Por1.ter_poz_tt + ' '
Por1.ter_poz_tt
Por1.ico_urceni
Por1.ico_urceni
Por1.zav_urceni
Por1.zav_urceni
zakaznik.nazev_org
zakaznik.nazev_org
slo obj.z
hlava.obj_zak
hlava.obj_zak
Dat.akt.
tran(Por1.datum_akt,'@E')
Por1.datum_akt
Por1.typ_Por
Por1.typ_Por
Por1.stav_Por
Por1.stav_Por
' ' + m1_ident.kod_pol + ' '
m1_ident.kod_pol
Cena hrub
str(Por1.cena_z,13,2)
Por1.cena_z
str(Por1.proc_pri,6,2)
Por1.proc_pri
Objedn
Por1.objednavka
Por1.objednavka
'/'+ Por1.rok_obj
Por1.rok_obj
str(Por1.poradi,3)
Por1.poradi
Por1.typ_Por
Por1.typ_Por
Por1.stav_Por
Por1.stav_Por
Identifikace
IIF (typ_por = 'N', left(texty.text_tx,12), Por1.ident)
IIF (typ_por = 'N', left(texty.text_tx,12), Por1.ident)
' ' + m1_ident.kod_pol + ' '
m1_ident.kod_pol
IIF (typ_por = 'N', substr(texty.text_tx,13,25), m1_ident.nazev)
IIF (typ_por = 'N', substr(texty.text_tx,13,25), m1_ident.nazev)
m1_ident.typ
m1_ident.typ
Extern
identifikace
m1_ident.ident_odb
m1_ident.ident_odb
Rozm.
m1_ident.rozm_csn
m1_ident.rozm_csn
str(Por1.ks_pozad,10,3)
Po.ks_pozad
Term.po
tran(Por1.ter_poz,'@E')
Por1.ter_poz
RT-po
' ' +Por1.ter_poz_tt + ' '
Por1.ter_poz_tt
.pot.
str(Por1.ks_potvrz,10,3)
Por1.ks_potvrz
Term.pot
tran(Por1.ter_ov,'@E')
Por1.ter_ov
RT-pot
' ' +Por1.ter_ov_tt + ' '
Por1.ter_ov_tt
.dod.
str(Por1.ks_dodane,10,3)
Por1.ks_dodane
Vyrobit
str(Por1.ks_potvrz- Por1.ks_dodane,10,3)
Por1.ks_potvrz- Por1.ks_dodane
Cena/MJC
str(Por1.cena,13,2)
Por1.cena
Da
str(Por1.dan,13,2)
Por1.dan
Por1.ico_urceni
Por1.ico_urceni
Por1.zav_urceni
Por1.zav_urceni
zakaznik.nazev_org
zakaznik.nazev_org
slo obj.z
hlava.obj_zak
hlava.obj_zak
Dat.akt.
tran(Por1.datum_akt,'@E')
Por1.datum_akt
Cena hrub
str(Por1.cena_z,13,2)
Por1.cena_z
str(Por1.proc_pri,6,2)
Por1.proc_pri
MOD_SYS
LZAZN
LFILT
NAVKAKS_POTVRZ
KS_DODANE
EXPED
ASTAV_POR
RCENIOBJEDNAVKAC_SQL
AVKAROK_OBJ
KAPORADI
ETURN
HLASKA
HLAVA
PS_RETURN
TEXTY
KAIDENT
AM1_IDENT
LICO_URCENIZAV_URCENIZAKAZNIK
POLEX
KAPROCX
KARBOT
KACLEFT
CRIGHT
FREEZE
ORDER
KLDOL
ECOLORLEVA
COLORPRAVA
ANADPIS
LORZAHL
JMENO
EOFFHODN
NSOUC
TITLE
TITLECOLORPOC0
OFFF3
UALF4
_OFFF10
F0PRG
FF1ON
F1PRG
_ F4_JM
F4PRG
RNTISKPRG
F7_JM
F7PRG
F9PRG
F9KEY
F9KEY1
F10_JM
F10PRG
RAMECEK
NAZEVT
KLICO
KLNAZ
_SPACEBAR
ATR_HL1
TR_HL2
_ TR_HL3
VKATR_HL4
TR_HL5
KATR_HL6
TR_HL7
KATR_HL8
TR_HL9
DET_JM
AENTER
DETAIL
DETPRG
_PS_LINE
PS_ZAZN
W_DLRADY
AID_ORG
MOD_PSV
ZAVOD
Objedn
vka/po
k :
Identifikace :
zev :
se vyrobit (Ks):
k expedici :
Term
n pot
eby :
na po
tu kus
, kter
se maj
expedovat
P
- Esc, Zaps
- Enter
999999.999
NOROBR
PS_LINE
LPOR1
OBJEDNAVKAPORADI
VKAZAKAZNIK
NAZEV_ORG
IDENT
M1_IDENT
ANAZEV
KS_POTVRZ
KS_DODANE
EXPED
AVKATER_OV
Obj.:
Text
Konec
M_AOBRW
MOB_M
LOBJEDNAVKAPORADI
VKAVOL5
KAZNIK
CENICEK
TEXTIK
DODAVKY
cursorz
RIIS 2.2
c2_t+
znam!
ehled textu objedn
vky F
text_tx
rad_tx
,b/w,,,,w+/rb
set cursor &cCursor
LZMENATXT
LPOM_OBR
KACALIAS
VKANHOR
VKANLEVY
NPRAVY
AVYSKOC
OBR_TYP
JMENO_C
WJMENO_C
ARADEK_C
KASLOUPEC_C
CCURSOR
LJENPROHL
LJEMENU
MOD_SYS
CISLO
OBJEDNAVKAROK
AROK_OBJ
LHLTEXT
ENIC2_T
ENITEX
KAOBJ
KATXT
HLASKA
KAW_DLRADY
AMOD_TXT
znam !
E H L E D po
vybran
ch objedn
mod22b2e
mod22b1e
Expedi
kaz (z v
ce objedn
vek)
Tisk standardn
ehledu po
Tisk standard. p
ehledu ozna
Konec
c_oznac
Nebyly vybr
ny (vysv
ceny)
znamy
c_oznac,
c_oznac,
r (rozd
O) !
r (rozd
vod) !
german
m1_plan
x1_plan
filterz
c_oznac,
Tisk sestavy
Prohl
sestavy
Konec
mod_lib
set filter to &filt
Prob
tisk ...
Prob
tisk na obrazovku ...
set device to file &m_txt
set printer to &m_txt1
- (^)
ipky,(^)Home,(^)End,PgUp,PgDn
- Esc
Pohyb
Konec
Prohl
expedi
kazu
modi comm &m_txt1 noedit window w
set filter to &filt
E H L E D po
objedn
mod_psv
c_oznac
Nebyly vybr
ny (vysv
ceny)
znamy
filterz
c_oznac,
E H L E D po
ozna
ch objedn
mod_psv
set filter to &filt
HLASKA
NAZEVT
LW_PRN
KAP_BOLDON
AP_BOLDOFF
P_DBST_ON
P_DBST_OFFP_LETRQUALP_DRAFT
AP_SUBOFF
P_SUPERON
P_SUPEROFFP_10CPI
AP_COMP_OFFP_12CPI
P_SUBON
P_SETUP
P_8LPI
P_6LPI
P_16CPI
P_NEWPAGE
P_RESET
AID_ORG
ENIKONEC
ENINAB_OBR
KAVOLBA
KAPOR1
M_ZAZ
KAOLDICO
AOLDZAV
ICO_URCENIZAV_URCENITISK
ENIW_TISK
KLGERMAN
LORVOL5
COLORM1_PLAN
AX1_PLAN
ORFILT
IDENT
EOFFNASTAV_PRNMOD_LIB
M_TXT
ORM_TXT1
MOD_PSV
MOD22B
VYB_ER
VYB_ER1
HLASKA
POR_OBJ
VYP_OKNO
ZADANKA
FAKTURY
CENICEK
PORADI
DODAVKY
TEXTIK
QFUNKCE
VOLBA1
VOLBA2
VOLBA3
VOLBA4
VOLBA5
VOLBA6
VOLBA7
VOLBA9
SALDO_ODB
SALDO_DOD
SALDICKA
VSEPOR
NEDOD
ZME_KUSY
FUNKCEW
HLATEXT
TISKPOR
P:\IN\SK\O\02\
MOD22B.FXP
P:\IN\SK\O\02\MOD22B.PRG