>TYPE   	D
>NAME   	serutl.d
>CODE   	serutl.cod
>BY     	@(#)$Author: Pelle $
>DATE   	@(#)$Date: 07-03-12 12:59 $
>VERSION	@(#)$Revision: 5 $
>ID     	21040

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

>TEXTINFO ROWS 12 SIZE 259
#id    value    flags    text
IDL_100  100  -  Fel artikelkod
IDL_101  101  -  Fel lager
IDL_102  102  -  Serienummer måste anges
IDL_103  103  -  Serienumret saknas
IDL_104  104  -  F6: Kundnamn
IDL_105  105  -  Reserverad för annan order
IDL_106  106  -  F2: Info
IDL_107  107  -  Löpnummer %1 saknas, måste rättas manuellt.
IDL_108  108  -  Serienummer finns redan i ordern
IDL_109  109  -  F6:Auto
IDL_110  110  -  Antalet rader överstiger %1
IDL_111  111  -  Antalet rader understiger %1


>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   255   295 SBL	-	-	"-"	  0	"Serienummer"

>FORM MAIN ROWS 7 SIZE 94 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
TB    58   98    4  122  286 -	P	-	tab1	-	"Serie"
GR    12    4    4   90  286 -	p	-	lcTable	-	""
B3   124  222    4   15   55 -	TP	-	pbSave	-	"save.bmp,&Spara rad"
B3   125  222   62   15   55 -	xTP	-	pbNew	-	"new.bmp,&Ny rad"
B3   126  222  120   15   55 -	TP	-	pbDelete	-	"del.bmp,&Ta bort rad"
PB   129  222  178   15   55 -	P	-	pbRegister	-	"Ny&registrera"
B3     2  222  236   15   55 -	xTP	-	pbExit	-	"exit.bmp,St&äng"

>FORM lcTable ROWS 6 SIZE 40 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T    145    2    1   11   41 -	Hph	-	-	#1610	"Löpnummer"
T    146    2   43   11   26 -	Hph	-	-	#1615	"Serienr"
T    147    2   69   11  144 -	Hp	-	-	#1621	"Benämning"
T    148    2  213   11   16 -	Hp	-	-	#1623	"Typ"
T    149    2  229   11   17 -	HpL	-	-	#1629	"Res"
T    150    2  246    8   16 -	HpL	-	-	#861	"Lev"

>FORMFILES lcTable ROWS 3
#Id	sp
177	r
226	r
16	r
>FORM tab1 ROWS 1 SIZE 1 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW    59   16    4  104  280 -	P	-	win2	-	""

>FORM win2 ROWS 23 SIZE 183 "win2"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D    101    2   50   13   60 -	PU	-	edSerialNumber	-	""
D    103   16   50   13   60 -	PU	-	edSerie	#1615	""
D    105   30   50   13  140 -	pO	-	-	#1621	""
DP   107   44   50   13   44 D8	P	-	dpDeliveryDate	#1660	""
DP   111   58   50   13   44 D8	p	-	dpWarranty	#1661	""
D    113   72   50   13  140 -	p	-	-	#1625	""
D    115   86   50   13  140 -	P	-	edUser	#1671	""
T    108   46    2   11   44 -	p	-	-	-	"Utlevererad:"
D    109    2  221   13   54 -	pfO	-	edNumber	-	""
T    110    3  180   11   36 -	p	-	-	-	"Antal:"
T    112   60    2   11   44 -	p	-	txWarranty	-	"Kundgaranti:"
T    106   32    2   11   44 -	p	-	-	-	"Benämning:"
T    114   74    2   11   44 -	p	-	-	-	"Info 1:"
T    116   88    2   11   44 -	p	-	-	-	"Användare:"
B3   117    2  130   13   15 -	SxTpfF	-	pbSerialNumber	-	"seek.bmp"
B3   123   16  130   13   15 -	SxTpfF	-	pbSerie	-	"seek.bmp"
B3   130    2  112   13    9 -	SxTpfF	-	pbPrevSerialNumber	-	"arrowl.bmp"
B3   131    2  120   13    9 -	SxTpfF	-	pbNextSerialNumber	-	"arrowr.bmp"
B3   132   16  112   13    9 -	SxTpfF	-	pbPrevSerie	-	"arrowl.bmp"
B3   133   16  120   13    9 -	SxTpfF	-	pbNextSerie	-	"arrowr.bmp"
T    151    4    2   11   44 -	p	-	-	-	"Löpnummer:"
T    152   18    2   11   44 -	p	-	-	-	"Serienummer:"
PB   153   30  220   13   45 -	HDp	-	pbDSAReload	-	"DSA:Reload"

>SOURCE
