>TYPE   	D
>NAME   	ASK10-K.d
>CODE   	ASK10-K.cod
>BY     	@(#)$Author: Hakan $
>DATE   	@(#)$Date: 05-11-24 8:33 $
>VERSION	@(#)$Revision: 8 $
>ID     	328

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

>TEXTINFO ROWS 5 SIZE 84
#id    value    flags    text
IDL_101  101  -  Kund saknas
IDL_102  102  -  &Endast aktiva artiklar
IDL_103  103  -  Temporärfält
IDL_104  104  -  Inget avtalspris
IDL_105  105  -  Datum måste anges


>STACK ROWS 4000 SIZE 10000

>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   354   480 SB	-	-	"-"	  0	"Fråga pris"

>FORM MAIN ROWS 13 SIZE 154 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   472    0    2   20  474 -	PZ	-	win2	-	""
WW   529   22    2   52  416 -	P	-	win3	-	""
TB    11   76    2  248  414 -	PWZ	-	tab1	-	"Standard"
PB   476  136  418   15   60 -	P	-	pbSearch	-	"&Sök nu"
PB     3  154  418   15   60 -	P	-	pbAbortSearch	-	"Avbr&yt sök"
B3   548  212  418   15   60 -	TPf	-	pbLatestPrices	-	"info.bmp,&Senaste pris"
B3   516  230  418   15   60 -	TPf	-	pbArtPrices	-	"info.bmp,Art&ikelpriser"
B3   811  248  418   15   60 -	TPf	-	pbPriceInfo	-	"info.bmp,&Prisinfo"
B3   527  266  418   15   60 -	TPf	-	pbCompare	-	"info.bmp,&Jämför avtal"
PB    19  290  418   15   60 -	HPw	-	pbOk	-	"&Ok"
PB     2  308  418   15   60 -	Pw	-	pbAbort	-	"Av&bryt"
AV   201   78  424   48   52 -	Hpz	-	aviSearch	-	"studio.avi"
BM   409   76  424   52   54 -	Tpz	-	bmSearch	-	"studio.bmp"

>FORM tab1 ROWS 6 SIZE 27 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW    21   12    4  106  408 -	PZ	-	win1	-	""
GR    17  136    6  108  236 -	PW	-	lcResult	-	""
T    474  122    6   13  236 -	p	C9D6F9	txLabel	-	" Artiklar"
GR   480  136  250  108  158 -	PWZ	-	lcRight	-	""
T    491  122  250   13  158 -	pZ	C9D6F9	txLabelRight	-	" Stafflingar"
SP   517  122  244  122    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	-	-	-	"ask10cr.di"

>FORMFILES win1 ROWS 0
#Id	sp
>FORM lcResult ROWS 7 SIZE 37 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T    500    1    1   11   50 -	Hph	-	-	#1001	"Artikelkod"
T    501    1   51   11  106 -	Hp	-	-	#1021	"Benämning"
T    502    1  157   11   24 -	Hp	-	-	#1031	"Enhet"
T    503    1  181   11   42 -	RHph	-	-	#27004	"A-pris"
T    808    1  223   11    0 -	Hp	-	-	#25311	""
T    809    1  223   11    0 -	Hp	-	-	#842	""
T    810    1  223   11    0 -	Hp	-	-	#843	""

>FORMFILES lcResult ROWS 2
#Id	sp
10	r
253	r
>FORM lcRight ROWS 6 SIZE 25 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T    801    1    1   11   32 -	RHp	-	-	#25353	"Antal"
T    804    1   33   11   20 -	CHp	-	-	#25363	"Typ"
T    803    1   53   11   34 -	RHp	-	-	#25361	"Pris"
T    805    1   87   11   24 -	RHp	-	-	#25364	"%"
T    806    1  111   11   34 -	RHp	-	-	#25365	"Belopp"
T    807    1  145   11    0 -	RHp	-	-	#25351	""

>FORMFILES lcRight ROWS 1
#Id	sp
25350	r
>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
>FORM win3 ROWS 16 SIZE 120 "win3"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D    531   10   48   13   68 -	PU	-	edCode	#2001	""
D    534   24   48   13  102 -	P	-	edName	#2021	""
CE   541   10  202  250   80 -	Pc	-	cbCurrency	#854	""
DP   543   24  202   13   50 D8	P	-	dpDate	#844	""
XB   544   40  202   10   82 -	RP	-	xbIncVAT	#865	"Visa priser inkl. moms"
D    546   24  328   13   80 -	pO	-	edPriceList	-	""
T    538   26  290   11   36 -	p	-	-	-	"Prislista:"
T    533   26    4   11   44 -	p	-	-	-	"Kundnamn:"
T    540   12  174   11   28 -	p	-	-	-	"Valuta:"
T    530   12    4   11   42 -	p	-	-	-	"Kundkod:"
T    542   26  174   11   28 -	p	-	-	-	"Datum:"
B3   535   24  152   13   15 -	xTpfF	-	pbSearchName	-	"seek.bmp"
T    536   12  290   11   38 -	p	-	-	-	"Kundavtal:"
B3   532   10  118   13   15 -	xTpfF	-	pbSearchCode	-	"seek.bmp"
D    812   10  328   13   80 -	pO	-	edAgreement	-	""
GB   545    0    0   52  414 -	pZ	-	-	-	"Beräkna pris för"

>FORMFILES win3 ROWS 0
#Id	sp
>SOURCE
