kateg
kateg
kat.spr
 Kategorie 
kateg
kateg
kat.spr with 1
kat.spr with 2
Nie ma F
adnych kategorii 
kateg:H='Kategoria', opiskat:H='Opis'
kateg
 Kategorie 
kateg
kateg
kasujkat
kat.spr with 2
Nie ma F
adnych kategorii 
kateg:H='Kategoria', opiskat:H='Opis'
kateg
 Kategorie 
kateg
kateg
kat.spr with 0
kat.spr with 1
kat.spr with 2
kasujkat
kateg:H='Kategoria', opiskat:H='Opis'
kateg
IOPEN
RIBBON
MAINPATH
KATEG
STARTLIS
LISTA
CLEARRIB
TAKNIE
KASUJKAT
TALKz
COMPATIBLEz
_qz90ohziu
 Kategoria 
_curobj=objnum(m.exiterr)
_curobj=objnum(m.exitok)
kateg
_qz90ohziu
Nazwa:
Opis :
@!TK XXXXXXXXXX
@K XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
@*HN Zapisz
@*HT Zaniechaj
_qz90ohziu
      TAG
02    RIBBON
585CURRAREA
NTALKSTAT
GCOMPSTAT
       _QZ90OHZIUESC
      F10
      KATEG
    _QZ90OHZVCOPISKAT
  EXITOK
   _QZ90OI01UEXITERR
Kategoria juF
 istnieje!
      RETVAL
   ACT
585KATEG
Kategoria juF
 istnieje!
kateg
      RETVAL
   ACT
585KATEG
G_QZ90OHZVC
_QZ90OI01U
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
exactz
 Razem 
_lowzorzec
_olistabr
_losumy
TYTUL
DLWZORCA
aMYILOSC
AALIAS
TOMPLUS
qTOMENTER
TOMDRUK
ATOMPODGLADTOMMINUS
ATOMBLOKUJ
TOMANULUJ
POMOC
SUMGDZIE
1SUMILE
SUMWYR
qPOLA1
INDEX1
1POLA2
INDEX2
LPOLA3
INDEX3
POLA4
\KSIINDEX4
EM\POLA5
EGA\INDEX5
TARNUMER
*IOPEN
EXACT
S.FXPL
_LOSUMY
_LOWZORZEC_OLISTABR
SETRIB
ZECREFRSUMY
PRZEGLAD
CLEARRIB
{DNARROW}
{UPARROW}
{TAB}
 Koniec danych 
 PoczF
tek danych 
 Koniec danych 
 PoczF
tek danych 
 MiesiF
c jest zablokowany 
 Zapis jest zablokowany 
Nie moF
esz poprawia
DO &tomenter
DO &tomenter
 MiesiF
c jest zablokowany 
 Zapis jest zablokowany 
Nie moF
esz usuwa
DO &tomminus
do &tomminus
 MiesiF
c jest zablokowany 
Nie moF
esz dodawa
DO &tomplus	
do &tomplus	
DO &tomdruk
DO &tomblokuj
DO &tomanuluj			
DO &tompodglad
STRING
LOKATA
WIERSZE
MYQUIT
MYSZR
aMYSZC
SUMILE
ASUMY
qDLWZORCA
ATCOL
DGLADTROW
AFROW
TOMENTER
TOMBLOKUJ
BLOKUJ
BLOKADA
1REFRSUMY
SETRIB
LPOMOC
_LOWZORZECTOMMINUS
BLOKUJ
TOMPLUS
BLOKUJ
MYILOSC
ECPRZEGLAD
XTOMDRUK
TOMANULUJ
TOMPODGLAD
NUMER
WYKAZ
POLA1
INDEX1
POLA2
INDEX2
aPOLA3
INDEX3
AINDEX4
POLA5
qINDEX5
MYILOSC
SET ORDER TO &kolejnosc
BROWSE NOWAIT WINDOW _dlabrow 	IN WINDOW _olistabr TITLE "Dane" COLOR SCHEM 10 	FIELDS &pola	
{INS}
KOLEJNOSC
_DLABROW
aTCOL
SUM ALL &sumwyr TO ARRAY sumy FOR not poprawka and typ <> 50
SUM ALL &sumwyr TO ARRAY sumy 
Razem
99,999,999,999.99 
LEJNOSC
ILREC
SUMWYR
SUMILE
aTOMANULUJ
_LOSUMY
ASUMGDZIE
PRZEGLAD
WYKAZ
REFRSUMY
@ srows()-1, 0 say replicate(" ", scols()-1 ) COLOR &col
RIBBON
SETRIB
CLEARRIB
m.xloc = m.xloc
errors
\<Nie
\<Tak
ECODE1
DEFAULTANSY0
OLDALIAS
SYSPATH
SERRWIN
ERRCODE
ERRORS
MESSAGE
@ wrows()-1, 0 say padr(m.text, wcols()-1," " ) COLOR &col
RRORSWIND
ESSAGCOL
..\KAT\KAT.PRG
C:\KSIEGA\SYSTEM\
..\KAT\KAT.SPR
..\COMMON\STARTLIS.PRG
..\COMMON\LISTA.PRG
..\COMMON\CLEARRIB.PRG
..\COMMON\TAKNIE.PRG
..\COMMON\SETRIB.PRG
KAT.FXP
KAT.SPX
STARTLIS.FXP
LISTA.FXP
CLEARRIB.FXP
TAKNIE.FXP
SETRIB.FXP