>TYPE   	D
>NAME   	PRISRC.d
>CODE   	PRISRC.cod
>BY     	@(#)$Author: Christer $
>DATE   	@(#)$Date: 08-09-12 10:35 $
>VERSION	@(#)$Revision: 8 $
>ID     	19505

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

>TEXTINFO ROWS 13 SIZE 388
#id    value    flags    text
IDL_100  100  -  Radera %1
IDL_101  101  -  Artikelpost hittas inte
IDL_102  102  -  %1 leverantörsprisposter överförda
IDL_103  103  -  %1 poster överförda (%2)
IDL_104  104  -  Fel vid anrop
IDL_105  105  -  E&ndast ej överförda artiklar
IDL_106  106  -  735 Arbetsregisterstudio - %1
IDL_107  107  -  Finns inget inläsningshuvud för inläsning nummer %1
IDL_108  108  -  Överför poster till Pyramid
IDL_109  109  -  %1 artikelposter, %2 leverantörsprisposter %3 stafflade poster
IDL_110  110  -  Finns fel, visa fellogg?
IDL_111  111  -  Avbryt överföring?
IDL_112  112  -  Överför poster till sidoregister


>STACK ROWS 2000 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 1
#id Eventname	ParamList
1085	OptionalPriceAdjustDate	(int iFromLu)


>WINDOW ROWS 1
#id       x     y    cy    cx sp1	sp2	Bitmap	font	size	caption
5511     10    10   320   475 SB	-	-	"-"	  0	"Arbetsregisterstudio"

>FORM MAIN ROWS 17 SIZE 235 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   472    0    2   20  470 -	PZ	-	win2	-	""
TB    11   20    2  270  410 -	PWZ	-	tab1	-	"Standard"
PB   476   84  420   15   50 -	P	-	pbSearch	-	"&Sök nu"
PB     3  100  420   15   50 -	P	-	pbAbortSearch	-	"Avbr&yt sök"
B3   769  116  420   15   50 -	QP	-	pbTransfer	-	"copy.bmp,&Överför"
XB   779  148  420   10   50 -	RP	-	xbTransferAll	-	"Överför alla"
B3   761  172  420   15   50 -	QPf	-	pbAdd	-	"insrow.bmp,&Lägg till..."
B3   762  189  420   15   50 -	QPf	-	pbDel	-	"delrow.bmp,&Ta bort"
B3   763  217  420   15   50 -	QPf	-	pbEditValue	-	"edit.bmp,Än&dra..."
B3   771  234  420   15   50 -	QPf	-	pbDelete	-	"del.bmp,Radera"
B3   774  252  420   15   50 -	QP	-	pbPriceCalc	-	"calc.bmp,Pr&iskalk..."
B3     2  274  420   15   50 -	xTPwz	-	pbCancel	-	"exit.bmp,St&äng"
AV   201   32  418   48   52 -	Hpz	-	aviSearch	-	"studio.avi"
BM   409   32  418   50   54 -	Tpz	-	bmSearch	-	"studio.bmp"
B3   780  132  420   15   50 -	QP	-	pbTransferSidereg	-	"copy.bmp,Sidoreg."
GB   770  164  415   43   58 -	p	-	-	-	"Urval:"
GB   772  209  415   62   58 -	p	-	-	-	"Register:"

>FORM tab1 ROWS 6 SIZE 30 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW    21   12    4  106  404 -	PZ	-	win1	-	""
GR    17  136    4  120  198 -	PW	-	lcResult	-	""
T    474  120    4   13  198 -	p	C9D6F9	txLabel	-	"Artikel"
GR   480  136  208  120  198 -	PWZ	-	lcRight	-	""
T    505  120  208   13  198 -	pZ	C9D6F9	-	-	"Leverantörspriser"
SP   755  120  204  136    2 -	pW	-	spSplit	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win1 ROWS 1 SIZE 11 "Criteries"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
L    418   21   30   11   60 -	p	-	-	-	"srccrit.di"

>FORMFILES win1 ROWS 0
#Id	sp
>FORM lcResult ROWS 4 SIZE 39 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T    775    1    1   11   50 -	Hp	-	-	#1001	"Artikelkod"
T    776    1   51   11   45 -	Hp	-	-	#1021	"Benämning"
T    777    1   96   11   35 -	RHp	-	-	#1150	"Baspris"
T    778    1  131   11   45 -	RHp	-	-	#1154	"Grundpris"

>FORMFILES lcResult ROWS 1
#Id	sp
10	r
>FORM lcRight ROWS 7 SIZE 65 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T    757    1    1   11   50 -	Hp	-	-	#5701	"Artikelkod"
T    758    1   51   11   55 -	Hp	-	-	#5705	"Företagskod"
T    759    1  106   11   30 -	Hp	-	-	#5751	"A-pris"
T    760    1  136   11   60 -	Hp	-	-	#5753	"Grossistpris"
T    766   13    1   11    0 -	Hp	-	-	#5707	"Valuta"
T    767   13    1   11    0 -	Hp	-	-	#5709	"Typ"
T    768   13    1   11   50 -	Hp	-	-	#5755	"Rabattbrev"

>FORMFILES lcRight ROWS 0
#Id	sp
>FORM win2 ROWS 1 SIZE 12 "win2"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
L    473    6   94   11   60 -	p	-	-	-	"toolmenu.di"

>FORMFILES win2 ROWS 0
#Id	sp
>SOURCE
