>TYPE   	D
>NAME   	serret.d
>CODE   	serret.cod
>BY     	@(#)$Author: Helene $
>DATE   	@(#)$Date: 05-05-23 11:38 $
>VERSION	@(#)$Version:$
>ID     	22511

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

>TEXTINFO ROWS 4 SIZE 163
#id    value    flags    text
IDL_100  100  -  Mätarställning måste anges
IDL_101  101  -  Mätarställning lägre än aktuell mätarställning
IDL_102  102  -  Kan inte hitta %1 i register %2. Ec=?%3
IDL_103  103  -  F6: Kvar hos kund - Lägg kundnamn som Placering.


>STACK ROWS 100 SIZE 5000

>FONT ROWS 12
#id Hgt Wth Esc Ori Wgt Ita  Ul Sth Chs Opr Clp Qua Pch Name
1   -21   0   0   0 400   0  0   0   0   0   0   0   0 "MS Sans Serif"
2   -17   0   0   0 400   1  1   0   0   0   0   0   0 "Times Rmn"
3   -21   0   0   0 400   0  0   0   0   0   0   0   0 "President"
4    -9   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
5   -11   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
6   -11   0   0   0 400   1  0   0   0   0   0   0   0 "Arial"
7   -11   0   0   0 700   0  0   0   0   0   0   0   0 "Arial"
8   -13   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
9   -13   0   0   0 400   1  0   0   0   0   0   0   0 "Arial"
A   -13   0   0   0 700   0  0   0   0   0   0   0   0 "Arial"
B   -16   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
C   -19   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"


>COLOR ROWS 8
#id color	comment
1   0xff0000   	""
2   0xff       	""
3   0xff00ff   	""
4   0xffffff   	""
5   0xc0c0c0   	""
6   0x80       	""
7   0x808080   	""
8   0x0        	""


>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   254   295 SBL	-	-	"-"	  0	"Individer"

>FORM MAIN ROWS 4 SIZE 43 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR    12    4    4   90  286 -	pWZ	-	lcTable	-	""
TB    58   96    4  120  286 -	PZw	-	tab1	-	"Serie"
B3   124  220    4   15   55 -	TPw	-	pbSave	-	"save.bmp,&Spara rad"
B3     2  220  236   15   55 -	xTPwz	-	pbExit	-	"exit.bmp,St&äng"

>FORM lcTable ROWS 4 SIZE 38 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T    119    2    1    8   41 -	Hph	-	-	#1610	"Löpnummer"
T    120    2   43    8   56 -	Hph	-	-	#1615	"Serienr"
T    121    2   99    8  144 -	Hp	-	-	#1621	"Benämning"
T    141    0  242   11   32 -	HpL	-	-	#17818	"Återlämna"

>FORMFILES lcTable ROWS 1
#Id	sp
16	r
>FORM tab1 ROWS 1 SIZE 1 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW    59   14    4  102  280 -	PZ	-	win2	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win2 ROWS 15 SIZE 112 "win2"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D    101    2   80   13   60 -	pUO	-	edSerialNumber	-	""
D    103   16   80   13   60 -	pUO	-	edSerie	#1615	""
D    105   30   80   13  140 -	pO	-	-	#1621	""
D    146   44   80   13  140 -	pO	-	edCurrentMeterreading	-	""
XB   140   58    0   13   88 -	P	-	xbReturn	-	"Återlämna"
D    144   72   80   13  140 -	P	-	edPlace	-	""
D    142   86   80   13  140 H12	P	-	edMeterReading	-	""
D    109    2  221   13   54 -	pfO	-	edNumber	-	""
T    135   18    2   11   76 -	p	-	-	-	"Serienummer:"
T    106   32    2   11   76 -	p	-	-	-	"Benämning:"
T    143   88    2   11   76 -	p	-	txMeterReading	-	"Mätarställning:"
T    110    3  180   11   36 -	p	-	-	-	"Antal:"
T    145   74    2   11   76 -	p	-	-	-	"Placering:"
T    134    4    2   11   76 -	p	-	-	-	"Löpnummer:"
T    147   46    2   11   76 -	p	-	-	-	"Mätarställning vid utlev:"

>FORMFILES win2 ROWS 0
#Id	sp
>SOURCE
