>TYPE   	D
>NAME   	DSREG.d
>CODE   	DSREG.cod
>BY     	@(#)$Author: Hakan $
>DATE   	@(#)$Date: 08-03-26 8:25 $
>VERSION	@(#)$Revision: 23 $
>ID     	28533

>FILES ROWS 4
#type id  name        dbtype mode autoload r0 r1 r2 r3 r4 r5 comment
T     -650  PYDDS      0      0    1        0  0  0  0  0  0  
T     -680  PYINDEX3      0      0    1        0  0  0  0  0  0  
T     80  pyvar      0      0    1        0  0  0  0  0  0  
T     -750  PRG:SEINDEX      0      0    1        0  0  0  0  0  0  

>TEXTINFO ROWS 8 SIZE 176
#id    value    flags    text
IDL_100  100  -  Inget Lu ID angivet
IDL_101  101  -  Ej tillåten att ändra
IDL_102  102  -  Kan ej ladda %1
IDL_103  103  -  Lu  %1 saknas
IDL_105  105  -  Datanummer ingår i index och kan ej tas bort
IDL_106  106  -  Design Studio krävs för denna dialog!
IDL_107  107  -  Indexregister
IDL_108  108  -  Tabell


>STACK ROWS 500 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   312   370 SBL	-	-	"-"	  0	"5510 Anpassa register"

>FORM MAIN ROWS 6 SIZE 42 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW    21   20    2   18  286 -	P	-	win2	-	""
WW    11   40    2  246  288 -	PWZ	-	win1	-	""
B3 28519   22  296   15   60 -	xTpz	-	pbDSRegs	-	"info.bmp,&DS-register"
WW    33   66  294  180   72 -	PWz	-	win3	-	""
B3     2  270  296   15   60 -	TPwz	-	-	-	"exit.bmp,St&äng"
WW 28518    0    2   16  364 -	PhmZ	-	win4	-	""

>FORMFILES MAIN ROWS 5
#Id	sp
-750	r
680	r
670	r
650	r
80	r
>FORM win1 ROWS 12 SIZE 58 "Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T     12   12    6   10   24 -	p	-	txLu	-	"LU:"
D     13   10   30   13   46 h5	DP	-	edLu	#8847	""
T     14   12  120   10   40 -	p	-	-	-	"Register:"
D     15   10  161   13   68 A8	DpU	-	edRegister	-	""
T     16   28    6   10   24 -	p	-	-	-	"Typ:"
CB    17   26   30   50   62 -	DP	-	cbRegType	-	""
D     18   26  160   13  108 a15	DP	-	edRegLabel	-	""
T     19   28  120   10   40 -	p	-	-	-	"Benämning:"
TB    25   60    4  180  278 -	PWZ	-	tab1	-	"&Fält,&Index"
B3 24019   10   78   13   15 -	SxTpfF	-	pbLu	-	"seek.bmp"
WW 24032   42    4   14  278 -	HP	D2	win7	-	""
FU    20    0    0  244  286 -	pWZ	-	-	-	""

>FORMFILES win1 ROWS 5
#Id	sp
-750	r
680	r
670	r
650	r
80	r
>FORM win2 ROWS 2 SIZE 48 "Commands"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3    23    2   80   15   77 -	TDPM	-	pbNew	-	"new.bmp,&Nytt register"
B3    24    2    0   15   77 -	TPM	-	pbOpen	-	"open.bmp,&Öppna register"

>FORMFILES win2 ROWS 5
#Id	sp
-750	r
-680	r
-670	r
-650	r
80	r
>FORM win4 ROWS 23 SIZE 23 "Tool"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
FR  1990    0    0   13    1 -	Hp	-	-	-	""
FR  1991    0    0   13    1 -	Hp	-	-	-	""
FR  1992    0    0   13    1 -	Hp	-	-	-	""
FR  1993    0    0   13    1 -	Hp	-	-	-	""
FR  1994    0    0   13    1 -	Hp	-	-	-	""
FR  1995    0    0   13    1 -	Hp	-	-	-	""
FR  1996    0    0   13    1 -	Hp	-	-	-	""
B3  2000    0    8   13   15 -	STHpfF	-	pbTool	-	""
B3  2001    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2002    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2003    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2004    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2005    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2006    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2007    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2008    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2009    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2010    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2011    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2012    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2013    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2014    0    0   13   15 -	STHpfF	-	pbTool	-	""
FU  4071    0    0   15  364 -	pZ	-	-	-	""

>FORMFILES win4 ROWS 5
#Id	sp
-750	r
680	r
670	r
650	r
80	r
>FORM tab1 ROWS 2 SIZE 2 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW 24003   14    0  160  272 -	PWZ	-	win5	-	""
WW 24011   14    2  160  272 -	PWZ	-	win6	-	""

>FORMFILES tab1 ROWS 5
#Id	sp
-750	r
-680	r
-670	r
-650	r
80	r
>FORM win3 ROWS 1 SIZE 15 "Operations"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
PB    36   48    2   15   60 -	xP	-	pbConvert	-	"&Konvertera..."

>FORMFILES win3 ROWS 5
#Id	sp
-750	r
680	r
670	r
650	r
80	r
>FORM win5 ROWS 7 SIZE 71 "Fields"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
RB 24004    8   28   10   50 -	RP	-	rbAllFields	-	"&Alla fält"
RB 24005    8   84   10   58 -	RP	-	rbExtraFields	-	"&Egna fält"
GR 24007   24    4  116  260 -	PWZ	-	lcFields	-	""
PB 24008  144    4   14   70 -	xPw	-	pbAddField	-	"N&ytt fält..."
PB 24009  144   78   14   70 -	xPw	-	pbEditField	-	"Än&dra fält..."
PB 24010  144  152   14   70 -	xPw	-	pbDeleteField	-	"&Ta bort fält"
GB 24006    0    4   20  144 -	p	-	-	-	"Visa"

>FORMFILES win5 ROWS 5
#Id	sp
-750	r
680	r
670	r
650	r
80	r
>FORM win6 ROWS 7 SIZE 76 "Indexes"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
RB 24012    8   28   10   46 -	RP	-	rbAllIndexes	-	"&Alla index"
RB 24013    8   84   10   54 -	RP	-	rbExtraIndexes	-	"&Egna index"
GR 24015   24    4  116  260 -	PWZ	-	lcIndexes	-	""
PB 24016  144    4   14   70 -	xPw	-	pbAddIndex	-	"N&ytt index..."
PB 24017  144   78   14   70 -	xPw	-	pbEditIndex	-	"Än&dra index..."
PB 24018  144  152   14   70 -	xPw	-	pbDeleteIndex	-	"&Ta bort index"
GB 24014    0    4   20  144 -	p	-	-	-	"Visa"

>FORMFILES win6 ROWS 5
#Id	sp
-750	r
680	r
670	r
650	r
80	r
>FORM lcFields ROWS 7 SIZE 42 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T  24020    1    1   10   34 -	Hp	-	-	#8601	"DataNr"
T  24021    1   35   10   80 -	Hp	-	-	#8831	"Benämning"
T  24022    1  115   10   30 -	RHp	-	-	#8844	"Längd"
T  24023    1  145   10   24 -	Hp	-	-	#8631	"Typ"
T  24024    1  169   10   30 -	Hp	-	-	#8842	"Pack"
T  24025    1  199   10   24 -	Hp	-	-	#8011	"Dec"
T  24026    1  223   10   24 -	CHpL	-	-	#8632	"Höger"

>FORMFILES lcFields ROWS 5
#Id	sp
-750	r
680	r
670	r
650	r
80	r
>FORM lcIndexes ROWS 4 SIZE 27 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T  24028    1    1   10   40 -	Hp	-	-	#8130	"Index"
T  24029    1   41   10   90 -	Hp	-	-	#8830	"Benämning"
T  24030    1  131   10   84 -	Hp	-	-	#8833	"Fält"
T  24031    1  215   10   30 -	CHpL	-	-	#8621	"Unikt"

>FORMFILES lcIndexes ROWS 2
#Id	sp
-750	r
80	r
>FORM win7 ROWS 2 SIZE 42 "win7"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T  24033    4   18    9  214 -	p	C9D2	-	-	"Registret är inte konverterat!"
BM 24034    2    4    8   10 -	Tp	-	-	-	"exclam.bmp"

>FORMFILES win7 ROWS 5
#Id	sp
-750	r
-680	r
-670	r
-650	r
80	r
>SOURCE
