>TYPE   	D
>NAME   	828.d
>CODE   	828.cod
>BY     	@(#)$Author: Jessica $
>DATE   	@(#)$Date: 06-12-21 9:24 $
>VERSION	@(#)$Revision: 4 $
>ID     	8164

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

>TEXTINFO ROWS 6 SIZE 98
#id    value    flags    text
IDL_102  102  -  Le&veranssätt e-line
IDL_103  103  -  Radera %1?
IDL_108  108  -  Transportsättet högst upp
IDL_109  109  -  Transportsättet längst ner
IDL_110  110  -  Landkod
IDL_111  111  -  Land


>STACK ROWS 100 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   300   375 SBL	-	-	"-"	  0	"828 Leverans- och betalningssätt e-line"

>FORM MAIN ROWS 11 SIZE 101 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR  4086   51    4   63  322 -	P	-	lcTransportMethod	-	""
WW   621    0    4   16  308 -	PhmZ	-	win4	-	""
TB   124  135    4  118  366 -	PZ	-	tab1	-	"Betalningssätt,Frakttabell"
B3     2  257  320   15   50 -	xTPhz	-	pbCancel	-	"exit.bmp,St&äng"
WW   627   19    3   18  335 -	Ph	-	win5	-	""
T   4094   40    4   11   60 -	p	-	-	-	"Leveranssätt"
PB  4088  115    4   13   39 -	P	-	pbNewTransportMethod	-	"Ny"
PB  4089  115   46   13   39 -	P	-	pbEditTransportMethod	-	"Ändra"
PB  4090  115   88   13   39 -	P	-	pbDeleteTransportMethod	-	"Ta bort"
B3  4105   51  330   13   40 -	QP	-	pbUp	-	"up.bmp, Upp"
B3  4106   65  330   13   40 -	QP	-	pbDown	-	"down.bmp,Ned"

>FORMFILES MAIN ROWS 1
#Id	sp
15080	r
>FORM tab1 ROWS 2 SIZE 2 "623 - tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4085   12    2  104  360 -	HP	-	win7	-	""
WW  4109   12    2  104  360 -	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  307 -	pZ	-	-	-	""

>FORM win5 ROWS 2 SIZE 7 "head"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T    110    4    1   11   25 -	p	-	-	-	"Land:"
CE  4108    1   30   98   90 -	Pc	-	cbCountry	#8823	""

>FORMFILES win5 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 win7 ROWS 10 SIZE 79 "Betalningssätt"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR  4087   14    5   70  170 -	P	-	lcPaymentMethod	-	""
PB  4091   88    5   13   39 -	P	-	pbNewPaymentMethod	-	"Ny"
PB  4092   88   47   13   39 -	P	-	pbEditPaymentMethod	-	"Ändra"
PB  4093   88   89   13   39 -	P	-	pbDeletePaymentMethod	-	"Ta bort"
T   4095    4    5   11   60 -	p	-	-	-	"Betalningssätt"
GR  4110   14  181   70  170 -	P	-	lcPaymentCurrency	-	""
T   4111    4  181   11   94 -	p	-	-	-	"Valutabelopp betalningssätt"
PB  4112   88  181   13   39 -	P	-	pbNewPaymentCurrency	-	"Ny"
PB  4113   88  223   13   39 -	P	-	pbEditPaymentCurrency	-	"Ändra"
PB  4114   88  265   13   39 -	P	-	pbDeletePaymentCurrency	-	"Ta bort"

>FORMFILES win7 ROWS 0
#Id	sp
>FORM lcTransportMethod ROWS 6 SIZE 66 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4107    1    1   11   17 -	Hph	-	-	#15274	"Prio"
T   4103    1   19   11   30 -	Hph	-	-	#15271	"Transportkod"
T   4102    1   49   11   81 -	Hph	-	-	#15205	"Transportsätt"
T   4097    1  130   11   50 -	RHp	-	-	#15272	"Frakt"
T   4098    1  180   11   50 -	RHp	-	-	#15273	"Beloppsgräns"
T   4135    1  230   11   70 -	RHp	-	-	#15275	"Övre viktgräns"

>FORMFILES lcTransportMethod ROWS 2
#Id	sp
152	r
15270	r
>FORM lcPaymentMethod ROWS 4 SIZE 59 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4099    1    1   11   20 -	Hph	-	-	#15292	"Betalningskod"
T   4104    1   21   11   50 -	Hph	-	-	#15062	"Betalningssätt"
T   4100    1   71   11   40 -	RHp	-	-	#15293	"Exeditionsavgift"
T   4101    1  111   11   40 -	RHp	-	-	#15294	"Beloppsgräns"

>FORMFILES lcPaymentMethod ROWS 2
#Id	sp
15290	r
15060	r
>FORM win8 ROWS 10 SIZE 67 "Frakt"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR  4116   14    5   70  170 -	P	-	lcFreight	-	""
PB  4117   88    5   13   39 -	P	-	pbNewFreightWeight	-	"Ny"
PB  4118   88   47   13   39 -	P	-	pbEditFreightWeight	-	"Ändra"
PB  4119   88   89   13   39 -	P	-	pbDeleteFreightWeight	-	"Ta bort"
GR  4120   14  181   70  170 -	P	-	lcFreightCurrency	-	""
PB  4121   88  181   13   39 -	P	-	pbNewFreightCurrency	-	"Ny"
PB  4122   88  223   13   39 -	P	-	pbEditFreightCurrency	-	"Ändra"
PB  4123   88  265   13   39 -	P	-	pbDeleteFreightCurrency	-	"Ta bort"
T   4124    4  181   11   60 -	p	-	-	-	"Valutabelopp frakt"
T   4125    4    5   11   60 -	p	-	-	-	"Frakttabell"

>FORMFILES win8 ROWS 0
#Id	sp
>FORM lcPaymentCurrency ROWS 3 SIZE 28 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4126    1    1   11   45 -	Hp	-	-	#15083	"Valuta"
T   4127    1   46   11   30 -	RHp	-	-	#15084	"Exp.avg"
T   4128    1   76   11   60 -	RHp	-	-	#15085	"Beloppsgräns"

>FORMFILES lcPaymentCurrency ROWS 1
#Id	sp
15080	r
>FORM lcFreight ROWS 3 SIZE 22 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4129    1    1   11   20 -	Hp	-	-	#15093	"Nivå"
T   4130    1   21   11   30 -	RHp	-	-	#15092	"Vikt"
T   4131    1   51   11   60 -	RHp	-	-	#15094	"Fraktavgift"

>FORMFILES lcFreight ROWS 1
#Id	sp
15090	r
>FORM lcFreightCurrency ROWS 3 SIZE 35 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4132    1    1   11   45 -	Hp	-	-	#15083	"Valutakod"
T   4133    1   46   11   30 -	RHp	-	-	#15084	"Fraktavgift"
T   4134    1   76   11   60 -	RHp	-	-	#15085	"Beloppsgräns"

>FORMFILES lcFreightCurrency ROWS 0
#Id	sp
>SOURCE
