>TYPE   	D
>NAME   	reg253.d
>CODE   	reg253.cod
>BY     	@(#)$Author: Hakan $
>DATE   	@(#)$Date: 05-11-23 15:24 $
>VERSION	@(#)$Revision: 11 $
>ID     	7164

>FILES ROWS 1
#type id  name        dbtype mode autoload r0 r1 r2 r3 r4 r5 comment
T     195  PYEGN      0      0    1        0  0  0  0  0  0  ¼ô

>TEXTINFO ROWS 25 SIZE 561
#id    value    flags    text
IDL_101  101  -  Kod måste anges
IDL_102  102  -  '"Baserat på" måste anges'
IDL_103  103  -  Procent eller belopp måste anges
IDL_104  104  -  Pris  måste anges
IDL_105  105  -  Stafflingar
IDL_106  106  -  Avrundning stämmer ej för angiven valutakod
IDL_107  107  -  Stafflingsnivå måste anges
IDL_108  108  -  Stafflat antal måste anges
IDL_109  109  -  Marginal
IDL_110  110  -  Felaktigt datumintervall
IDL_111  111  -  Spara påbörjat pris
IDL_112  112  -  Spara ändrat pris
IDL_113  113  -  Kundavtalets startdatum är  %1
IDL_114  114  -  Rabatt
IDL_115  115  -  Påslag
IDL_116  116  -  Annat kundavtal måste anges
IDL_117  117  -  Spara påbörjad staffling
IDL_118  118  -  Spara ändrad staffling
IDL_119  119  -  Annan prislista måste anges
IDL_120  120  -  Annat kundavtal
IDL_121  121  -  Annan prislista
IDL_122  122  -  Kundavtalets slutdatum är %1
IDL_123  123  -  Ersätt befintliga stafflingar
IDL_124  124  -  Radera befintliga stafflingar
IDL_125  125  -  %1 måste anges


>STACK ROWS 100 SIZE 5000

>FONT ROWS 12
#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"
A   -13   0   0   0 700   0  0   0   0   0   0   0   0 "Arial"
B   -16   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
C   -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   332   428 SBL	-	-	"-"	  0	"Registrera priser"

>FORM MAIN ROWS 2 SIZE 22 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4114    0    2   22  424 -	PZ	-	win4	-	""
TB  4072   26    2  278  422 -	PWZ	-	tab1	-	"&Priser,Staff&lingar"

>FORMFILES MAIN ROWS 1
#Id	sp
195	r
>FORM tab1 ROWS 2 SIZE 2 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4073   12    2  264  418 -	PWZ	-	win2	-	""
WW  4074   12    2  262  418 -	PWZ	-	win3	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win3 ROWS 10 SIZE 98 "Stafflingar"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   4344    4   70   13   60 -	PO	-	edCodeS	#25306	""
GR  4191   20    4  102  410 -	PWZ	-	lcScale	-	""
TB  4193  124    4  120  410 -	PZ	-	tab3	-	"Staffling"
B3  4194  246    4   15   50 -	QPw	-	pbSaveS	-	"save.bmp,&Spara"
B3  4195  246   60   15   50 -	QPw	-	pbNewS	-	"new.bmp,&Ny "
B3  4196  246  116   15   50 -	QPw	-	pbDeleteS	-	"delete.bmp,&Ta bort"
B3  4340  246  312   15   50 -	QP	-	pbNewPrice	-	"new.bmp,N&ytt pris"
B3  4197  246  366   15   50 -	QPwz	-	pbExitS	-	"exit.bmp,St&äng"
T   4343    6    6   11   60 -	p	-	txCodeS	-	""
D   4358    4  138   13  116 -	PO	-	edLabelS	-	""

>FORMFILES win3 ROWS 0
#Id	sp
>FORM win2 ROWS 6 SIZE 71 "Priser"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR  4113    4    4   78  410 -	PWZ	-	lcPrice	-	""
TB  4083   84    4  160  410 -	PZw	-	tab2	-	"Pris"
B3  4089  246    4   15   50 -	QPw	-	pbSaveP	-	"save.bmp,&Spara"
B3  4090  246   58   15   50 -	QPw	-	pbNewP	-	"new.bmp,&Ny "
B3  4091  246  112   15   50 -	QPw	-	pbDeleteP	-	"delete.bmp,&Ta bort"
B3  4077  246  364   15   50 -	QPwz	-	pbExitP	-	"exit.bmp,St&äng"

>FORMFILES win2 ROWS 0
#Id	sp
>FORM tab2 ROWS 1 SIZE 1 "tab2"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4124   12    2  146  406 -	PZ	-	win5	-	""

>FORMFILES tab2 ROWS 0
#Id	sp
>FORM win4 ROWS 7 SIZE 23 "Huvud"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4259    8    6   11   42 -	p	-	txHead	-	"Huvud:"
D   4260    6   50   13   44 -	pO	-	edHead	-	""
D   4261    6  102   13   98 -	pO	-	edHeadLabel	-	""
T   4262    8  208   11   28 -	p	-	txPriceList	-	"Prislista:"
D   4263    6  238   13   16 -	pO	-	edPriceList	-	""
D   4264    6  262   13   54 -	pO	-	edCodeType	-	""
FR  4265    2    2   20  420 -	pZ	-	-	-	""

>FORMFILES win4 ROWS 0
#Id	sp
>FORM win5 ROWS 20 SIZE 92 "win5"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4361    0    0   46  186 -	P	-	win20	-	""
WW  4369    0    2   46  184 -	P	-	win21	-	""
CE  4135    4  234  150   78 -	Pc	-	cbCurrency	#25308	""
DP  4129   18  234   13   50 D8	P	-	dpFromDate	#25309	""
DP  4132   32  234   13   50 D8	P	-	dpToDate	#25310	""
RB  4271    4  326   10   46 -	Rp	-	rbDiscountP	-	"Ra&batt"
RB  4272   14  326   10   46 -	Rp	-	rbMarkUpP	-	"P&åslag"
RB  4270   24  326   10   46 -	Rp	-	rbFixedP	-	"&Fast pris"
RB  4273   34  326   10   74 -	Rp	-	rbNoneP	-	"Enbart staffl&ingar"
WW  4305   52    2   74  144 -	P	-	win14	-	""
WW  4292   52    2   72  144 -	P	-	win13	-	""
WW  4336   52    2   74  146 -	P	-	win18	-	""
WW  4146   94  148   52  134 -	P	-	win6	-	""
WW  4329   52  284   78  122 -	HPZ	-	win17	-	""
WW  4160   52  148   40  132 -	P	-	win7	-	""
WW  4352   50  282   80  122 -	HpZ	-	win19	-	""
T   4136    6  192   11   38 -	p	-	txCurrency	-	"Valuta:"
T   4130   20  192   11   40 -	p	-	-	-	"Från datum:"
FR  4290   48    4    2  398 -	pZ	-	-	-	""
T   4359   34  192   11   40 -	p	-	-	-	"Till datum:"

>FORMFILES win5 ROWS 0
#Id	sp
>FORM win6 ROWS 5 SIZE 81 "Egenskaper"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
RB  4300   10    8   10   80 -	Rp	-	rbRecalcNP	-	"Rä&kna om normalpris"
RB  4301   20    8   10   82 -	Rp	-	rbShowRP	-	"&Visa rabatt/påslag %"
CE  4285   32   52  200   76 -	pc	-	cbRounding	#25335	""
T   4286   34    8   11   42 -	p	-	-	-	"Avrundning:"
GB  4302    0    2   50  130 -	p	-	-	-	"Egenskaper rabatt/påslag"

>FORMFILES win6 ROWS 0
#Id	sp
>FORM win7 ROWS 4 SIZE 39 "Staffling"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
XB  4278   10    8   10   80 -	Rp	-	xbScaleUsed	-	"Stafflingar används"
CE  4280   20   28  150   96 -	pc	-	cbScaleModel	#25332	""
T   4281   22    8   11   20 -	p	-	-	-	"Mall:"
GB  4279    0    2   38  130 -	p	-	-	-	"Stafflingar"

>FORMFILES win7 ROWS 0
#Id	sp
>FORM lcPrice ROWS 12 SIZE 90 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4167    1    1   11   44 -	Hph	-	-	#25306	"Kod"
T   4170    1   45   11   24 -	Hph	-	-	#25308	"Valuta"
T   4168    1   69   11   30 -	Hp	-	-	#25309	"Från"
T   4169    1   99   11   30 -	Hp	-	-	#25310	"Till "
T   4174    1  129   11   22 -	CHp	-	-	#25323	"Typ"
T   4171    1  151   11   40 -	RHp	-	-	#25321	"Pris exkl. "
T   4172    1  191   11   40 -	RHp	-	-	#25322	"Pris inkl."
T   4175    1  231   11   20 -	RHp	-	-	#25324	"%"
T   4176    1  251   11   46 -	RHp	-	-	#25325	"Belopp exkl."
T   4177    1  297   11   46 -	RHp	-	-	#25326	"Belopp inkl."
T   4236    1  343   11   40 -	RHp	-	-	#25333	"Stafflingar"
T   4311    1  383   11    0 -	Hp	-	-	#25311	""

>FORMFILES lcPrice ROWS 1
#Id	sp
253	r
>FORM tab3 ROWS 1 SIZE 1 "tab3"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4198   12    2  104  406 -	PZ	-	win9	-	""

>FORMFILES tab3 ROWS 0
#Id	sp
>FORM win9 ROWS 13 SIZE 67 "win9"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   4219    4   54   13   24 -	p	-	edScaleNr	#25352	""
D   4314    4  140   13   44 -	P	-	edScaleQuant	#25353	""
RB  4267    4  238   10   46 -	Rp	-	rbDiscountS	-	"Ra&batt"
RB  4268   14  238   10   46 -	Rp	-	rbMarkUpS	-	"P&åslag"
RB  4266    6  288   10   50 -	Rp	-	rbFixedS	-	"Fast pr&is"
WW  4201   30    4   76  150 -	P	-	win10	-	""
WW  4251   30  164   42  106 -	P	-	win11	-	""
WW  4269   30    4   74  148 -	P	-	win12	-	""
WW  4319   31  164   42  106 -	P	-	win15	-	""
WW  4325   30  280   70  122 -	pZ	-	win16	-	""
FR  4312   26    4    2  398 -	pZ	-	-	-	""
T   4313    6   94   11   46 -	p	-	-	-	"Stafflat antal:"
T   4220    6    4   11   50 -	p	-	-	-	"Stafflingsnivå:"

>FORMFILES win9 ROWS 0
#Id	sp
>FORM lcScale ROWS 10 SIZE 80 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4228    2    1   11   42 -	Hph	-	-	#25352	"Nivå"
T   4229    2   43   11   44 -	RHp	-	-	#25353	"Antal"
T   4231    2   87   11   36 -	CHpL	-	-	#25359	"Totalt pris"
T   4232    2  123   11   50 -	RHp	-	-	#25361	"Pris exkl. "
T   4233    2  173   11   50 -	RHp	-	-	#25362	"Pris inkl. "
T   4234    2  223   11   20 -	CHp	-	-	#25363	"R/P"
T   4237    2  243   11   30 -	RHp	-	-	#25364	"%"
T   4238    2  273   11   48 -	RHp	-	-	#25365	"Belopp exkl."
T   4239    2  321   11   48 -	RHp	-	-	#25366	"Belopp inkl."
T   4235    2  369   11    0 -	RHp	-	-	#25351	""

>FORMFILES lcScale ROWS 2
#Id	sp
25350	r
253	r
>FORM win10 ROWS 10 SIZE 79 "R/P"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4209   12    6   11   64 -	p	-	-	-	"Procent:"
D   4210   10   70   13   46 -	P	-	edPercentS	#25364	""
T   4211   12  120   11    8 -	p	-	-	-	"%"
T   4212   26    6   11   64 -	p	-	-	-	"Belopp exkl. moms:"
D   4213   24   70   13   60 -	P	-	edDiscExclS	#25365	""
T   4214   40    6   11   64 -	p	-	-	-	"Belopp inkl. moms:"
D   4215   38   70   13   60 -	P	-	edDiscInclS	#25366	""
T   4345   54    6   11   64 -	p	-	-	-	"Baserat på:"
CE  4346   52   70  150   70 -	Pc	-	cbBasisS	#25367	""
GB  4218    0    0   72  148 -	p	-	frScaleRP	-	"Rabatt/påslag"

>FORMFILES win10 ROWS 0
#Id	sp
>FORM win11 ROWS 3 SIZE 68 "Egn R/P"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
RB  4252   10    6   10   80 -	Rp	-	rbScaleAdd	-	"Rä&kna om normalpris"
RB  4253   20    6   10   84 -	Rp	-	rbScaleReplace	-	"&Visa rabatt/påslag-%"
GB  4254    0    2   34  100 -	p	-	-	-	"Egenskaper rabatt/påslag"

>FORMFILES win11 ROWS 0
#Id	sp
>FORM win12 ROWS 5 SIZE 46 "Fast pris"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   4203   10   70   13   60 -	P	-	edPriceExclS	#25361	""
D   4205   24   70   13   60 -	P	-	edPriceInclS	#25362	""
T   4204   26    6   11   64 -	p	-	-	-	"Pris inkl. moms:"
T   4202   12    6   11   62 -	p	-	-	-	"Pris exkl. moms:"
GB  4317    0    0   42  138 -	p	-	-	-	"Fast pris"

>FORMFILES win12 ROWS 0
#Id	sp
>FORM win13 ROWS 10 SIZE 79 "RP"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   4294   10   68   14   32 -	P	-	edPercentP	#25324	""
D   4297   24   68   13   58 -	P	-	edDiscExclP	#25325	""
D   4299   38   68   13   58 -	P	-	edDiscInclP	#25326	""
T   4296   26    4   11   64 -	p	-	-	-	"Belopp exkl. moms:"
T   4293   12    4   11   62 -	p	-	-	-	"Procent:"
T   4298   40    4   11   64 -	p	-	-	-	"Belopp inkl. moms:"
T   4295   12  102   11    8 -	p	-	-	-	"%"
T   4341   54    4   11   44 -	p	-	-	-	"Baserat på:"
CE  4342   52   68  200   72 -	Pc	-	cbBasisP	#25327	""
GB  4303    0    0   70  144 -	p	-	frRP	-	"Rabatt/påslag"

>FORMFILES win13 ROWS 0
#Id	sp
>FORM win14 ROWS 5 SIZE 46 "FastPris"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4307   12    6   11   54 -	p	-	-	-	"Pris exkl. moms:"
D   4308   10   62   13   60 -	P	-	edPriceExcl	#25321	""
T   4309   26    6   11   54 -	p	-	-	-	"Pris inkl. moms:"
D   4310   24   62   13   60 -	P	-	edPriceIncl	#25322	""
GB  4306    0    0   44  144 -	p	-	-	-	"Fast pris"

>FORMFILES win14 ROWS 0
#Id	sp
>FORM win15 ROWS 3 SIZE 50 "Egn Fast"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
RB  4320   10    6   10   60 -	Rp	-	rbUnitPrice	-	"Pris per st&yck"
RB  4321   20    6   10   60 -	Rp	-	rbTotalPrice	-	"T&otalt pris"
GB  4322    0    2   34   86 -	p	-	-	-	"Egenskaper fast pris"

>FORMFILES win15 ROWS 0
#Id	sp
>FORM win16 ROWS 2 SIZE 6 "Prisinfo"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
LB  4326   10    6   52  110 -	pZ	-	lbPriceRecord	-	""
GB  4357    0    0   68  122 -	pZ	-	-	-	"Pris"

>FORMFILES win16 ROWS 1
#Id	sp
195	r
>FORM win17 ROWS 6 SIZE 47 "Annat "
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
LB  4330   26    6   40  110 -	HpZ	-	lbRefId	-	""
T   4331   12    6   11   38 -	p	-	txAgreementRP	-	"Kundavtal:"
CE  4332   10   46  200   70 -	Pc	-	cbAgreementRP	#25328	""
T   4333   12    6   11   38 -	p	-	txPriceListRP	-	"Prislista:"
CE  4334   10   46  200   70 -	Pc	-	cbPriceListRP	#25329	""
GB  4335    0    0   72  120 -	pZ	-	frOther	-	"Annat avtal/prislista"

>FORMFILES win17 ROWS 1
#Id	sp
195	r
>FORM win18 ROWS 2 SIZE 17 "Mall"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
CE  4337    4   54  150   84 -	Pc	-	cbScaleModel2	#25332	""
T   4338    6    4   11   50 -	p	-	-	-	"Stafflingsmall:"

>FORMFILES win18 ROWS 1
#Id	sp
195	r
>FORM win19 ROWS 2 SIZE 15 "Prisinfo"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
LB  4353   10    8   62  106 -	pZ	-	lbPrices	-	""
GB  4355    0    2   78  118 -	pZ	-	-	-	"Artikelpriser"

>FORMFILES win19 ROWS 1
#Id	sp
195	r
>FORM win20 ROWS 7 SIZE 49 "Normal"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4362    6    2   11   42 -	p	-	txCode	-	"Kod:"
D   4363    4   46   13   60 -	PU	-	edCode	#25306	""
B3  4364    4  108   13    9 -	SxTpfF	-	pbPrevCode	-	"arrowl.bmp"
B3  4365    4  126   13   15 -	xQpF	-	pbSeekCode	-	"seek.bmp"
B3  4366    4  116   13    9 -	SxTpfF	-	pbNextCode	-	"arrowr.bmp"
T   4367   20    2   11   42 -	p	-	-	-	"Benämning:"
D   4368   18   46   13  134 -	pO	-	edCodeLabel	-	""

>FORMFILES win20 ROWS 1
#Id	sp
195	r
>FORM win21 ROWS 12 SIZE 68 "Combi"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   4371    4   42   13   30 -	PU	-	edCode1	-	""
D   4374   18   42   13   30 -	PU	-	edCode2	-	""
D   4377    4  134   13   30 -	PU	-	edCode3	-	""
D   4380   18  134   13   30 -	PU	-	edCode4	-	""
B3  4372    4   74   13   15 -	xQpF	-	pbSeekCode1	-	"seek.bmp"
B3  4375   18   74   13   15 -	xQpF	-	pbSeekCode2	-	"seek.bmp"
B3  4378    4  166   13   15 -	xQpF	-	pbSeekCode3	-	"seek.bmp"
B3  4381   18  166   13   15 -	xQpF	-	pbSeekCode4	-	"seek.bmp"
T   4370    6    2   11   38 -	p	-	txCode1	-	"Kod 1:"
T   4373   20    2   11   38 -	p	-	txCode2	-	"Kod 2:"
T   4376    6   94   11   38 -	p	-	txCode3	-	"Kod 3:"
T   4379   20   94   11   38 -	p	-	txCode4	-	"Kod 4:"

>FORMFILES win21 ROWS 1
#Id	sp
195	r
>SOURCE
