>TYPE   	D
>NAME   	321.d
>CODE   	321.cod
>BY     	@(#)$Author: Anderst $
>DATE   	@(#)$Date: 07-01-15 13:17 $
>VERSION	@(#)$Revision: 2 $
>ID     	3025

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

>TEXTINFO ROWS 13 SIZE 291
#id    value    flags    text
IDL_100  100  -  Alla fält måste fyllas i
IDL_101  101  -  Felaktigt datum
IDL_102  102  -  Företag %1 saknas
IDL_103  103  -  Endast registrerad som kund
IDL_104  104  -  Inget att avräkna
IDL_105  105  -  Inget att makulera
IDL_106  106  -  Faktura %1 upptagen av %2 i rutin %3.
IDL_107  107  -  Valutakod saknas
IDL_108  108  -  %1 måste anges
IDL_109  109  -  Kontot är ett valutakonto i rutin 960
IDL_110  110  -  Konto för bankavgift måste anges
IDL_111  111  -  Belopp %1:
IDL_112  112  -  Bankavgift %1:


>STACK ROWS 200 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   320   410 SBL	-	-	"-"	  8	"321 Avräkning"

>FORM MAIN ROWS 6 SIZE 21 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW    75   20    2   16  256 -	P	-	win4	-	""
WW    11  130    0  164  344 -	PWZ	-	win1	-	""
WW  4202  142  350  110   56 -	Pwz	-	win5	-	""
B3     2  276  350   15   50 -	xTPwz	-	pbClose	-	"Exit.bmp,St&äng"
WW    81    4    4   15  400 -	P	-	win6	-	""
GR    40   40    4   87  338 -	pWZ	-	lcTable	-	""

>FORMFILES MAIN ROWS 0
#Id	sp
>FORM win1 ROWS 1 SIZE 10 "win1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
TB    43    0    4  165  338 -	PZw	-	tab1	-	"Avräkning"

>FORMFILES win1 ROWS 0
#Id	sp
>FORM tab1 ROWS 1 SIZE 1 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW    59   12    4  153  332 -	PZ	-	win3	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win3 ROWS 2 SIZE 2 "win3"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4106    0    0   51  330 -	PZ	-	win8	-	""
WW  4074   52    2   97  328 -	PZ	-	win7	-	""

>FORMFILES win3 ROWS 0
#Id	sp
>FORM win4 ROWS 2 SIZE 66 "Command"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3    77    1    1   15   90 -	TPM	-	pbReg	-	"Nothing.bmp,Re&gistrera avräkning"
B3    76    1   94   15   90 -	TPM	-	pbMak	-	"Nothing.bmp,&Makulera avräkning"

>FORMFILES win4 ROWS 0
#Id	sp
>FORM win6 ROWS 23 SIZE 23 "Tools"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
FR  1990    0   18   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    8   13   15 -	STHpfF	-	pbTool	-	""
B3  2002    0    8   13   15 -	STHpfF	-	pbTool	-	""
B3  2003    0    5   13   15 -	STHpfF	-	pbTool	-	""
B3  2004    0    3   13   14 -	STHpfF	-	pbTool	-	""
B3  2005    0    6   13   15 -	STHpfF	-	pbTool	-	""
B3  2006    0   10   13   15 -	STHpfF	-	pbTool	-	""
B3  2007    0   12   13   15 -	STHpfF	-	pbTool	-	""
B3  2008    0    8   13   15 -	STHpfF	-	pbTool	-	""
B3  2009    0    8   13   15 -	STHpfF	-	pbTool	-	""
B3  2010    0   12   13   15 -	STHpfF	-	pbTool	-	""
B3  2011    0    3   13   15 -	STHpfF	-	pbTool	-	""
B3  2012    2   14   13   15 -	STHpfF	-	pbTool	-	""
B3  2013    0   10   13   15 -	STHpfF	-	pbTool	-	""
B3  2014    0    6   13   15 -	STHpfF	-	pbTool	-	""
FU  4071    0    0   15  394 -	pZ	-	-	-	""

>FORMFILES win6 ROWS 0
#Id	sp
>FORM win7 ROWS 13 SIZE 91 "win7"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
PB  4119    7  206   15   70 -	P	-	pbChooseInv	-	"Välj fa&kturor"
D   4122    7   72   13   60 -	pO	-	edCurrAmount	#8572	""
CE  4076   21   72  100   60 -	Pc	-	cbExchangeRate	#8551	""
D   4077   35   72   13   60 -	P	-	edAmount	#8571	""
D   4078   49   72   13   60 -	P	-	edBankFee	#8332	""
D   4258   63   72   13   60 -	P	-	edChargeVAL	#8331	""
T   4268   65  135   11   32 -	p	-	-	#8825	"A4"
T   4079    8    8   11   63 -	p	-	txCurrAmount	-	"Valutabelopp:"
T   4080   22    8   11   63 -	p	-	txExchangeRate	-	"Kurs:"
T   4081   36    8   11   63 -	p	-	txAmount	-	"Belopp SEK:"
T   4082   50    8   11   63 -	p	-	txBankFee	-	"Bankavgift SEK:"
T   4257   64    8   11   63 -	p	-	-	-	"Bankavgift valuta:"
FR  4205    5    2   90  322 -	pZ	-	-	-	""

>FORMFILES win7 ROWS 0
#Id	sp
>FORM win8 ROWS 3 SIZE 18 "win8"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4208    7    5   42  165 -	P	-	win9	-	""
PB  4113   30  208   15   70 -	P	-	pbSetGroup	-	"Välj avräk&ning"
FR  4218    3    3   47  322 -	pZ	-	-	-	""

>FORMFILES win8 ROWS 0
#Id	sp
>FORM win5 ROWS 1 SIZE 19 "win5"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3  4203    2    2   15   50 -	TP	-	pbOk	-	"Ok.bmp, &Verkställ"

>FORMFILES win5 ROWS 0
#Id	sp
>FORM win9 ROWS 9 SIZE 63 "win9"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
DP  4210    0   68   50   60 D8	P	-	dpPayDate	#8712	""
D   4212   15   68   13   60 -	PU	-	edLev	#2001	""
CE  4217   28   68  150   94 A4	Pc	-	cbCurrency	#8825	""
T   4209    0    4   11   63 -	p	-	txPayDate	-	"Bet. datum:"
B3  4213   14  130   13    9 -	xTpF	-	pbLevPrev	-	"arrowl.bmp"
B3  4214   14  138   13    9 -	xTpF	-	pbLevNext	-	"arrowr.bmp"
B3  4215   14  148   13   15 -	xTpF	-	pbLev	-	"Seek.bmp"
T   4216   28    4   11   63 -	p	-	txCurrCode	-	"Valuta:"
T   4211   14    4   11   63 -	p	-	txLev	-	"Lev.kod:"

>FORMFILES win9 ROWS 0
#Id	sp
>FORM lcTable ROWS 9 SIZE 77 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4269    1    1   11   40 -	Hp	-	-	#8140	"Fakt.nr"
T   4270    1   41   11   40 -	Hp	-	-	#4204	"Lev fakt.nr"
T   4271    1   81   11   32 -	Hp	-	-	#4511	"Datum"
T   4272    1  113   11   20 -	Hp	-	-	#4483	""
T   4273    1  133   11   60 -	RHp	-	-	#4561	"Valutabelopp"
T   4274    1  193   11   58 -	RHp	-	-	#4551	"Belopp"
T   4275    1  251   11   40 -	RHp	-	-	#4555	"Kursdiff"
T   4276    1  291   11   28 -	RHp	-	-	#8332	"Avgift"
T   4277    1  319   11   35 -	Hph	-	-	#8331	"Avgift valuta"

>FORMFILES lcTable ROWS 1
#Id	sp
44	r
>SOURCE
