>TYPE   	D
>NAME   	3170.d
>CODE   	3170.cod
>BY     	@(#)$Author: Hg $
>DATE   	@(#)$Date: 06-12-29 14:14 $
>VERSION	@(#)$Revision: 3 $
>ID     	10502

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

>TEXTINFO ROWS 4 SIZE 76
#id    value    flags    text
IDL_100  100  -  Artikel:%1
IDL_101  101  -  Artikeln ändrad, spara?
IDL_102  102  -  Fel i bläddring
IDL_103  103  -  Artikelkoden (%1) saknas


>STACK ROWS 200 SIZE 3000

>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	0xc0c0c0
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     20    90   185   315 SB	-	-	"-"	  0	"3170 Butikspriser"

>FORM MAIN ROWS 5 SIZE 51 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   621    0    4   16  453 -	PhmZ	-	win4	-	""
TB   124   46    2   92  308 -	PZ	-	tab1	-	"Ändra butikspris"
B3    12  140    4   15   50 -	TP	-	pbSave	-	"save.bmp,&Spara"
B3     2  141  258   15   50 -	xTPhz	-	pbCancel	-	"exit.bmp,St&äng"
WW 25674   22    6   18  302 -	P	-	win7	-	""

>FORMFILES MAIN ROWS 0
#Id	sp
>FORM tab1 ROWS 2 SIZE 2 "623 - tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW 24030   16    2   72  298 -	P	-	win6	-	""
WW 25683   14    2   74  304 -	P	-	win8	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>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  455 -	pZ	-	-	-	""

>FORMFILES win4 ROWS 0
#Id	sp
>FORM lcUtlbet ROWS 2 SIZE 20 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   2215    1    1   11   34 -	Hp	-	-	#15153	"Språkkod"
T   2216    0   32   11  184 -	Hp	-	-	#15155	"Beteckning"

>FORM win6 ROWS 14 SIZE 111 "win6"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D    103    4   50   12   60 -	PU	-	edCode	#1001	""
B3 25673    4  134   13   15 -	xTpF	-	pbCode	-	"seek.bmp"
T    111    6  152   11   42 -	p	-	-	-	"Benämning:"
D    108    4  194   13  100 -	pO	-	edName	#1021	""
T    110    6    6   12   42 -	p	-	-	-	"Artikelkod:"
D  25665   18   50   13   60 -	pO	-	edPrice	#1154	""
T  25666   20    6   11   42 -	p	-	-	-	"Grundpris:"
CE 25667   32   50  137   90 -	Pc	-	cbVat	#1191	""
T  25638   34    6   11   42 -	p	-	-	-	"Momskod:"
D  25639   46   50   13   90 -	P	-	edPriceAndVat	#1155	""
T  25641   48    6   11   42 -	p	-	-	-	"Butikspris:"
B3 25704    4  114   13    9 -	xQp	-	pbPrev	-	"arrowl.bmp"
B3 25705    4  124   13    9 -	xQp	-	pbNext	-	"arrowr.bmp"
XB 25706   46  152   10   92 -	P	-	xbUpdatePriceSingle	-	"Uppdatera grundpris"

>FORMFILES win6 ROWS 0
#Id	sp
>FORM win7 ROWS 2 SIZE 51 "win7"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3 25699    2    2   15   50 -	TPM	-	pbChangePrice	-	"nothing.bmp,Ä&ndra pris"
B3 25700    2   58   15   50 -	TPM	-	pbAdjust	-	"Nothing.bmp,&Prisjustering"

>FORMFILES win7 ROWS 0
#Id	sp
>FORM win8 ROWS 17 SIZE 149 "win8"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T  25684    6    6   11   52 -	p	-	-	-	"Från artikel:"
D  25686    4   64   13   60 -	PU	-	edFromCode	#841	""
B3 25698    4  126   13   15 -	xTpF	-	pbFromCode	-	"seek.bmp"
T  25685    6  146   11   35 -	p	-	-	-	"Till artikel:"
D  25687    4  186   13   60 -	PU	-	edToCode	#849	""
B3 25697    4  246   13   15 -	xTpF	-	pbToCode	-	"seek.bmp"
T  25688   20    6   11   52 -	p	-	-	-	"Artikeltyp:"
D  25702   18   64   13   60 -	P	-	edType	#851	""
B3 25703   18  126   13   15 -	xTpF	-	pbType	-	"seek.bmp"
XB 25696   32    4   13   67 -	P	-	xbGetPrice	#861	"Hämta grundpris:"
T  25690   48    6   11   52 -	p	-	-	-	"Justering %:"
D  25691   46   64   13   38 -	P	-	edAdjustmentPercent	#8771	""
T  25692   48  108   11   44 -	p	-	-	-	"Justering SEK"
D  25693   47  156   13   38 f12.2	P	-	edAdjustmentMoney	#8571	""
T  25694   62    6   11   52 -	p	-	-	-	"Avrundning:"
D  25695   60   64   13   38 -	P	-	edRoundOff	#8331	""
XB 25707   62  108   10   86 -	P	-	xbUpdatePriceMulti	-	"Uppdatera grundpris"

>FORMFILES win8 ROWS 0
#Id	sp
>SOURCE
