>TYPE   	D
>NAME   	reg118p.d
>CODE   	reg118p.cod
>BY     	@(#)$Author: Sandor $
>DATE   	@(#)$Date: 09-09-23 11:26 $
>VERSION	@(#)$Revision: 14 $
>ID     	19534

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

>TEXTINFO ROWS 32 SIZE 870
#id    value    flags    text
IDL_100  100  -  Filtyp måste anges
IDL_101  101  -  Tabb-separerat
IDL_102  102  -  Semikolon-separerat
IDL_103  103  -  Fasta positioner
IDL_104  104  -  Fasta pos, flera rader
IDL_105  105  -  Radera %1
IDL_106  106  -  Fel vid filegenskapskopiering
IDL_107  107  -  Påslag %
IDL_108  108  -  TG
IDL_109  109  -  Spara %1
IDL_110  110  -  En prisbok kan bara ha bokstäver och/eller siffror i namnet
IDL_111  111  -  Formatet %1 kunde inte laddas
IDL_112  112  -  Leverantör %1 saknas
IDL_113  113  -  Ange enhet från vilken prisfil ska kopieras (Används vid EIO)
IDL_114  114  -  Ange sökväg varifrån fil hämtas vid inläsning
IDL_115  115  -  Ange lev kod om post ska skapas i inköpsprisregistret
IDL_116  116  -  Om staffling ska tillhöra en speciell prislista
IDL_117  117  -  Lägg till före artikelkod. 1 eller 2 tecken
IDL_118  118  -  Lägg till efter artikelkod. 1 eller 2 tecken
IDL_119  119  -  Välj fil (Prisbok)
IDL_120  120  -  Alla (*.*)|*.*|
IDL_121  121  -  Filbeskrivning %1 kunde inte kopieras
IDL_122  122  -  Återställ prisbok till standardvärden
IDL_123  123  -  Artikeltyp %1 saknas
IDL_124  124  -  Prisbok måste vara angiven vid kopiering
IDL_125  125  -  Blankt = alla leverantörer i arbetsreg.
IDL_126  126  -  Ny TG
IDL_127  127  -  Nytt påslag-%:
IDL_128  128  -  Nytt baspris
IDL_129  129  -  Nytt inköpspris
IDL_130  130  -  Kampanj måste anges
IDL_131  131  -  Kundavtal måste anges


>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   340   300 SBL	-	-	"-"	  0	"736 Redigera filbeskrivning"

>FORM MAIN ROWS 7 SIZE 105 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   621    0    4   16  246 -	PhmZ	-	win4	-	""
TB   124   97    4  194  285 -	PZ	-	tab1	-	"F&ilegenskaper,Instä&llningar,Stafflingar"
GR   101   14    4   79  285 -	pWZ	-	lcTable	-	""
B3    12  294    5   15   50 -	TPh	-	pbSave	-	"save.bmp,&Spara"
B3  2210  294   59   15   50 -	TPh	-	pbNew	-	"new.bmp,&Ny"
B3   137  294  113   15   50 -	TPh	-	pbDelete	-	"del.bmp,&Ta bort"
B3     2  294  238   15   50 -	xTPhz	-	pbCancel	-	"exit.bmp,St&äng"

>FORM tab1 ROWS 5 SIZE 5 "623 - tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   627   14    4   16  237 -	Ph	-	win5	-	""
WW   680   33    4  156  273 -	P	-	win1	-	""
FR   630   31    4    1  275 -	pZ	-	-	-	""
WW 24139   34    2  157  281 -	P	-	win9	-	""
WW 24185   35    2  157  281 -	P	-	win13	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win1 ROWS 15 SIZE 164 "win1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D  24014   12   63   13   70 -	P	-	edCatalog	#11821	""
D   2212   27   63   13   70 -	P	-	-	#11805	""
CB 24055   52   63   50   80 -	P	-	cbFileType	-	""
RB 24128   13  170   10   70 -	P	-	rbANSI	-	"Windows (ANSI)"
RB 24129   24  170   10   70 -	P	-	rbASCII	-	"MS_DOS (PC-8)"
XB 24184   54  168   10   80 -	P	-	xbSkipFirstRow	-	"Hoppa över rad ett"
B3 24115  100  165   15   70 -	TP	-	pbFileEdit	-	"data.bmp,Redigera layout..."
B3 24120   13  136   13   15 -	Qp	-	pbOpenLib	-	"open.bmp"
B3 24119   26  136   13   15 -	Qp	-	pbOpenFile	-	"open.bmp"
T  24019   13    8   11   29 -	p	-	-	-	"Bibliotek:"
T   1169   29    8   11   35 -	p	-	-	-	"Filnamn:"
T  24021   52    8   11   18 -	p	-	-	-	"Filtyp:"
XB 24198   70  168   10   80 -	P	-	xbReadScales	-	"Läs in stafflingar"
GB 24116    1    2   44  154 -	p	-	-	-	"Egenskaper:"
GB 24127    2  167   39   81 -	p	-	-	-	"Format:"

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

>FORMFILES win4 ROWS 0
#Id	sp
>FORM win5 ROWS 4 SIZE 19 "head"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D    103    2   44   13   25 A2	PU	-	edCode	#11801	""
D    108    2  136   13   97 -	P	-	edName	#11811	""
T    110    4    0   11   44 -	p	-	-	-	"Typ:"
T    111    4   88   11   44 -	p	-	-	-	"Beteckning:"

>FORMFILES win5 ROWS 1
#Id	sp
155	-
>FORM lcTable ROWS 4 SIZE 35 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T  24032    1    1   11   35 -	Hp	-	-	#11801	"Prisbok"
T  24033    1   37   11   35 -	Hp	-	-	#11805	"Filnamn"
T  24034    1   72   11   50 -	Hp	-	-	#11811	"Beteckning"
T  24035    1  122   11   35 -	Hp	-	-	#11815	"Lev.kod"

>FORMFILES lcTable ROWS 1
#Id	sp
118	r
>FORM win9 ROWS 25 SIZE 162 "win9"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW 24170   10    8   36   71 -	P	-	win12	-	""
CE 24159   53   47  200   90 -	Pc	-	cbPriceList	#11829	""
CE 24176   69   47  200   90 -	Pc	-	cbDrive	#11837	""
CE 24178   83   47  200   90 -	Pc	-	cbAgreement	#11838	""
CE 24161   98   47   50   90 -	Pc	-	cbPriceLevel	#11832	""
CE 24182  113   47  200   90 -	Pc	-	cbCurrency	#11846	""
DP 24140  128   47   13   50 D8	P	-	dpFromDate	#11833	""
DP 24143  143   47   13   50 D8	P	-	dpToDate	#11834	""
WW 24163    8  152   48   83 -	P	-	win10	-	""
CE 24157   69  200  150   70 -	Pc	-	cbBasisP	#11840	""
WW 24164  102  150   25  120 -	P	-	win11	-	""
CE 24154  130  197  200   76 -	pc	-	cbRounding	#11839	""
T  24153  131  153   11   42 -	p	-	-	-	"Avrundning:"
T  24160   99    4   11   36 -	p	-	-	-	"Nivå:"
T  24142  144    4   11   40 -	p	-	-	-	"Till datum:"
T  24175   69    4   11   40 -	p	-	-	-	"Kampanj:"
T  24158   54    4   11   38 -	p	-	-	-	"Prislista:"
T  24177   85    4   11   40 -	p	-	-	-	"Kundavtal:"
T  24141  129    4   11   40 -	p	-	-	-	"Från datum:"
T  24156   70  152   11   43 -	p	-	-	-	"Baserat på:"
T  24183  113    4   11   36 -	p	-	-	-	"Valuta:"
GB 24150   91  147   56  130 -	p	-	-	-	"Egenskaper rabatt/påslag"
GB 24155   60  146   28  129 -	p	-	frScaleRP	-	"Rabatt/påslag"
GB 24174    0    4   50   85 -	p	-	-	-	"Avtalstyp"
GB 24181    0  146   60   94 -	p	-	-	-	"Pristyp"

>FORMFILES win9 ROWS 0
#Id	sp
>FORM win10 ROWS 4 SIZE 47 "win10"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
RB 24144    2    2   10   46 -	Rp	-	rbDiscountP	-	"Ra&batt"
RB 24145   13    2   10   46 -	Rp	-	rbMarkUpP	-	"P&åslag"
RB 24146   24    2   10   46 -	Rp	-	rbFixedP	-	"&Fast pris"
RB 24203   35    2   10   75 -	Rp	-	rbNoneP	-	"Enbart staff&lingar"

>FORMFILES win10 ROWS 0
#Id	sp
>FORM win11 ROWS 2 SIZE 43 "win11"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
RB 24151    2    2   10   80 -	Rp	-	rbRecalcNP	-	"Rä&kna om normalpris"
RB 24152   13    2   10   82 -	Rp	-	rbShowRP	-	"&Visa rabatt/påslag %"

>FORMFILES win11 ROWS 0
#Id	sp
>FORM win12 ROWS 3 SIZE 28 "win12"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
RB 24171    2    2   10   50 -	RP	-	rbPriceList	-	"Prislista"
RB 24172   13    2   10   50 -	RP	-	rbAgreement	-	"Kundavtal"
RB 24173   24    2   10   50 -	RP	-	rbDrive	-	"Kampanj"

>FORMFILES win12 ROWS 0
#Id	sp
>FORM win13 ROWS 9 SIZE 84 "win13"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW 24187   14   10   38   83 -	P	-	win14	-	""
CE 24193   69   58  150   70 -	Pc	-	cbBasisS	#11848	""
WW 24195  103    8   24  118 -	P	-	win15	-	""
WW 24202   43  174   29   67 -	P	-	win16	-	""
T  24192   70   10   11   43 -	p	-	-	-	"Baserat på:"
GB 24186    3    4   52   94 -	p	-	-	-	"Pristyp"
GB 24191   60    4   28  129 -	p	-	-	-	"Rabatt/påslag"
GB 24194   91    5   40  130 -	p	-	-	-	"Egenskaper rabatt/påslag"
GB 24199   32  168   48   86 -	p	-	-	-	"Egenskaper fast pris"

>FORMFILES win13 ROWS 0
#Id	sp
>FORM win14 ROWS 3 SIZE 27 "win14"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
RB 24188    1    0   10   46 -	RP	-	rbDiscountS	-	"Ra&batt"
RB 24189   12    0   10   46 -	RP	-	rbMarkUpS	-	"P&åslag"
RB 24190   23    0   10   46 -	RP	-	rbFixedS	-	"&Fast pris"

>FORMFILES win14 ROWS 0
#Id	sp
>FORM win15 ROWS 2 SIZE 43 "win15"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
RB 24196    0    0   10   80 -	RP	-	rbRecalcNS	-	"Rä&kna om normalpris"
RB 24197   11    0   10   82 -	RP	-	rbShowRS	-	"&Visa rabatt/påslag %"

>FORMFILES win15 ROWS 0
#Id	sp
>FORM win16 ROWS 2 SIZE 29 "win16"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
RB 24200   16    4   10   60 -	RP	-	rbTotalPriceS	-	"T&otalt pris"
RB 24201    3    4   10   60 -	RP	-	rbUnitPriceS	-	"Pris per st&yck"

>FORMFILES win16 ROWS 0
#Id	sp
>SOURCE
