>TYPE   	D
>NAME   	reg19030.d
>CODE   	reg19030.cod
>BY     	@(#)$Author: Peter $
>DATE   	@(#)$Date: 07-08-21 9:04 $
>VERSION	@(#)$Revision: 16 $
>ID     	18503

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

>TEXTINFO ROWS 12 SIZE 164
#id    value    flags    text
IDL_100  100  -  Procent
IDL_101  101  -  Antal
IDL_102  102  -  Vikt
IDL_103  103  -  Procent:
IDL_104  104  -  Ny procent:
IDL_105  105  -  Avgift:
IDL_106  106  -  Ny avgift:
IDL_107  107  -  %1/kg
IDL_108  108  -  %1/st
IDL_109  109  -  procent
IDL_110  110  -  F6: använd ny avgift nu
IDL_111  111  -  Avgiften används i en eller flera profiler. Kan inte radera.


>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   244   315 SBL	-	-	"-"	  0	"266 Miljöavgifter"

>FORM MAIN ROWS 7 SIZE 78 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   621    0    4   16  308 -	PhmZ	-	win4	-	""
TB   124   82    4  114  308 -	PZ	-	tab1	-	"&Miljöavgifter"
GR   101   16    4   62  308 -	pWZ	-	lcTable	-	""
B3    12  200    4   15   50 -	TPh	-	pbSave	-	"save.bmp,&Spara"
B3  2210  200   58   15   50 -	xTPh	-	pbNew	-	"new.bmp,&Ny"
B3   137  200  112   15   50 -	xTPh	-	pbDelete	-	"del.bmp,&Ta bort"
B3     2  200  262   15   50 -	xTPhz	-	pbCancel	-	"exit.bmp,St&äng"

>FORMFILES MAIN ROWS 2
#Id	sp
19030	-
100	-
>FORM tab1 ROWS 3 SIZE 3 "623 - tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   627   12    4   17  295 -	Ph	-	win5	-	""
WW   680   33    4   74  296 -	PZ	-	win1	-	""
FR   630   31    7    1  292 -	pZ	-	-	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win1 ROWS 9 SIZE 45 "win1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
CB  4087   10   56   50   62 -	P	-	cbFeeType	-	""
D   4077   24   56   13   48 -	P	-	edFeeValue	#19036	""
D   4085   38   56   13   48 -	PU	-	edAccount	#19039	""
WW  4098    1  151   68  142 -	Hp	-	win6	-	""
B3  4095   38  107   13   15 -	SxTpfF	-	pbAccount	-	"seek.bmp"
T   4080   12    3   11   41 -	p	-	-	-	"Avgiftstyp:"
T   4081   25    3   11   41 -	p	-	txFee	-	"Avgift:"
T   4086   39    3   11   41 -	p	-	-	-	"Konto:"
T   4094   25  107   11   34 -	p	-	txUnits	-	"Text"

>FORMFILES win1 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 -	SRTHpfF	-	pbTool	-	""
B3  2001    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2002    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2003    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2004    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2005    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2006    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2007    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2008    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2009    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2010    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2011    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2012    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2013    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2014    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
FU  4071    0    0   15  307 -	pZ	-	-	-	""

>FORM win5 ROWS 4 SIZE 18 "head"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D    103    3   28   13   44 -	PU	-	edCode	#19031	""
D    108    3  121   13  160 -	P	-	edName	#19033	""
T    110    4    4   11   20 -	p	-	-	-	"Kod:"
T    111    4   75   11   40 -	p	-	-	-	"Benämning:"

>FORMFILES win5 ROWS 0
#Id	sp
>FORM lcTable ROWS 5 SIZE 34 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4072    1    1   11   40 -	Hp	-	-	#19031	"Kod"
T   4073    1   41   11   70 -	Hp	-	-	#19033	"Benämning"
T   4075    1  111   11   30 -	RHp	-	-	#19036	"Avgift"
T   4104    1  141   11   30 -	Hp	-	-	#19039	"Konto"
T   4105    1  171   11   30 -	Hp	-	-	#10082	"Avgift"

>FORMFILES lcTable ROWS 2
#Id	sp
19030	-
100	-
>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 5 SIZE 41 "win6"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   4102   18   66   13   60 -	P	-	edNewFee	#19037	""
DP  4101   31   66   80   62 D8	P	-	edNewDate	#19038	""
T   4099   19   21   11   42 -	p	-	txNewFee	-	"Ny avgift:"
T   4100   32   22   11   43 -	p	-	-	-	"Giltig fr o m:"
GB  4103    2    0   65  139 -	p	-	gbNewFee	-	"Ändra avgift"

>FORMFILES win6 ROWS 0
#Id	sp
>SOURCE
