>TYPE   	D
>NAME   	7510-r.d
>CODE   	7510-r.cod
>BY     	@(#)$Author: Helene $
>DATE   	@(#)$Date: 06-05-16 13:41 $
>VERSION	@(#)$Revision: 8 $
>ID     	0

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

>TEXTINFO ROWS 0 SIZE 0
#id    value    flags    text


>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   255   432 S	-	-	"-"	  0	""

>FORM MAIN ROWS 8 SIZE 157 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR  3000    4    2   80  414 -	PWZ	-	lcTableR	-	""
TB  3001   86    4  152  414 -	PZw	-	tab1R	-	"Ar&tikelrad,Te&xtrad"
B3  3080  240    8   15   62 -	TPw	-	pbSaveRow	-	"save.bmp,S&para rad"
B3  3081  240   74   15   62 -	TPw	-	pbNewRow	-	"new.bmp,N&y rad"
B3  3082  240  140   15   62 -	TPw	-	pbDeleteRow	-	"del.bmp,&Makulera rad"
B3  3690  240  206   15   62 -	TP	-	pbFaultReportR	-	"nothing.bmp,Felanmälan"
B3  3691  240  272   15   62 -	TP	-	pbVerifiedFault	-	"nothing.bmp,Konstaterat fel"
B3  3692  240  338   15   62 -	TP	-	pbExecutedWork	-	"nothing.bmp,Utfört arbete"

>FORMFILES MAIN ROWS 2
#Id	sp
34	r
10	r
>FORM tab1R ROWS 2 SIZE 2 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  3002   12    2  138  410 -	PZ	-	win1R	-	""
WW  3083   12    2  138  410 -	PZ	-	win5R	-	""

>FORM win1R ROWS 22 SIZE 169 "Artikel"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   3003    6   46   13   82 A20	PU	-	edArtR	#3401	""
D   3007   20   46   13  142 -	P$	-	edArtNameR	#3421	""
D   3008   34   46   13   56 -	P	-	edNormPriceR	#3551	""
D   3010   48   46   13   56 f8.4	P	-	edNumberR	#3541	""
CE  3014   48  126   75   59 -	Pc	-	cbUnitR	#3431	""
D   3013   62   46   13   56 f8.4	P	-	edDiscountR	#3553	""
D   3016   76   46   13   56 -	P	-	edCostR	#3651	""
D   3018   90   46   13   56 -	P	-	edAmountR	#3653	""
D   3020   90  126   13   58 1	pO	-	edAmountInclR	-	""
TB  3022    0  206  136  202 -	PZu	-	tab2R	-	"1.Setart,2.Radegn,3.Inköpsanmodan,4.Beräkna"
T   3015   50  106   11   17 -	p	-	txUnitR	-	"Enh:"
T   3004    8    4   11   38 -	p	-	-	-	"Artikelkod:"
T   3017   78    4   11   38 -	p	-	-	-	"Kostnad:"
T   3009   36    4   11   38 -	p	-	-	-	"Normalpris:"
T   3019   92    4   11   38 -	p	-	-	-	"Belopp:"
T   3006   22    4   11   38 -	p	-	-	-	"Benämning:"
T   3021   92  106   11   14 -	p	-	txAmountInclR	-	"Inkl:"
T   3011   50    4   11   38 -	p	-	-	-	"Rapp antal:"
B3  3005    6  146   13   15 -	SxTpfF	-	pbArtR	-	"seek.bmp"
T   3012   64    4   11   38 -	p	-	-	-	"Rabatt %:"
B3  3157    6  128   13    9 -	SxTpfF	-	pbPrevArtR	-	"arrowl.bmp"
B3  3158    6  136   13    9 -	SxTpfF	-	pbNextArtR	-	"arrowr.bmp"

>FORMFILES win1R ROWS 3
#Id	sp
34	-
10	-
50	-
>FORM tab2R ROWS 6 SIZE 6 "tab2"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  3030   28    2  104  198 -	HPZ	-	win2R	-	""
WW  3038   28    2  104  198 -	HPZ	-	win3R	-	""
WW  3067   28    2  104  198 -	HPZ	-	win4R	-	""
WW  3107   28    2  104  198 -	HPZ	-	win8R	-	""
WW  3114   28    2  104  198 -	HPZ	-	win9R	-	""
WW  3170   28    2  106  198 -	P	-	win12R	-	""

>FORMFILES tab2R ROWS 0
#Id	sp
>FORM lcTableR ROWS 7 SIZE 55 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   3683    2    1   11   17 -	Hphm	-	-	#3403	"Rad"
T   3684    2   19   11   44 -	Hp	-	-	#3401	"Artikelkod"
T   3685    2   63   11  154 -	Hp	-	-	#3421	"Benämning"
T   3686    2  217   11   50 -	RHp	-	-	#3533	"Antal"
T   3687    2  267   11   25 -	RHp	-	-	#3553	"Rab %"
T   3688    0  292   11   60 -	RHp	-	-	#3561	"Kostnad"
T   3689    0  361    8   48 -	RHp	-	-	#8591	"Debiteras"

>FORMFILES lcTableR ROWS 2
#Id	sp
34	r
10	r
>FORM win2R ROWS 6 SIZE 48 "Setart"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   3032    4   46   13   64 -	PU$	-	edSetArtR	#1201	""
D   3035   18   46   13   64 -	P	-	edSetNumberR	#8332	""
T   3031    7    4   11   40 -	p	-	-	-	"Setartikel:"
B3  3033    4  114   13   15 -	xTpfF	-	pbSetArtR	-	"seek.bmp"
T   3034   20    4   11   40 -	p	-	-	-	"Antal:"
B3  3168   52   46   15   50 -	TP	-	pbGetSetArt	-	"nothing.bmp,Hämta"

>FORMFILES win2R ROWS 2
#Id	sp
34	r
10	r
>FORM win3R ROWS 26 SIZE 133 "Radegn"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   3040    4   42   13   28 -	P	-	edRowNrR	#3403	""
CE  3042   18   42   75   55 -	Pc	-	cbCategoryR	#3451	""
CE  3044   32   42   75   55 -	Pc	-	cbKalkyltypR	#3455	""
CE  3046   46   42  108   55 -	Pc	-	cbVatCodeR	#3595	""
CE  3054   60   42   75   56 -	Pc	-	cbAckR	#3591	""
D   3058   75  135   13   56 -	pO	-	edSaldoR	-	""
D   3063   89  135   13   56 -	pO	-	edDispR	-	""
D   3104    4  134   13   42 -	PU	-	edAccountR	#3596	""
D   3105   18  134   13   42 -	PU	-	edObjectR	#3599	""
D   3106   32  134   13   42 -	PU	-	edDepR	#3598	""
XB  3062   46   98   13   48 -	P	-	xbDebCheckR	#3481	"Deb.bart:"
D   3060   75   42   13   56 -	pO	-	edTBR	-	""
T   3041   19    4   11   34 -	p	-	txCategoryR	-	"Kategori:"
T   3059   77  100   11   34 -	p	-	-	-	"Saldo:"
T   3053   62    4   11   34 -	p	-	-	-	"Ack.rad:"
T   3061   77    4   11   34 -	p	-	-	-	"TB:"
T   3039    6    4   11   34 -	p	-	txRowNr	-	"Radnr:"
T   3045   48    4   11   34 -	p	-	-	-	"Momskod:"
T   3064   91  100   11   34 -	p	-	-	-	"Disp.:"
T   3043   34    4   11   34 -	p	-	-	-	"Kalkyltyp:"
T   3049   20  100   11   34 -	p	-	txObjectR	-	"Objekt:"
T   3047    6  100   11   34 -	p	-	-	-	"Konto:"
T   3051   34  100   11   34 -	p	-	txDepR	-	"Avd.:"
B3  3159    4  180   13   15 -	SxTpfF	-	pbAccountR	-	"seek.bmp"
B3  3160   18  180   13   15 -	SxTpfF	-	pbObjectR	-	"seek.bmp"
B3  3161   32  180   13   15 -	SxTpfF	-	pbDepR	-	"seek.bmp"

>FORMFILES win3R ROWS 2
#Id	sp
34	r
10	r
>FORM win4R ROWS 13 SIZE 111 "Anmodan"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   3179    6   76   13   60 -	P	-	edRemainingQuantityR	#3545	""
XB  3068   18    4   13   80 -	P	-	xbPurchaseRequestR	#862	"Inköpsanmodan"
D   3069   32   76   13   60 -	PU	-	edSupplierR	#5001	""
D   3072   46   76   13   60 -	P	-	edPurchaseRequestNoR	#5141	""
XB  3706   60    4   13   80 -	P	-	xbLabelFromOrder	#5019	"Benämning från order"
D   3074   74   76   13   60 -	pO	-	-	#3571	""
XB  3076   88   76   13   10 -	P	-	xbTransferedR	-	""
T   3075   76    4   11   62 -	p	-	-	-	"Tidigare anmodan:"
T   3073   48    4   11   62 -	p	-	txPurchaseRequestNoR	-	"Antal:"
T   3162   90    4   11   62 -	p	-	-	-	"Överförd"
T   3180    6    4   11   62 -	p	-	-	-	"Rest antal:"
T   3070   34    4   11   62 -	p	-	txSupplierR	-	"Leverantörskod:"
B3  3071   32  138   13   15 -	SxTpfF	-	pbSupplierR	-	"seek.bmp"

>FORMFILES win4R ROWS 2
#Id	sp
34	r
10	r
>FORM win5R ROWS 15 SIZE 158 "Text"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
RB  3696   15    8   10   86 -	RP	-	rbAllFormsR	-	"Alla"
RB  3697   25    8   10   86 -	RP	-	rbMarkedFormsR	-	"Markerade blanketter"
XB  3698    9  112   10   84 -	Rp	-	xbFormR1	-	"Serviceorder"
XB  3699   19  112   10   84 -	Rp	-	xbFormR2	-	"Klarrapport"
XB  3700   29  112   10   84 -	Rp	-	xbFormR3	-	"Kostnadsförslag"
XB  3701    9  210   10   84 -	Rp	-	xbFormR4	-	"Felrapport"
XB  3702   19  210   10   84 -	Rp	-	xbFormR5	-	"Fraktsedel felrapport"
XB  3703   29  210   10   84 -	Rp	-	xbFormR6	-	"Faktura"
D   3693   93   63   13   36 -	P	-	edTextRowNumR	#3403	""
XB  3694   92  112   13   50 -	P	-	xbFixedText	#3437	"Fast text:"
D   3084  108   63   13  246 SA70	P$	-	edTextR	#3434	""
B3  3169  108  311   13   15 -	xTpfF	-	pbTextR	-	"seek.bmp"
T   3695   95   10   10   25 -	p	-	-	-	"Radnr:"
T   3085  110   10   10   40 -	p	-	-	-	"Fri text:"
GB  3704    0    0   50  306 -	p	-	-	-	"Blanketter"

>FORMFILES win5R ROWS 2
#Id	sp
34	r
10	r
>FORM win8R ROWS 7 SIZE 54 "Beräkna"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   3109    4   42   13   64 f8.6	P	-	edQuantR	#3527	""
D   3111   18   42   13   64 f8.6	P	-	edLengthR	#3528	""
D   3113   32   42   13   64 f8.6	P	-	edWidthR	#3529	""
T   3108    6    4   11   33 -	p	-	-	-	"Kvantitet:"
T   3112   34    4   11   33 -	p	-	-	-	"Bredd:"
T   3110   20    4   11   33 -	p	-	-	-	"Längd:"
B3  3705   48   42   15   65 -	QP	-	pbCalcNumber	-	"nothing.bmp,Beräkna antal"

>FORMFILES win8R ROWS 2
#Id	sp
34	r
10	r
>FORM win9R ROWS 14 SIZE 80 "Valutaklausul"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
XB  3115    4    4   13   60 -	P	-	xbClauseR	#3580	"Valutaklausul:"
T   3116   20    4   11   40 -	p	-	txCurrencyR	-	"Basvaluta:"
CE  3117   18   54  100   60 -	Pc	-	cbCurrencyR	#3576	""
T   3118   34    4   11   40 -	p	-	txRateR	-	"Baskurs:"
CE  3119   32   54   50   60 -	Pc	-	cbRateR	#3577	""
T   3120   48    4   11   40 -	p	-	txDiffPercentR	-	"Diff %:"
D   3121   46   54   13   60 -	P	-	edDiffPercentR	#3578	""
T   3122   62    4   11   40 -	p	-	txAdjustPercentR	-	"Justering %:"
D   3123   60   54   13   60 -	P	-	edAdjustPercentR	#3579	""
D   3163   18  122   13   60 -	pfO	-	edStandardCurrencyR	-	""
D   3164   32  122   12   60 -	pfO	-	edStandardRateR	-	""
D   3165   46  122   12   60 -	pfO	-	edStandardDiffPercentR	-	""
D   3166   60  122   12   60 -	pfO	-	edStandardAdjustPercentR	-	""
T   3167    4  122   11   60 -	p	-	-	-	"Standardklausul"

>FORMFILES win9R ROWS 2
#Id	sp
34	r
10	r
>FORM win12R ROWS 8 SIZE 36 "win12"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
DP  3171    4   42   13   44 D8	P	-	-	#3523	""
T   3172    6    4   11   34 -	p	-	-	-	"Datum:"
CE  3173   18   42   50   90 -	Pc	-	cbSalesmanR	#3473	""
T   3174   20    4   11   34 -	p	-	-	-	"Säljare:"
CB  3175   32   42   50   90 -	P	-	cbSalaryArticle	#3641	""
T   3176   34    4   11   34 -	p	-	txSalaryArticle	-	"Löneart:"
CE  3675   46   42   50   90 -	Pc	-	cbOperationCode	-	""
T   3178   48    4   11   34 -	p	-	txOperationCode	-	"V-kod:"

>SOURCE
