>TYPE   	D
>NAME   	DSINDEX.d
>CODE   	DSINDEX.cod
>BY     	@(#)$Author: Hakan $
>DATE   	@(#)$Date: 08-01-21 14:07 $
>VERSION	@(#)$Revision: 1 $
>ID     	28537

>FILES ROWS 0
#type id  name        dbtype mode autoload r0 r1 r2 r3 r4 r5 comment

>TEXTINFO ROWS 7 SIZE 116
#id    value    flags    text
IDL_101  101  -  Index finns redan
IDL_102  102  -  Index måste anges
IDL_103  103  -  Benämning måste anges
IDL_104  104  -  Fält måste anges
IDL_105  105  -  Datanumret saknas
IDL_106  106  -  Nytt index
IDL_107  107  -  Ändra index


>STACK ROWS 100 SIZE 5000

>FONT ROWS 9
#id Hgt Wth Esc Ori Wgt Ita  Ul Sth Chs Opr Clp Qua Pch Name
1    -9   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
2   -11   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
3   -11   0   0   0 400   1  0   0   0   0   0   0   0 "Arial"
4   -11   0   0   0 700   0  0   0   0   0   0   0   0 "Arial"
5   -13   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
6   -13   0   0   0 400   1  0   0   0   0   0   0   0 "Arial"
7   -13   0   0   0 700   0  0   0   0   0   0   0   0 "Arial"
8   -16   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
9   -19   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"


>COLOR ROWS 16
#id color	comment
1   0x0        	""
2   0x808080   	""
3   0x80       	""
4   0x8080     	""
5   0x8000     	""
6   0x808000   	""
7   0x800000   	""
8   0x800080   	""
9   0xffffff   	""
A   0xc0c0c0   	""
B   0xff       	""
C   0xffff     	""
D   0xff00     	""
E   0xffff00   	""
F   0xff0000   	""
G   0xff00ff   	""


>BRUSH ROWS 5 SIZE 100
#id type	text
1   0	0xff0000
2   1	pattern
3   2	tegel.bmp
5   4	0xff
6   5	0x0


>APPEVENTS ROWS 0
#id Eventname	ParamList


>WINDOW ROWS 1
#id       x     y    cy    cx sp1	sp2	Bitmap	font	size	caption
5511     10    10   120   200 SBL	-	-	"-"	  0	"Index"

>FORM MAIN ROWS 3 SIZE 31 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW 28516    6    8   76  186 -	P	-	win1	-	""
B3    45   88   92   15   50 -	TP	-	pbOk	-	"ok.bmp,&Ok"
B3     2   88  144   15   50 -	xTP	-	pbCancel	-	"cancel.bmp,Av&bryt"

>FORM win1 ROWS 9 SIZE 51 "win1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D     47    4   54   13   42 A6	PU	-	edIndex	-	""
D     48   18   54   13  106 a15	P	-	edLabel	#-683	""
D     49   32   54   13  106 V80.-0123456789,	P	-	edField	#-684	""
XB    54   52   55   10   50 -	RP	-	-	#-685	"Unikt index"
T     51   34    4   10   48 -	p	-	-	-	"Fält:"
T     52    6    4   10   22 -	p	-	-	-	"Index:"
B3    53   32  162   13   15 -	SxTpfF	-	pbField	-	"seek.bmp"
T     50   20    4   10   48 -	p	-	-	-	"Benämning:"
T     55    6   42   11   12 -	p	-	-	-	"U_"

>FORMFILES win1 ROWS 0
#Id	sp
>SOURCE
