>TYPE   	D
>NAME   	reg217.d
>CODE   	reg217.cod
>BY     	@(#)$Author: Anna $
>DATE   	@(#)$Date: 06-07-26 10:35 $
>VERSION	@(#)$Revision: 3 $
>ID     	346

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

>TEXTINFO ROWS 32 SIZE 915
#id    value    flags    text
IDL_100  100  -  5 = Enligt kontoplan
IDL_101  101  -  3 = Kan inmatas
IDL_102  102  -  2 = Inmatas aldrig
IDL_103  103  -  4 = Hoppas över, kan inmatas
IDL_104  104  -  När %1 ska hämtas, ange datanummer i Avancerat.
IDL_105  105  -  Kan ej finna rad i PUDIMVAL
IDL_106  106  -  Ingen ny rad får skapas
IDL_107  107  -  LU-nummer passar ej ihop med datanummer.
IDL_108  108  -  Om datanummer anges måste även LU-nummer anges.
IDL_109  109  -  LU-nummer finns inte
IDL_110  110  -  När %1 ska hämtas, ange lu-nummer i Avancerat.
IDL_111  111  -  Rutin saknas, vid användning av dialogfil avsluta med ".d"
IDL_112  112  -  1 = Får ej lämnas tomt
IDL_113  113  -  Avan&cerat
IDL_114  114  -  Stäng avan&cerat
IDL_115  115  -  %1
IDL_116  116  -  Dialog-fil kontrolleras ej här, försäkra dig om att dialogen existerar.
IDL_117  117  -  Ska alla projekttyper och inköpstyper få värde tilldelat till dimensionen?
IDL_118  118  -  1 = Avdelning/Kostnadsställe
IDL_119  119  -  6 = Objekt/Projekt
IDL_120  120  -  7 = Anställd
IDL_121  121  -  8 = Kund
IDL_122  122  -  9 = Leverantör
IDL_123  123  -  10 = Faktura
IDL_124  124  -  2 = Kostnadsbärare (underdim till 1)
IDL_125  125  -  Nummer mellan 1 och 19 är reserverade
IDL_126  126  -  SIE4 koden används redan på annan dimension
IDL_127  127  -  Pyramidegenskap kan inte sparas
IDL_128  128  -  %1 har hämtning
IDL_129  129  -  %1 sparad
IDL_130  130  -  99 Eget val
IDL_131  131  -  Dimensionstyp måste anges


>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   330   410 SB	-	-	"-"	  0	"Kontodimensioner"

>FORM MAIN ROWS 6 SIZE 97 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   621    0    4   16  428 -	PhmZ	-	win2	-	""
GR    12   18    8   98  396 -	PWZ	-	lcTable	-	""
TB  4076  120    8  158  398 -	PZ	-	tab1	-	"&Dimension,Hämta &värden"
B3    35  284    8   15   70 -	QP	-	pbSave	-	"save.bmp, &Spara rad"
B3     2  284  335   15   70 -	xQPz	-	pbCancel	-	"exit.bmp, St&äng"
B3  4216  284  218   15  112 -	QHPz	-	pbPalette	-	"dim.bmp, Egenskaper kontopalett"

>FORM lcTable ROWS 6 SIZE 54 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4072    1    1   11   20 -	Hp	-	-	#21701	"Nr"
T   4074    1   21   11   50 -	Hp	-	-	#21727	"Benämning"
T   4142    1   71   11   35 -	CHpL	-	-	#21707	"Används"
T   4143    1  107   11   50 -	CHpL	-	-	#21708	"Kontrolleras"
T   4097    1  157   11   90 -	Hp	-	-	#8834	"Hämta dimension"
T   4144    1  247   11   40 -	Hp	-	-	#21703	"Dnr"

>FORMFILES lcTable ROWS 0
#Id	sp
>FORM win2 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  424 -	pZ	-	-	-	""

>FORMFILES win2 ROWS 0
#Id	sp
>FORM tab1 ROWS 4 SIZE 4 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4078   14    2   16  392 -	P	-	win3	-	""
WW    37   34    2  120  392 -	P	-	win1	-	""
WW  4085   34    2  120  392 -	P	-	win4	-	""
FR  4126   32    2    1  392 -	pZ	-	-	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win3 ROWS 4 SIZE 31 "win3"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4084    3    2   11   68 -	p	-	-	-	"Dimensionsnummer:"
D   4083    2   73   13   36 -	P	-	edCode	#21701	""
T   4081    3  210   11   56 -	p	-	-	-	"Benämning:"
D   4082    2  273   13   90 -	P	-	edBen	#21727	""

>FORMFILES win3 ROWS 0
#Id	sp
>FORM win1 ROWS 18 SIZE 154 "win1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
CB  4079    4   72  100   92 -	HP	-	cbDim	#21702	""
XB    46   18    1   13   80 -	P	-	xbUse	#21707	"Används:"
XB    47   32    1   13   80 -	P	-	xbControl	#21708	"Kontrolleras:"
D   4136   46   72   13   92 -	P	-	edLongBen	#21704	""
D   4138   60   72   13  115 -	P	-	-	#21719	""
CB  4099   74   72  100  118 -	P	-	cbEnterProp	#21709	""
XB  4154   12  210   10   74 -	RHP	-	xbExportSIE4	#21728	"Exportera"
XB  4155   23  210   10   79 -	RHP	-	xbImportSIE4	#21729	"Importera"
CB  4159   45  270  100  112 -	HP	-	cbSIE4Prop	#21730	""
D   4160   60  270   13   29 H2	HP	-	edSIE4prop	-	""
T   4139   61    2   11   68 -	p	-	txInfo	-	"Info:"
T   4080    6    2   11   68 -	Hp	-	txDim	-	"Dimensionstyp:"
T   4100   76    2   11   68 -	p	-	-	-	"Inmatning:"
T   4137   47    2   11   68 -	p	-	txLongBen	-	"Lång benämning:"
T   4165   47  211   11   58 -	Hp	-	txSIE4Reserved	-	"SIE standard:"
T   4166   61  211   11   58 -	Hp	-	txSIE4other	-	"Egendefinierat:"
GB  4156   35  205   45  181 -	Hp	-	gbDimNr	-	"Dimensionskod i filen"
GB  4153    1  199   85  192 -	Hp	-	gbSie4	-	"SIE4"

>FORMFILES win1 ROWS 0
#Id	sp
>FORM win4 ROWS 12 SIZE 175 "win4"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4177    0  196  104  196 -	HP	-	win5	-	""
XB  4167   10    8   10   79 -	RP	-	xbGetValues	#21712	"Hämta värden"
XB  4219   20   18   10   10 -	RDP	-	xbProType	-	"Projekttyp"
XB  4198   30   18   10   94 -	RP	-	xbGetAccount	-	"Från kontoplan"
XB  4197   40   18   10  159 -	RHP	-	xbGetDnr	-	"Datanummer"
XB  4210   64    8   10  118 -	RP	-	xbPrio	#21714	"Hämtat värde kan ej ändras"
T   4176   88    8   11  164 -	p	-	-	-	"Om inget hämtats eller inmatats, använd:"
D   4089  100    8   13   81 -	PU	-	edSteady	#21711	""
PB  4206  106  318   13   70 -	p	-	pbAdvanced	-	"Avancerat"
T   4220   20   30   10  150 -	p	-	txProType	-	"Projekttyp"
FR  4207   80    8    1  175 -	p	-	-	-	""
GB  4200    0    2  116  188 -	p	-	-	-	"Hämtning av värde till dimension"

>FORMFILES win4 ROWS 0
#Id	sp
>FORM win5 ROWS 17 SIZE 122 "win5"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   4184   16   72   13   36 -	P	-	edDataCheckNr	#21725	""
D   4186   16  149   13   36 -	P	-	edLuCheckNr	#21726	""
D   4212   30   72   13   36 -	P	-	edCheckName	#21731	""
D   4190   48   72   13   90 -	P	-	edRegRoutine	#21718	""
D   4188   61   72   13   90 -	P	-	edStudio	#21717	""
D   4180   82   72   13   36 -	HP	-	edDataNr	#21703	""
D   4181   82  149   13   36 -	HP	-	edLuNr	#21706	""
T   4179   83  113   11   33 -	Hp	-	txLu	-	"Register:"
T   4178   83    9   11   60 -	Hp	-	txDnr	-	"Datanummer:"
GB  4214   74    5   24  184 -	Hp	-	grGet	-	"Hämta"
T   4189   62    9   11   60 -	p	-	-	-	"Sökstudio:"
T   4187   48    8   11   60 -	p	-	-	-	"Registervårdsrutin:"
T   4211   31    8   11   60 -	p	-	-	-	"Benämningsdnr:"
T   4183   16    8   11   60 -	p	-	-	-	"Datanummer:"
T   4185   16  113   11   33 -	p	-	-	-	"Register:"
GB  4215    8    5   37  184 -	p	-	-	-	"Kontroll"
GB  4196    0    1  102  191 -	p	-	-	-	"Avancerat"

>FORMFILES win5 ROWS 0
#Id	sp
>SOURCE
