home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
06
/
MOD612C1.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1998-11-23
|
37KB
|
965 lines
m6_srazk
m6_zam
m_dat
x_dat
m_cis1
x_cis1
m4_organ
m6_zp
m6_arc
m6_muo
m6_zpz
m6_srazu
cis_spuc
m6_sazby
RIIS 6.1
ky ze mzdy zam
stnance :
mod_proc
mod6_lib
Osobn
slo neexistuje
stnanec nem
uvedeno
slo mzdov
slo mzdov
stnance nem
te opr
c6_srazk
M6_SRAZK
r_sr='M6_ZAM
M_DAT
d = X_DAT
s_tM_CIS1
'MMX_CIS1
ideM4_ORGAN
ky odbM6_ZP
*ZP
se s_drM6_ARC
M6_MUO
yp_UZIV
M6_ZPZ
ba M6_SRAZU
sCIS_SPUC
'M6_SAZBY
pW_HODN
'UANSI
s_ideCISLOZ
'ZdW_PICT_OSCZOBR_ZAM
MOD_PROC
sW_CHYBA
SCK_OSC
e q=W_DEL_OSC
MOD6_LIB
aHLASKA
5UCETNI
z sID_ORG
ictMM_AUTOR
MOD612FX
=C6_SRAZK
ky ze mzdy zam
stnance : F
RIIS 6.1
zmena_sr
mod612c1
Zadejte druh sr
c6_srazk+
c6_srazk
xc6_sraz
e.dr_sraz+' '
upper(e.dr_sraz)
' '+e.typ_sraz+' '
upper(e.typ_sraz)
Identifikace sr
e.ident_sraz+' '
e.ident_sraz
zp_plats+' '
zp_plats
cis_spuc
cis_spuc
trans(dat_zah,'@E')+' '
dat_zah
trans(dat_ukon,'@E')+' '
dat_ukon
Celkem s.
' '+str(e.celk_sraz,7,0)+' '
e.celk_sraz
Splaceno
' '+str(e.splat_sraz,7,0)+' '
e.splat_sraz
Sazba
str(e.sazba,5,2)
e.sazba
' '+e.zaklad+' '
e.zaklad
e s.
str(e.vyse_sraz,7,0)+ ' '
e.vyse_sraz
Minim.s.
' '+str(e.min_sraz,7,0)+' '
e.min_sraz
Posl.v
' '+str(e.posl_vyse,7,0)+' '
e.posl_vyse
Posl.dat.
trans(e.posl_dat,'@E')+' '
e.posl_dat
Osoby
' '+str(e.osoby,2,0)+' '
e.osoby
Pl.st
' '+e.sniz_zp+' '
e.sniz_zp
Min.VZZP
' '+e.min_vz+' '
e.min_vz
jemce
e.ico+' '
e.ico
e.zavod+' '
e.zavod
iif(dr_sraz='ZP',m6_zp.nazev_zp,m4_organ.nazev_org)
iif(dr_sraz='ZP',m6_zp.nazev_zp,m4_organ.nazev_org)
Var. symbol
e.var_s
e.var_s
Konst
e.kons_s
e.kons_s
Spec. symbol
e.spec_s
e.spec_s
e.ucet
e.ucet
poznamka
poznamka
Pozast.
' '+pozast_sr+' '
pozast_sr
prijmeni
prijmeni
jmeno
jmeno
Bydli
Ulice
ulice
ulice
cis_domu
cis_domu
Vznik
vznik+' '
vznik
Autor
autor
autor
Aktual.
aktual
aktual
Dat.akt.
trans(datum,'@E')
datum
POLEX
sRAMECEK
='NAZEVT
M6_ZAM
= OSC
s_tRIIS
'MMTITLE
ideTITUL
JMENO
odbPRIJMENI
*RTOP
s_drRBOT
CLEFT
yp_CRIGHT
FREEZE
ba F1
SRAZU
_SPUC
SAZBY
'UF6
s_ideF9
'ZdDETAIL
OSCDET_JM
ENTER
sPROCX
SCF9KEY
e q=M6_SRAZK
CISLOZ
aC6_SRAZK
5DR_SRAZ
sXC6_SRAZ
ZAVOD
=M4_ORGAN
nM6_ZP
aZAHL
_sr=HODN
I
MOD_PSV
iOBSAH
colora
set color to &col
='OBR
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
sOBRAZ
='C6_SRAZK
NOVY_Z
s_tCISLOZ
'MMAUTOR
ideMM_AUTOR
AKTUAL
odbDATUM
*DAT_ZAH
drW_ZAC_MES
ZAKLAD
yp_VZNIK
W_OSC
ba W_ROD_CIS
W_ICO
'W_KOD_ZP
pW_DAT_ZMENW_POHLAVI
W_ROK_NAR
W_PRIJMENIW_JMENO
W_ULICE
sW_CIS_DOMUW_BYDL
q=W_PSC
NOVY_PP
aST_Q
5ST_POCET
sS_OSC
tS_DR_SR
S_TYP_SR
=S_IDENT_SRS_DAT_ZAH
S_DAT_UKONS_CELK_SR
S_SPLAT_SRS_SAZBA
iS_ZAKLAD
rS_VYSE_SR
S_MIN_SR
'S_POSL_VYSS_POSL_DATS_OSOBY
S_ICO
S_ZAVOD
zpS_VAR_S
'NS_KONS_S
nS_SPEC_S
S_UCET
S_POZNAM
'S_POZAST
oS_ZP_PLATSS_CIS_SPUCS_SNIZ_ZP
S_MIN_VZ
S_PRIJMENIS_JMENO
zpS_BYDL
S_PSC
cS_ULICE
S_CIS_DOMUS_DATUM
S_AUTOR
&vS_AKTUAL
sNAPLN_POL
ZMENA
ase ZMENA_ZP
JMENO_C
ozWJMENO_C
rRADEK_C
'@SLOUPEC_C
@ 5Q1
&vloz sQ2
_zah piQ3
e '@E'
e q=q5
@ 5,58Q6
oz s_daQ7
on pictQ8
6,22 &Q11
s_poznQ12
ase q=Q13
@ 6Q14
vloz sQ15
st picQ16
casQ17
Q18
='s_zpQ19
Q20
,27 &vQ21
_zp_plQ22
ict '!Q23
se q=qQ24
p_zobQ25
is_spuQ26
@ 7Q27
vloz sQ28
spuc pQ29
vloz=CISELNIK
if s_zPOCET
='R'DOP1
DOP2
m6_sPOR
COUNT
k s_ZAKAZNIK
POMOC
s_iY
= ico
s_zSL
= zavoPOC
KONTROLA
uP_ZOB
BARVAS
r_sBARVAR
zbyBARVAZ
BARVAU
sBARVAN
= mBARVAH
cs_BARVA
cPORADI
seKONEC
to I
w+/rb
@R
2 cleaZ
15,57
@T
,22 to 1Q
7 doubleA
ZMENY
sayPS_RETURN
Aktualizace, F
Identifikace
Pozastaven
sob platby
Spol.
Celkov
Splaceno
Sazba (%)
klad sr
Osob v dom
cnosti
Minim
Posledn
Datum
tcem pojistn
ho i st
Minim
VZ ZP
sM6_ZAM
='PRIJMENI
JMENO
POR_DET
et pro zas
jemce
Var. symbol
Konst
Specifick
et pro zas
Specifick
Adresa pro zas
Ulice
slo domu
Bydli
S_ZP_PLATS.
&barvau
9999999
9999999
999.99
9999999
9999999
9999999
S_DR_SR
TSS_TYP_SR
SS_IDENT_SRS_DAT_ZAH
S_DAT_UKONS_POZNAM
MS_POZAST
eS_ZP_PLATSS_CIS_SPUCS_CELK_SR
S_SPLAT_SRS_SAZBA
S_ZAKLAD
_S_OSOBY
S_VYSE_SR
S_MIN_SR
S_POSL_VYSS_POSL_DATS_SNIZ_ZP
S_MIN_VZ
S_ICO
LATSS_ZAVOD
NIS_VAR_S
S_KONS_S
sS_SPEC_S
US_UCET
q=M6_ZP
NAZEV_ZP
aM4_ORGAN
5NAZEV_ORG
S_PRIJMENIS_JMENO
S_ULICE
=S_CIS_DOMUS_BYDL
S_PSC
UKONC6_SRAZK
&barvau
Bezhotovostn
Dluh zam
stnance
vky odbor
Zdravotn
poji
s_dr_sraz
@ 5,12 &vloz s_dr_sr picture '@!X'
s_typ_sr
@ 5,18 &vloz s_typ_sr picture '@!X'
@ 5,23 &vloz s_ident_sr picture '@X'
@ 5,47 &vloz s_dat_zah picture '@E'
@ 5,58 &vloz s_dat_ukon picture '@E'
@ 6,22 &vloz s_poznam
@ 6,67 &vloz s_pozast pict '!X'
s_zp_plats
@ 7,27 &vloz s_zp_plats pict '!'
s_cis_spuc
@ 7,65 &vloz s_cis_spuc pict '999'
@ 9,28 &vloz s_celk_sr picture '9999999'
@ 10,28 &vloz s_splat_sr picture '9999999'
@ 11,29 &vloz s_sazba picture '999.99'
@ 12,34 &vloz s_zaklad picture '!X'
@ 13,33 &vloz s_osoby picture '99'
@ 9,61 &vloz s_vyse_sr picture '9999999'
@ 10,61 &vloz s_min_sr picture '9999999'
@ 13,67 &vloz s_sniz_zp picture '!X'
@ 14,67 &vloz s_min_vz picture '!X'
s_ico
@ 17,19 &vloz s_ico picture '@!X'
Zdravotn
poji
ovna nenalezena
Organizace nenalezena
s_zavod
@ 17,32 &vloz s_zavod picture 'XXX'
Organizace nenalezena
@ 17,37 &vloz s_var_s picture '@!X'
@ 17,51 &vloz s_kons_s picture '@!X'
@ 17,58 &vloz s_spec_s picture '@!X'
@ 18,19 &vloz s_ucet picture '@!X'
@ 16,22 &vloz s_prijmeni
@ 17,22 &vloz s_jmeno
@ 18,22 &vloz s_ulice
@ 18,60 &vloz s_cis_domu
@ 19,22 &vloz s_bydl
@ 19,60 &vloz s_psc
&barvau
TSP_ZOB
SNASTAV_Q
DAT_ZAH
AT_UKONS_DR_SR
MS_ZAKLAD
eS_TYP_SR
SS_IDENT_SRS_ZP_PLATSS_SAZBA
RNOVY_Z
_SRID_ORG
_S_MIN_VZ
SS_SNIZ_ZP
IN_SR
_VYSQ4
OSL_DATQ5
NIZ_ZP
IN_VZ
LATSQ8
M6_SRAZU
SS_CIS_SPUCS_ICO
q=ICO
S_ZAVOD
aZAVOD
5S_UCET
UCET2
MENIS_VAR_S
M6_SAZBY
=CS_VARS_K
S_KONS_S
CS_KONST_KC6_SRAZK
iQ12
SE_SR
SL_VYSQ16
SL_DATQ17
Q18
Q19
zpM6_ZP
'NHLASKA
SPEC_S
M4_ORGAN
'W_HODN
S_SPUCQ23
IZ_ZP
IJMENIQ26
zpQ27
Q28
S_DOMUZMENA
POR_DET
&vPROC1
sS_DATUM
S_AKTUAL
MM_AUTOR
zdravotn
poji
Zdravotn
poji
na ke dni
Pohlav
Rok narozen
&barvau
@R 999999/9999
W_OSC
TSM6_ZAM
SPRIJMENI
RJMENO
W_ROD_CIS
M6_ZPZ
MW_ICO
eM6_ZP
SNAZEV_ZP
RW_KOD_ZP
SW_DAT_ZMENW_POHLAVI
W_ROK_NAR
@ 14,25 &vloz w_rod_cis pict '@R 999999/9999'
@ 15,25 &vloz w_ico pict '@!X'
w_kod_zp
@ 17,25 &vloz w_kod_zp pict '!'
@ 17,55 &vloz w_dat_zmen pict '@E'
@ 18,25 &vloz w_pohlavi pict '!'
@ 18,55 &vloz w_rok_nar pict '9999'
do proc&y
TSP_ZOB
IJMENI
OD_CIS
EV_ZP
RAKTUAL
SMM_AUTOR
NDAT_AKT
ZMENA_ZP
do proc&y
do zmen&y with 'get'
do zmen&y with 'say'
Skute
znam? (a/N)
mod612c1
it pr
ci beze zm
n? (a/N)
mod612g
KONEC
IJMENI
D_CIS
EV_ZP
_AUTOR
NAP_HOD
P_ZOB
SS_DR_SR
HLASENI
_VYSM6_ZPZ
DATW_OSC
S_OSC
M6_ZAM
ATSW_ROD_CIS
RODNE_CIS
W_ICO
SS_ICO
SPUCW_KOD_ZP
=W_DAT_ZMENW_POHLAVI
W_ROK_NAR
MENIST_POCET
POCET
ONS_S
KONST_KQ4
SRAZK
rMENU2
PORADI2
'PROC2
_VYSVOLBA
_DATPROC1
ID_ORG
POM
zpNOVY_Z
'NC6_SRAZK
nPROCX
MOD612C1
NAPLN_POL
PORADI
oM6_SRAZK
SK_UDAJU
COK_C
IJMENICISLOZ
zpAUTOR
MM_AUTOR
cAKTUAL
DATUM
UDAT_ZAH
W_ZAC_MES
ZAKLAD
sVZNIK
ZMENA
PLN_POL
MOD612G
rKOD_ZP
DAT_ZMEN
POHLAVI
ENROK_NAR
DAT_AKT
ehled spole
ehled organizac
Konec
mod6_lib
mod_proc
&barvau
mod7_lib
&barvau
&barvau
SW_CIS_SPUCS_CIS_SPUCZOBR_SRAZUMOD6_LIB
CZMENA
SPUCS_DR_SR
UCW_ZP
RS_ICO
SZOBR_ZP
NMOD_PROC
W_DICO
W_NAZ
SZOBR_ORGANS_ZAVOD
MOD7_LIB
mod612f
c6_srazk
c6_srazk
C6_SRAZK
SW_ROD_CIS
M6_ZAM
PUCRODNE_CIS
ZMENA
RAZUOSC
CS_OSC
SPUCDR_SRAZ
UCS_DR_SR
RTYP_SRAZ
SS_TYP_SR
NIDENT_SRAZS_IDENT_SRDAT_ZAH
SS_DAT_ZAH
DAT_UKON
S_DAT_UKONCELK_SRAZ
S_CELK_SR
SPLAT_SRAZS_SPLAT_SRSAZBA
S_SAZBA
ZAKLAD
SS_ZAKLAD
CVYSE_SRAZ
S_VYSE_SR
MIN_SRAZ
S_MIN_SR
POSL_VYSE
S_POSL_VYSPOSL_DAT
S_POSL_DATOSOBY
S_OSOBY
ONST_KS_ICO
ZAVOD
RS_ZAVOD
iVAR_S
rS_VAR_S
KONS_S
'S_KONS_S
SSPEC_S
DATS_SPEC_S
UCET
S_UCET
zpPOZNAMKA
NS_POZNAM
nPOZAST_SR
S_POZAST
ZP_PLATS
S_ZP_PLATSCIS_SPUC
SS_CIS_SPUCSNIZ_ZP
S_SNIZ_ZP
MIN_VZ
ENIS_MIN_VZ
pPRIJMENI
S_PRIJMENIJMENO
S_JMENO
UBYDL
S_BYDL
sS_PSC
ULICE
S_ULICE
CIS_DOMU
zS_CIS_DOMUDATUM
AKTUAL
MM_AUTOR
NPROCX
M6_SRAZK
NOVY_Z
KONEC
udaj_sf
udaj_sf
udaj_nf
udaj_nf
M6_SRAZK
udaj_nf
W_NAZEV
SUDAJ_S
UDAJ_N
PUCW_UDAJ_N
W_UDAJ_S
CW_NAZ_DBF
M6_ARC
UCCISLOZ
NAZEV_DBF
NAZEV_POL
TYP_POL
SRDAT_ZMENY
CAS_ZMENY
OBSAH_S
OBSAH_N
NDELKA_POL
AKTUAL
MM_AUTOR
ZC6_SRAZK
DR_SRAZ
s_dr_sr
TYP_SRAZ
s_typ_sr
mod612c1
Nejednozna
identifikace sr
Nejednozna
identifikace sr
Datum zah
t vypln
Datum ukon
nesm
t men
datum zah
Chybn
hodnota pozastaven
ky (mezera, A)
ZP_PLATS
s_zp_plats
Neexistuje
slo sb
Neexistuje
slo spole
Typ sr
"MP" je ur
en pouze pro druh sr
ky "EX"=exekuce
Celkov
ka mus
t pro typ sr
ky "MP" a "MC" vypln
"Sazba" a "M
ky" nesm
t vypln
ny sou
"Sazba" nebo "M
ky" mus
t vypln
Nutno vyplnit. Povolen
hodnoty jsou "B"=brutto a "N"=netto
Zdravotn
poji
ovna nebyla nalezena
Organizace nebyla nalezena
Chybn
hodnota ozna
tce pojistn
Chybn
hodnota uplatn
minim
ho VZ zdravotn
ho poji
JMENO_C
SWJMENO_C
MOD_C2
PUCOK_C
MOD_C3
UZMENA
NAZ_DBF
W_POC
S_DR_SR
PROCX
SRST_ZAZ
IDENT_SRAZS_IDENT_SRM6_SRAZK
NCISLOZ
C6_SRAZK
RNOVY_Z
RHLASKA
S_DAT_ZAH
CS_DAT_UKONQ5
S_POZAST
S_ZP_PLATSM6_SRAZU
S_CIS_SPUCQ9
S_TYP_SR
CS_CELK_SR
S_SAZBA
RS_VYSE_SR
rS_ZAKLAD
'M6_ZP
SS_ICO
DATQ18
S_ZAVOD
M4_ORGAN
pS_SNIZ_ZP
nS_MIN_VZ
S_OSC
S_DR_SR
UCDR_SRAZ
S_TYP_SR
UTYP_SRAZ
CS_IDENT_SRIDENT_SRAZS_DAT_ZAH
DAT_ZAH
S_DAT_UKONDAT_UKON
S_CELK_SR
CELK_SRAZ
S_SPLAT_SRSPLAT_SRAZS_SAZBA
NSAZBA
S_ZAKLAD
ZAKLAD
RS_VYSE_SR
VYSE_SRAZ
S_MIN_SR
MIN_SRAZ
S_POSL_VYSPOSL_VYSE
S_POSL_DATPOSL_DAT
S_OSOBY
OSOBY
S_ICO
LATSICO
S_ZAVOD
UCZAVOD
S_VAR_S
CVAR_S
S_KONS_S
KONS_S
RS_SPEC_S
SPEC_S
rS_UCET
'S_POZNAM
SPOZNAMKA
TS_POZAST
POZAST_SR
S_ZP_PLATSZP_PLATS
S_CIS_SPUCCIS_SPUC
S_SNIZ_ZP
SNIZ_ZP
S_MIN_VZ
SMIN_VZ
SS_PRIJMENIPRIJMENI
S_JMENO
JMENO
ENIS_BYDL
pBYDL
S_PSC
MENIPSC
S_ULICE
UULICE
S_CIS_DOMUCIS_DOMU
sS_DATUM
DATUM
S_AUTOR
AUTOR
zS_AKTUAL
UAKTUAL
-
- ^PgDn
- ^Home
- F10
- ^End,Esc
- F6
Pohyb
znamu
znamu
Organizace
Konec
S_DR_SR
-
- ^End,Esc
Pohyb
Konec
q&si = pocet
q&si = 0
DR_SR
ID_ORG
UCS_DR_SR
S_ZP_PLATSS_CIS_SPUCS_ICO
LATSS_ZAVOD
AZS_VAR_S
S_KONS_S
S_SPEC_S
NS_UCET
S_PRIJMENIS_JMENO
S_BYDL
_SRS_PSC
SRAZS_ULICE
NS_CIS_DOMUVZNIK
SPOCET
YSE_SR
s_dr_sraz
DR_SRAZ
s_dr_sr
s_typ_sr
TYP_SRAZ
s_typ_sr
s_zp_plats
ZP_PLATS
s_zp_plats
s_cis_spuc
mod6_lib
s_ico
s_zavod
mod_proc
mod7_lib
w_kod_zp
KOD_ZP
w_kod_zp
Pro toto pole neexistuje pomocn
ehled hodnot
P_ZOB
SMOD_C3
ZMENA
UCW_CIS_SPUCS_CIS_SPUCZOBR_SRAZUMOD6_LIB
CS_DR_SR
UCW_ZP
S_ICO
ZOBR_ZP
NMOD_PROC
W_ICO
MENIW_ZAVOD
S_ZAVOD
SRW_DICO
RAZW_NAZ
NZOBR_ORGANMOD7_LIB
SZMENA_ZP
RHLASKA
colora
set color to &color
SCOLOR
UCMOD612FX
HLASKA
ZMENA_SR
PORADI
POR_DET
PROC1
h w_z
ZMEN1
>1
PORADI2
PROC2
ith 'uB
ZMEN2
noiD
ZMENY
VOLBA
re ''
, w_ro
ARCHIV
K_UDAJU
NAPLN_POL
MENU2
w_priEt
NASTAV_Q
NAP_HOD
HLASKA
dl, [
W:\06\
MOD612C1.FXP
W:\06\MOD612C1.PRG