PC World Komputer 1996 May/PCW596.iso/polskie/insert/rachmist/system.arj/ROKINCOM.APP

MS Visual FoxPro App | 1996-01-21 | 37KB | 712 lines

miesiac
miesiac
PRZYCHOD
ZAKUP
KOSZTY
WYDATKI
DOCHOD
REMPOCZ
REMKON
OLDMIES
L_REM1
L_REM12
MIESIACE
MIESIAC
MIESNR
LICZWORK
LICZREM
@L 99c
@L 99c
QUERY
PRZYCHOD
ZAKUP
KOSZTY
WYDATKI
DOCHOD
MAINPATH
ROKNR
PTOWAR
PINNE
WZAKUP
WKOSZTY
WPODATEK
WPRZEROB
WREKLAMA
WWYPLATA
WNATURA
WSPRZET
WINNE
POPRAWKA
QUERY
@L 99c
@L 99c
WARTOSC
MAINPATH
ROKNR
DANE_REM
ILOSC
LICZWORK
LICZREM
rokincom.spr
wspolnik
wspolnik
wspincom.spr
 WspF
lnicy
wspolnik
wspolnik
wspincom.spr
wspolnik.spr with 2
 Brak danych wspF
nazwisko:25:H='Nazwisko',imie1:15:H = 'Imie', ul=alltrim(ulica)+' '+alltrim(nr_domu)+' '+alltrim(nr_lokalu):25:H='Ulica', udzial:6:H='Udzial'
nazwisko
      RIBBON
   PL
  P 512IOPEN
    ILE
      ROKINCOM
      MAINPATH
FPODM
     WSPOLNIK
 WSPINCOM
 STARTLIS
5PODMPATH
5CLEARRIB
_curobj=objnum(m.exiterr)
rokincom.prg
TALKz
COMPATIBLEz
_r630tnx3x
 Rozliczenie roczne
_r630tnx3x
99,999,999,999.99
99,999,999,999.99
99,999,999,999.99
99,999,999,999.99
99,999,999,999.99
99,999,999,999.99
99,999,999,999.99
@*HT OK
 PrzychF
 Wydatki
 DochF
PoczF
tkowy:
cowy   :
 Remanent
99,999,999,999.99
Zakup     :
Koszty    :
Wydatki   :
Inne      :
_r630tnx3x
RIBBON
CZEKAJ
PRZYCHOD
ZAKUP
KOSZTY
WYDATKI
DOCHOD
REMPOCZ
REMKON
    ROKINCOM
CURRAREA
TALKSTAT
SCOMPSTAT
_R630TNX3XEXITERR
X_R630TNXM9
_R630TNX3X
99,999,999,999.99
CURRWIND
_R630TNX3XZAKUP
_R630TNXM9
TALKz
COMPATIBLEz
_qz90oioqz
 Dochody z firmy - wg deklaracji PIT-5
_qz90oioqz
Nazwisko:
Za rok:
@*HT OK
999.99
UdziaF
Podatek
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
9,999,999,999.99
DochF
Odliczenia(suma)
_qz90oioqz
RIBBON
IOPEN
PRIVATE
NAZWISKO
WSPOLNIK
LIMIE
PIMIE1
aUDZIAL
MAINPATH
\PODM
\SYSTPIT5
INCOM
FULLYEAR
ROKNR
,MIESIAC
P05KOD
P05P027
P05P028
P05P035
P05P036
P05P031
P05P032
P05P039
P05P040
P05P043
OPP05P049
TSP05P052
fP05P054
P05P056
YKP05P055
TAP05P057
P05P059
P05P060
P05P061
RP05P062
P05P063
P05P064
P05P065
,P05P066
P05P068
P05P070
P05P072
P05P074
P05P076
P05P098
C:\CURRAREA
TTALKSTAT
COMPSTAT
_QZ90OIOQZEXITOK
exactz
_lowzorzec
_lolistabr
_lowzorzec
TYTUL
DLWZORCA
MYILOSC
ALIAS
TOMENTER
TOMPODGLADINFO
CZYBLOK
POMOC
POLA1
INDEX1
POLA2
INDEX2
POLA3
INDEX3
POLA4
INDEX4
POLA5
INDEX5
NUMER
IOPEN
EXACT
WIERSZE
_LOWZORZEC_LOLISTABRSETRIB
ZECPROPRZEGLASTARTPRO
CLEARRIB
{DNARROW}
{UPARROW}
{TAB}
 Koniec danych
 PoczF
tek danych
 Koniec danych
 PoczF
tek danych
 Zapis jest zablokowany
DO &tomenter
DO &tompodglad
STRING
MYQUIT
WIERSZE
_LOWZORZECDLWZORCA
LOKATA
MYSZR
MYSZC
GLADTCOL
TOMENTER
CZYBLOK
BLOKADA
MYILOSC
PROPRZEGLATOMPODGLADSETRIB
POMOC
NUMER
PROWYKAZ
POLA1
INDEX1
POLA2
INDEX2
ZECPOLA3
INDEX3
INDEX4
POLA5
INDEX5
LADMYILOSC
SET ORDER TO &kolejnosc
_olistast
BROWSE NOWAIT WINDOW _olistast     IN WINDOW _lolistabr TITLE "Dane" COLOR SCHEM 10     FIELDS &pola
{INS}
KOLEJNOSC
_OLISTAST
ZECTCOL
STARTPRO
PROPRZEGLA
PROWYKAZ
@ srows()-1, 0 say replicate(" ", scols()-1 ) COLOR &col
RIBBON
SETRIB
CLEARRIB
WaitWin
Za chwilF
 dalszy ci
g programu.
DrukujF
CierpliwoF
ci. Mo
e to potrwa
ugo...
ONOFF
KOMUNIK
WAITWIN
@ wrows()-1, 0 say padr(m.text, wcols()-1," " ) COLOR &col
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
ANSECODE3
OLDALIAS
ILOSC
CURSTAT
SYSPATH
ERRWIN
SERRORS
ERRCODE
MESSAGE
 Dane wF
ciciela/wsp
lnika
wspolnik
wspolnik
wspolnik,
urzedy
urzedy
us_id
_curobj=objnum(m.exiterr)
_curobj=objnum(m.exitok)
TALKz
COMPATIBLEz
_qz90ois18
_qz90ois18
 matki
Data urodzenia:
Nr lokalu:
@K 99-999
@*HN UrzF
d skarbowy
@K 999.99
y procent udzia
@*HN Dane o innych F
ach dochod
@*HN Zapisz
@*HT Zaniechaj
Gmina/dzielnica:
 Miejsce zamieszkania
Ulica      :
Kod        :
Nazwisko  :
Miejsce urodzenia:
PESEL      :
NIP        :
 Dane osobowe
MiejscowoF
UdziaF
 w % :
1    :
2    :
Nr domu  :
Telefon  :
Poczta   :
 ojca  :
_qz90ois18
urzedy
RIBBON
US_NAZWA
URZAD_NR
IOPEN
TOTAL
OLDREK
TYTWSP
MAINPATH
WSPOLNIK
UDZIAL
PODMPATH
URZEDY
US_ID
CURRAREA
TALKSTAT
COMPSTAT
_QZ90OIS18NAZWISKO
8IMIE1
IMIE2
OJCIEC
MATKA
DATAUR
MIEJSCE
ULICA
NR_DOMU
NR_LOKALU
MIASTO
TELEFON
POCZTA
PESEL
GMINA
DALEJ
_QZ90OISZI_QZ90OIT2UINNE
_QZ90OIT91EXITOK
_QZ90OITCNEXITERR
_QZ90OITUHC
TOTAL
UDZIAL
wyb_us.prg
WYB_US
CHECK_UD
inne.spr
y procent udzia
wspolnik
wspolnik
CHECK_UD
UDZIAL
IDENT
_QZ90OIS18
CURRWIND
_QZ90OIS18US_NAZWA
CHECK_UD
_QZ90OISZI
_QZ90OIT2U
_QZ90OIT91
_QZ90OITCN
_QZ90OITUH
urzedy
urzedy
urzedy.app
urzedy,
 UrzF
dy skarbowe
urzedy
us_nazwa, us_id
 Brak urzedF
us_nazwa:20:H='Nazwa urzedu', ad=alltrim(us_ulica)+' '+alltrim(us_nrdomu):20:H='Adres',us_kodzip:6:H='Kod',us_miasto:20:H='Miasto'
us_nazwa
RIBBON
"AREA
 w % IOPEN
pUS_ID
URZEDY
PODMPATH
URZAD_NR
WYBIERZ
_curobj=objnum(m.exiterr)
_curobj=objnum(m.exitok)
m.?nip?i
 PozostaF
e dane w
ciciela/wsp
lnika
TALKz
COMPATIBLEz
_qz90oiv34
_qz90oiv34
Pozarolnicza dziaF
 gospodarcza
REGON/PESEL:
Rodzaj:
Miejsce:
REGON/PESEL:
Rodzaj:
Miejsce:
Uczestnictwo w spF
kach nie b
cych osobami prawnymi
REGON/PESEL:
Miejsce:
REGON/PESEL:
Miejsce:
Miejsce:
Miejsce:
@*HT Zapisz
@*HT Zaniechaj
Nazwa:
Nazwa:
Przedmiot:
Przedmiot:
_qz90oiv34
RIBBON
TITLE
PNIPBI
PNIPB
PREGONBI
PREGONB
PRODZAJBI
PRODZAJB
PMIEJSCEB
PNIPCI
PNIPC
PREGONCI
PREGONC
PRODZAJCI
PRODZAJC
PMIEJSCEC
SNIPBI
SNIPB
SREGONBI
SREGONB
SRODZAJBI
SRODZAJB
SMIEJSCEB
SNIPCI
SNIPC
SREGONCI
SREGONC
SRODZAJCI
SRODZAJC
SMIEJSCEC
NAJRODZAI
NAJRODZA
NAJMIEJAI
NAJMIEJA
NAJRODZBI
NAJRODZB
NAJMIEJBI
NAJMIEJB
CURRAREA
TALKSTAT
COMPSTAT
_QZ90OIV34PMIEJSCEBIPMIEJSCECISMIEJSCEBISMIEJSCECIEXITOK
_QZ90OIWBPEXITERR
PNIPB
PNIPBI
PREGONB
PREGONBI
PRODZAJB
PRODZAJBI
PMIEJSCEB
PMIEJSCEBIPNIPC
PNIPCI
PREGONC
PREGONCI
PRODZAJC
PRODZAJCI
PMIEJSCEC
PMIEJSCECISNIPB
SNIPBI
SREGONB
SREGONBI
SRODZAJB
SRODZAJBI
SMIEJSCEB
SMIEJSCEBISNIPC
SNIPCI
SREGONC
SREGONCI
SRODZAJC
SRODZAJCI
SMIEJSCEC
SMIEJSCECINAJRODZA
NAJRODZAI
NAJMIEJA
NAJMIEJAI
NAJRODZB
NAJRODZBI
NAJMIEJB
NAJMIEJBI
_QZ90OIWBP
RETVAL
IDENT
exactz
LISTAZW
_olistazw
_owzorzec
FTCOL
HTYTUL
DLWZORCA
ILOSC
c danTOMPODGLADZWROT
POMOC
POLA1
INDEX1
POLA2
INDEX2
RPOLA3
PoczINDEX3
POLA4
ych INDEX4
POLA5
INDEX5
MYQUIT
NUMER
IOPEN
EXACT
WZWIERSZE
c jesLISTAZW
_OLISTAZW
_OWZORZEC
SETRIB
WYBPRZEGLAWYBPRO
CLEARRIB
{DNARROW}
{UPARROW}
{TAB}
 Koniec danych
 PoczF
tek danych
 Koniec danych
 PoczF
tek danych
SCATTER FIELDS &coret MEMVAR
DO &tompodglad
CORET
STRING
LOKATA
FMYSZR
HMYSZC
DBLTIME
MYQUIT
CHANGED
anZNAK
DGLAD_OWZORZEC
DLWZORCA
RWZWIERSZE
ILOSC
WYBPRZEGLATOMPODGLADSETRIB
POMOC
NUMER
WYBWYKAZ
POLA1
FINDEX1
HPOLA2
INDEX2
POLA3
INDEX3
anINDEX4
DPOLA5
INDEX5
ILOSC
SET ORDER TO &kolejnosc
_olbrow
BROWSE NOWAIT WINDOW _olbrow    IN WINDOW _olistazw TITLE "Wybierz" COLOR SCHEM 10     FIELDS &pola
_olistazw
{INS}
KOLEJNOSC
_OLBROW
FFROW
HFCOL
WZWIERSZE
WYBPRO
WYBPRZEGLA
WYBWYKAZ
..\ROKINCOM\ROKINCOM.PRG
C:\KSIEGA\SYSTEM\
..\ROKINCOM\INNE.PRG
..\ROKINCOM\ROKINCOM.SPR
..\ROKINCOM\WSPINCOM.SPR
..\COMMON\STARTLIS.PRG
..\COMMON\CLEARRIB.PRG
..\COMMON\CZEKAJ.PRG
..\COMMON\SETRIB.PRG
..\COMMON\TAKNIE.PRG
..\COMMON\NOTICE.PRG
..\WSPOLNIK\WSPOLNIK.SPR
..\PODMIOTY\WYB_US.PRG
..\WSPOLNIK\INNE.SPR
..\COMMON\IDENT.PRG
..\COMMON\WYBIERZ.PRG
..\COMMON\FULLYEAR.PRG
ROKINCOM.FXP
INNE.FXP
ROKINCOM.SPX
WSPINCOM.SPX
STARTLIS.FXP
CLEARRIB.FXP
CZEKAJ.FXP
SETRIB.FXP
TAKNIE.FXP
NOTICE.FXP
WSPOLNIK.SPX
WYB_US.FXP
INNE.SPX
IDENT.FXP
WYBIERZ.FXP
FULLYEAR.FXP