>TYPE   	D
>NAME   	reg21580.d
>CODE   	reg21580.cod
>BY     	@(#)$Author: Annhe $
>DATE   	@(#)$Date: 09-05-13 15:00 $
>VERSION	@(#)$Revision: 7 $
>ID     	9062

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

>TEXTINFO ROWS 4 SIZE 131
#id    value    flags    text
IDL_100  100  -  Radera %1
IDL_101  101  -  Kan inte finna %1 i register.
IDL_102  102  -  Uppb.kod är en beräkning. Därmed kan ej konton kopplas till uppb.koden.
IDL_103  103  -  Konto måste anges.


>STACK ROWS 500 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   336   430 SBL	-	-	"-"	  0	"964 Uppbördskoder"

>FORM MAIN ROWS 4 SIZE 33 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   621    0    4   16  422 -	PhmZ	-	win4	-	""
TB   124   14    6  286  334 -	PWZ	-	tab1	-	"&Uppbördskoder"
WW 24070   20  342   98   82 -	Pz	-	win6	-	""
B3     2  282  350   15   70 -	xTPhwz	-	pbCancel	-	"exit.bmp,St&äng"

>FORM tab1 ROWS 1 SIZE 1 "623 - tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW 24032   12    2  268  330 -	PWZ	-	win5	-	""

>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 -	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  406 -	pZ	-	-	-	""

>FORMFILES win4 ROWS 0
#Id	sp
>FORM win5 ROWS 2 SIZE 2 "win5"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR 24033    4    4   82  322 -	PZ	-	lcTable	-	""
WW 24111   88    2  176  326 -	PWZ	-	win7	-	""

>FORMFILES win5 ROWS 0
#Id	sp
>FORM lcTable ROWS 7 SIZE 118 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T  24025    1    1   11   36 -	Hp	-	-	#21581	"Uppb.kod"
T  24026    1   37   11  140 -	Hp	-	-	#21583	"Beteckning"
T  24134    1  177   11   45 -	HpL	-	-	#874	"Beräkning"
T  24028    1  222   11   42 -	HpL	-	-	#861	"Teckenbyte"
T  24029    1  264   11   67 -	HpL	-	-	#862	"Tomrad efter utskrift"
T  24030   13    1   11   77 -	HpL	-	-	#863	"Skrivs ej på deklaration"
T  24031   13   78   11   98 -	HpL	-	-	#864	"Skrivs endast om belopp finns"

>FORMFILES lcTable ROWS 1
#Id	sp
21580	r
>FORM win6 ROWS 5 SIZE 88 "win6"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
PB 24074    4    2   13   78 -	P	-	pbInsertUpp	-	"&Infoga..."
PB 24073   22    2   13   78 -	P	-	pbNewUpp	-	"&Ny uppbördskod..."
PB 24072   38    2   13   78 -	P	-	pbChangeUpp	-	"Ändra &uppbördskod..."
PB 24071   54    2   13   78 -	P	-	pbDeleteUpp	-	"&Ta bort uppbördskod"
PB 24109   70    2   13   78 -	P	-	pbCopy	-	"Kopiera konton"

>FORMFILES win6 ROWS 0
#Id	sp
>FORM win7 ROWS 14 SIZE 117 "win7"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
CE 24132   12   66   60   90 -	pc	-	cbKPlan	#24903	""
GR 24124   28    6   82  314 -	pWZz	-	lcTableK	-	""
D  24119  116   68   13   90 -	PU	-	edAccount	-	""
D  24112  116  178   13  110 -	pfO	-	-	#21011	""
D  24117  130   68   13   90 -	P	-	edProc	#21595	""
XB 24116  144    6   10   72 -	P	-	xbTurn	#21596	"Vänd tecken:"
B3 24115  156    4   15   50 -	QPw	-	pbSaveAcc	-	"save.bmp,&Spara"
B3 24114  156   58   15   50 -	QPw	-	pbNewAcc	-	"new.bmp,&Ny"
B3 24113  156  110   15   50 -	QPw	-	pbDelAcc	-	"del.bmp,&Ta bort"
T  24121  114    6   11   60 -	p	-	-	-	"Kontonr:"
T  24120  130    6   11   60 -	p	-	-	-	"Procent:"
B3 24118  116  160   13   15 -	xTpfF	-	pbAccount	-	"seek.bmp"
T  24133   14    8   11   60 -	p	-	-	-	"Kontoplan:"
GB 24125    2    2  174  322 -	pWZ	-	-	-	"Kopplade konton"

>FORMFILES win7 ROWS 0
#Id	sp
>FORM lcTableK ROWS 6 SIZE 61 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T  24126    1    1   11   35 -	Hph	-	-	#21593	"Kontonr"
T  24127    1   36   11   55 -	Hp	-	-	#21011	"Benämning:"
T  24129    1   91   11   35 -	Hp	-	-	#21595	"Procent"
T  24130    1  127   11   55 -	HpL	-	-	#21596	"Vänd tecken"
T  24131    1  182   11    0 -	Hph	-	-	#21592	"Kontoplan"
T  24128    1  182   11    0 -	Hph	-	-	#21591	"Uppbördskod"

>FORMFILES lcTableK ROWS 2
#Id	sp
21590	r
210	r
>SOURCE
