>TYPE   	D
>NAME   	sevevben.d
>CODE   	sevevben.cod
>BY     	@(#)$Author: Andreas $
>DATE   	@(#)$Date: 05-09-16 11:38 $
>VERSION	@(#)$Revision: 3 $
>ID     	8155

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

>TEXTINFO ROWS 9 SIZE 258
#id    value    flags    text
IDL_100  100  -  Överflyttning kunde inte utföras, det finns redan en %1 på %2
IDL_101  101  -  försäljningsbenämning
IDL_102  102  -  kundbenämning
IDL_103  103  -  Språkkod måste anges
IDL_104  104  -  Företagskod saknas
IDL_105  105  -  Artikel saknas
IDL_106  106  -  Inga poster att överföra
IDL_107  107  -  Kunde inte hitta registerposten
IDL_108  108  -  Alla poster i listkontrollen kommer att raderas


>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   216   360 SB	-	-	"-"	  0	"Överföring av benämningar från gamla valutapriser"

>FORM MAIN ROWS 6 SIZE 88 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR    46    6    5  118  350 -	pWZ	-	lcTable	-	""
TB    81  127    5   50  352 -	pZw	-	tab1	-	"&Överföring"
B3    91  183    6   15   60 -	QP	-	pbMove	-	"ok.bmp,Överför"
B3    92  183   70   15   60 -	QP	-	pbDelete	-	"delete.bmp,Ta bort"
B3    93  183  134   15   60 -	QP	-	pbDeleteAll	-	"delete.bmp,Ta bort alla "
B3    60  183  295   15   60 -	TPwz	-	pbExit	-	"exit.bmp,St&äng"

>FORM lcTable ROWS 5 SIZE 57 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T     76    0    0   11   50 -	Hp	-	-	#5701	"Artikelkod"
T     79   19   46   11   50 -	Hp	-	-	#5705	"Företagskod"
T     82    2  102   11   20 -	Hp	-	-	#5707	"Valuta"
T     86    3  126   11  110 -	Hp	-	-	#5721	"Benämning"
T     84   18  182   11  160 -	Hp	-	-	#836	"Överflyttad till"

>FORMFILES lcTable ROWS 3
#Id	sp
30	r
34	r
36	r
>FORM tab1 ROWS 1 SIZE 1 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW    62   13    3   34  344 -	P	-	win1	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win1 ROWS 5 SIZE 93 "win1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T     51    6    2   11   54 -	p	-	-	-	"Från valutakod:"
D     89    4   62   13   30 -	pO	-	edCurrency	#5707	""
T     52   20    2   11   54 -	p	-	-	-	"Till språkkod:"
CE    87   18   62   50   58 -	Pc	-	cbLanguage	#854	""
XB    90   18  138   13  203 -	RP	-	rbAll	-	"Överför alla poster med valutakoden till nya med språkkoden"

>FORMFILES win1 ROWS 0
#Id	sp
>SOURCE
