>TYPE   	D
>NAME   	sevelpl2.d
>CODE   	sevelpl2.cod
>BY     	@(#)$Author: Helene $
>DATE   	@(#)$Date: 07-02-26 11:26 $
>VERSION	@(#)$Revision: 2 $
>ID     	16010

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

>TEXTINFO ROWS 6 SIZE 157
#id    value    flags    text
IDL_100  100  -  Lagerplats måste anges
IDL_101  101  -  Initierar lagerplatser
IDL_102  102  -  Lagret har inte lagerplatshantering
IDL_103  103  -  Blankt = Alla
IDL_104  104  -  Hämtar lpl från lager eller artikel
IDL_105  105  -  Hämtar lpl från artikeln


>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    95   170 SB	-	-	"-"	  0	"Skapar lagerplatser med saldo"

>FORM MAIN ROWS 9 SIZE 80 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
CE    17    6   76  262   90 -	HPc	-	cbStock	#8828	""
XB    20   20   10   13   76 -	P	-	xbDefaultLpl	-	"Hämta std lpl"
D     15   34   76   13   60 A10	PU	-	edLpl	-	""
D     16   48   76   13   60 A20	PU	-	edBatch	-	""
B3    11   64   52   15   55 -	QP	-	pbOk	-	"ok.bmp,&Ok"
B3     2   64  110   15   55 -	QP	-	-	-	"exit.bmp,St&äng"
T     18   36   12   11   60 -	p	-	txLpl	-	"Huvudlagerplats:"
T     19   50   12   11   60 -	p	-	txBatch	-	"Huvudbatch:"
T     13    8   12   11   60 -	Hp	-	txStock	-	"Lager:"

>SOURCE
