resource
users
CZYSHOW
BLOKAREA
MYILORESOURCE
ZVGACOLO2
GHERCULES
VGAMONO1
VGAMONO2
VGACOLO1
PODMPATH
3USERS
USERID
NAPIS
COLORLOOP
MAINMENU
podmioty
podmioty
symbol
StyczeF
Marzec
KwiecieF
Czerwiec
Lipiec
SierpieF
WrzesieF
dziernik
Listopad
GrudzieF
@20,0 SAY "U"+pl[18]+"ytkownik      : "+m.username color &n_color
@21,0 SAY "Aktualny podmiot: "+m.n_nazwa color &n_color
@22,0 SAY "Miesi"+pl[10]+"c         : "+m.n_miesiac+" "+alltrim(str(fullyear(m.roknr))) color &n_color
@23,0 SAY iif( alltrim(rachcrc) <> "", "Numer licencji  : "+alltrim(rachcrc), 	"Wersja demonstracyjna") color &n_color
N_MIESIAC
IOPEN
N_NAZWA
N_COLOR
PODMPATH
PODMIOTY
SYMBOL
FIRMNR
NAZWA
MIESNR
ESIAC
C:\KSIEGA\COLORS\COLORS.PRG
C:\KSIEGA\SYSTEM\
C:\KSIEGA\COMMON\NAPIS.PRG
C:\KSIEGA\COMMON\FULLYEAR.PRG
COLORS.FXP
NAPIS.FXP
FULLYEAR.FXP