home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1996 May
/
PCW596.iso
/
polskie
/
insert
/
rachmist
/
system.arj
/
CHECK.APP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1996-01-23
|
22KB
|
477 lines
ERROR
DO fatalerr WITH ERROR(), MESSAGE(), MESSAGE(1), PROGRAM(), LINENO(), DATE()
KontrolujF
bazy
chksys.prg
podmioty
podmioty
podmioty
ON ERROR &olderror
CHECKWHAT
OLDERROR
CZEKAJ
CHKSYS
CHKBASE
PODMPATH
DOCHECK
PODMIOTY
SYMBOL
FIRMNR
CHKSTAT
CHKYEAR
ROKNR
CHKMONTH
MIESNR
CHKMIES
chkmonth.prg
SYMBOL
YEARS
MONTHS
CHKSTAT
CHECKWHAT
CHKYEAR
ROKNR
CHKMONTH
MIESNR
FILLYEARS
FILLMONTHSPRG
??mies.dbf
SYMBOL
YEARS
MAINPATH
MAKEPODM
SYMBOL
MONTHS
INPATH
MAINPATH
MAKEPODM
TWODIG
MIESIAC
miesiace
SYMBOL
YEARS
FILLYEARS
CHKBASE
TWODIG
MAINPATH
MAKEPODM
DOCHECK
FILLYEARS
FILLMONTHS
CHKMIES
opisy
opisy
podmioty
podmioty
users
users
urzedy
urzedy
komunik
komunik
tresc
tresc
params
params
separat
separat
pojazd
pojazd
CHKBASE
PODMPATH
CHKMEM
pdwzor
ewreman
ewspvat
ewspvat
ewspvat
ewspvat
ewzakvat
ewzakvat
ewzakvat
ewzakvat
CREAT
MAINPATH
MAKEPODM
TWODIG
CHKBASE
ADDMONTH
UPDVAT
zvf.dbf
zvr.dbf
zvfk.dbf
zvrk.dbf
svf.dbf
svr.dbf
svfk.dbf
svrk.dbf
rem.dbf
LOCPATH
czanie miesi
SYMBOL
LOCPATH
NUMCIAG
SUMCIAG
NUMPOCZ
BIPATH
CNTWORK
MAINPATH
MAKEPODM
TWODIG
NUMER
MIESIAC
WORKPATH
BI_WORK
MBLOKADA
FULLYEAR
MONTHCHK
ADDMONTH
ADMIN
Uwaga, uwaga, uwaga...
NastF
powa
d systemowy.
Twoje dane na dysku twardym sF
prawdopodobnie fizycznie
uszkodzone. UF
yj dyskietek z archiwum aby uratowa
dane.
Procedura
, linia
NaciF
nij dowolny klawisz...
ERMES
ERLIN
ERLINNO
ERDZIEN
ISADM
NOTICE
CLEAR
ERRWIN
SYSPATH
ER_LIN
ER_NO
ER_MES
ER_LIN1
PR_NAME
ER_DATE
ewamort
ewamort
ewfirmy
ewfirmy
ewsrtr
ewsrtr
ident
ident
wspolnik
wspolnik
pit11
pit11
pit32
pit32
vatb7
vatb7
import
impsv
import
impzv
import
imppar
kateg
kateg
danearch
danearch
SYMBOL
MAINPATH
TMAKEPODM
ICHKBASE
CHKMEM
miesiace
ewprac
ewumowy
umowy
ewwypl
ewwypos
wypos
ewpojazd
pojazd
ewprach
prach
ewpprzej
pprzej
SYMBOL
ROKSTR
CREAT
MAINPATH
MAKEPODM
TWODIG
CHKBASE
mies.dbf
prac.dbf
umowy.dbf
wypl.dbf
wypos.dbf
pojazd.dbf
pprzej.dbf
prach.dbf
LOCPATH
YEARCHK
KontrolujF
plik:
Zmieniam strukture pliku:
ewzakvat
ewwypl
pdwzor
pit32
ewzakvat
ewwypl
updzus.prg
pit32
pdwzor
updks.prg
SYMBOL
NAZWACZYS
NAZWA
NAZWAPATH
CREATE
TEMPDBF
TEMPCDX
TEMPFPT
PUREDBF
PURECDX
PUREFPT
FULLDBF
FULLCDX
FULLFPT
CZYSPATH
TEMPPATH
COMPARE
GOODKS
LICZYC
_TEMP
UPDZAK
UPDZUS
UPDKS
KontrolujF
plik:
SYMBOL
cjaNAZWACZYS
NAZWA
HKMENAZWAPATH
CREATE
TEMPMEM
PUREMEM
FULLMEM
CZYSPATH
FILENAME
WaitWin
Za chwilF
dalszy ci
g programu.
DrukujF
CierpliwoF
ci. Mo
e to potrwa
ugo...
ONOFF
KOMUNIK
WAITWIN
m.xloc = m.xloc
errors
\<Nie
\<Tak
ECODE1
DEFAULTANSY0
OLDALIAS
SYSPATH
SERRWIN
ERRCODE
ERRORS
MESSAGE
CURSORz
errors
WciF
nij dowolny klawisz ...
ECodeF
SET CURSOR &curstat
ECODE1
ECODE2
ECODE3
OLDALIAS
ILOSC
CURSTAT
SYSPATH
ERRWIN
ERRORS
ERRCODE
MESSAGE
firmaF
FIRMNR
TWODIG
@L 99c
ilacjaq
FTAGS
PTAGS
FNAME
PNAME
FALIAS
PALIAS
LOCALENV7
ksiega.fky2
ksiega
MY_QUIT
MAINMENU
KSIEGA
NAZWA
NAZWAPATH
DATATOW
FIELD
STRUC
_FULL
netinw
Przeliczam dane zakupF
w VAT
_temp
netinw22
Przeliczam dane zakupF
w VAT
_temp
ISFIELD
FULLDBF
_FULL
_TEMP
NETZAO1_ZWBEZVAT
NETZAO1_0
PRZEZN
NETINW1
NETINW
VATINW
NETKOSZT1
NETKOSZT
VATKOSZT
NETZAO1_22VATZAOP
NETZAOP
NETZAO1_7
VATZAO1_22VATZAO1_7
NETINW2
VATINW2
NETKOSZT2
VATKOSZT2
NETZAO2_22NETZAO2_7
VATZAO2_22VATZAO2_7
NETINW3
VATINW3
NETKOSZT3
VATKOSZT3
NETZAO3_22NETZAO3_7
VATZAO3_22VATZAO3_7
NETINW22
VATINW22
NETINW7
VATINW7
NETKOSZT22VATKOSZT22NETKOSZT7
VATKOSZT7
NETZAOP22
NETZAOP7
VATZAOP22
VATZAOP7
zus_nal
Przeliczam dane ZUS-u
_temp
ISFIELD
FULLDBF
_FULL
ZUS_NAL
ZUS_S
1_ZWGOTOWKA
NATURA
ZUS_TYP
ZUS_K
FUND_NAL
FUND_S
FUND_TYP
FUND_K
WYN_NAL
WYN_S
1_22WYN_TYP
WYN_K
_TEMP
zmania
Przeliczam dane ksiF
ISFIELD
FULLDBF
FULLYEAR
ROKNR
WINNE
WPODATEK
WPRZEROB
WSPRZET
WWYPLATA
WNATURA
pdwzor
NAZWACZYS
FALIAS
RETVAL
WPODATEK
WPRZEROB
IWNATURA
FWSPRZET
miesiace
IOPEN
RETVAL
MIESIACE
MAINPATH
MIESIAC
FULLYEAR
NUMCIAG
NUMPOCZ
..\CHECK\CHECK.PRG
C:\KSIEGA\SYSTEM\
..\CHECK\CHKSYS.PRG
..\CHECK\CHKMONTH.PRG
..\CHECK\FATALERR.PRG
..\CHECK\CHKSTAT.PRG
..\CHECK\CHKYEAR.PRG
..\CHECK\CHKBASE.PRG
..\CHECK\CHKMEM.PRG
..\CHECK\FILESIZE.PRG
..\COMMON\CZEKAJ.PRG
..\COMMON\TAKNIE.PRG
..\COMMON\NOTICE.PRG
..\COMMON\MAKEPODM.PRG
..\COMMON\TWODIG.PRG
..\CHECK\COMPARE.PRG
..\COMMON\CLEAR.PRG
..\COMMON\FULLYEAR.PRG
..\CHECK\UPDVAT.PRG
..\COMMON\ISFIELD.PRG
..\CHECK\UPDZAK.PRG
..\CHECK\UPDZUS.PRG
..\CHECK\UPDKS.PRG
..\CHECK\GOODKS.PRG
..\COMMON\GETNUMP.PRG
CHECK.FXP
CHKSYS.FXP
CHKMONTH.FXP
FATALERR.FXP
CHKSTAT.FXP
CHKYEAR.FXP
CHKBASE.FXP
CHKMEM.FXP
FILESIZE.FXP
CZEKAJ.FXP
TAKNIE.FXP
NOTICE.FXP
MAKEPODM.FXP
TWODIG.FXP
COMPARE.FXP
CLEAR.FXP
FULLYEAR.FXP
UPDVAT.FXP
ISFIELD.FXP
UPDZAK.FXP
UPDZUS.FXP
UPDKS.FXP
GOODKS.FXP
GETNUMP.FXP