>TYPE   	D
>NAME   	215.d
>CODE   	215.cod
>BY     	@(#)$Author: Mickea $
>DATE   	@(#)$Date: 09-05-20 16:52 $
>VERSION	@(#)$Revision: 32 $
>ID     	2060

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

>TEXTINFO ROWS 18 SIZE 635
#id    value    flags    text
IDL_100  100  -  Kommentar
IDL_101  101  -  Förhandsgranska
IDL_102  102  -  Flera rader i listkontrollen kan väljas genom multiselect
IDL_103  103  -  Förhandsgranskning misslyckades. Order %1 hittades inte
IDL_104  104  -  Kunden saknas
IDL_105  105  -  Skall samlingsfaktureras
IDL_106  106  -  Ordern är inte klar för fakturering
IDL_107  107  -  Laddar ordrar
IDL_108  108  -  Hämtning kommer att tömma urvalet. Vill du fortsätta?
IDL_109  109  -  Finns inget oattesterat. Godkänna parkerat?
IDL_110  110  -  Finns inget oattesterat. Parkera godkända?
IDL_111  111  -  Inget att behandla
IDL_112  112  -  Hittar inget att behandla
IDL_113  113  -  Intrastat-rad. Ändring måste ske i rutin 210
IDL_114  114  -  Ej tillåtet att ändra makulerad rad - återställ först
IDL_115  115  -  Order %1 kan inte hittas
IDL_116  116  -  Orderrad %1.%2 kan inte hittas
IDL_117  117  -  Order %1 kan inte avslutas, innehåller debiterbara transaktioner


>STACK ROWS 100 SIZE 5000

>FONT ROWS 12
#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"
A   -13   0   0   0 700   0  0   0   0   0   0   0   0 "Arial"
B   -16   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
C   -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   380   528 SBL	-	-	"-"	  0	"215 Fakturaattest"

>FORM MAIN ROWS 4 SIZE 52 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4078   18    4   71  520 -	PZ	-	winSelection	-	""
WW   621    0    4   16  308 -	PhmZ	-	win1	-	""
TB  4072   92    4  240  519 -	PWZ	-	tab1	-	"&Order,Or&derrader,&Transaktioner"
B3     2  334  451   15   70 -	TPz	-	-	-	"exit.bmp,St&äng"

>FORMFILES MAIN ROWS 1
#Id	sp
30	r
>FORM win1 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 -	SRTHpfF	-	pbTool	-	""
B3  2001    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2002    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2003    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2004    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2005    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2006    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2007    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2008    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2009    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2010    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2011    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2012    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2013    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
B3  2014    0    0   13   15 -	SRTHpfF	-	pbTool	-	""
FU  4071    0    0   15  307 -	pZ	-	-	-	""

>FORMFILES win1 ROWS 0
#Id	sp
>FORM tab1 ROWS 3 SIZE 3 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4073   14    2  224  513 -	PWZ	-	win2	-	""
WW  4074   14    2  224  514 -	PWZ	-	win3	-	""
WW  4077   14    2  224  514 -	PWZ	-	win4	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win2 ROWS 8 SIZE 158 "Order"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4285  153    4   69  505 -	P	-	win7	-	""
GR  4089    9    4  120  506 -	PfWZd	-	lcOrder	-	""
B3  4223  134    4   15   70 -	TP	-	pbFinishOrders	-	"dotgreen.bmp,&Godkänn"
B3  4224  135   76   15   70 -	TP	-	pbUnFinishOrders	-	"P.bmp,&Parkera"
B3  4311  135  148   15   75 -	TP	-	pbTerminateOrder	-	"dotred.bmp,Attestavsluta order"
B3  4289  134  263   15   70 -	TPz	-	pbOrdersForInvoice	-	"ok.bmp,&Klar för fakt"
B3  4293  134  336   15   70 -	TPz	-	pbOrdersNotForInvoice	-	"markoff.bmp,Ej k&lar för fakt"
B3  4250  134  409   15  100 -	TPz	-	pbTransferToSelection	-	"copy.bmp, Ski&cka till fakturaurval"

>FORMFILES win2 ROWS 0
#Id	sp
>FORM win3 ROWS 16 SIZE 195 "Rows"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4282  153    4   69  505 -	P	-	win6	-	""
WW  4297    4  134   14  183 -	P	D9	win8	-	""
GR  4090   23    3  108  506 -	PWZd	-	lcRows	-	""
XB  4157    6  360   10   68 -	Pz	-	xbShowAllRows	-	"Visa alla rader"
XB  4158    6  440   10   68 -	Pz	-	xbShowTextrows	-	"Visa textrader"
T   4195    7    4   11   34 -	p	-	-	-	"Ordernr:"
D   4196    5   42   13   60 -	PO	-	edRowsOrderNr	-	""
B3  4233    6  105   13    9 -	SxTpfF	-	pbFormerOrder	-	"arrowl.bmp"
B3  4234    6  114   13    9 -	SxTpfF	-	pbNextOrder	-	"arrowr.bmp"
B3  4236  134    4   15   70 -	TP	-	pbRowStatusOk	-	"dotgreen.bmp,&Godkänn"
B3  4237  134   77   15   70 -	TP	-	pbRowStatusLater	-	"P.bmp,&Parkera"
B3  4238  134  150   15   70 -	TP	-	pbRowStatusNever	-	"dotredx.bmp,Faktur&eras ej"
B3  4305  134  296   15   70 -	TPz	-	pbReport	-	"insrow.bmp,Rader"
B3  4249  134  369   15   70 -	TPz	-	pbPrintInvoice	-	"print.bmp,Skri&v faktura"
B3  4261  134  442   15   70 -	TPz	-	pbOrderForInvoice	-	"ok.bmp,&Klar för fakt"
GB  4299    0  133   21  186 -	p	-	-	-	""

>FORMFILES win3 ROWS 1
#Id	sp
34	r
>FORM win4 ROWS 21 SIZE 228 "Trans"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR  4091   22    4  108  506 -	PWZd	-	lcTrans	-	""
D   4168  156   72   13  120 -	P	-	edTransText	-	""
D   4174  170   72   13   60 -	P	-	edInvoiceableAmount	-	""
D   4176  184   72   13   60 -	P	-	edDebAmount	-	""
B3  4197  199  143   15   50 -	TP	-	pbSaveTrans	-	"save.bmp,&Spara"
D   4148    5  175   13   60 -	PO	-	edTransRowNr	-	""
XB  4165    6  380   10  129 -	Pz	-	xbShowAllTrans	-	"Visa fakturerade transaktioner"
T   4178  172    4   11   60 -	p	-	-	-	"Fakturerbart antal:"
T   4180  185    4   11   60 -	p	-	-	-	"Debiterbart belopp:"
T   4172  158    4   11   60 -	p	-	-	-	"Transaktionstext:"
T   4146    7  133   11   38 -	p	-	-	-	"Radnr:"
B3  4226    4  238   13    9 -	SxTpfF	-	pbFormerOrderRow	-	"arrowl.bmp"
B3  4227    4  246   13    9 -	SxTpfF	-	pbNextOrderRow	-	"arrowr.bmp"
B3  4228  134    4   15   70 -	TP	-	pbTransStatusOk	-	"dotgreen.bmp,&Godkänn"
B3  4229  134   77   15   70 -	TP	-	pbTransStatusLater	-	"P.bmp,&Parkera"
B3  4230  134  150   15   70 -	TP	-	pbTransStatusNever	-	"dotredx.bmp,Faktur&eras ej"
WW  4232  156  216   60  210 -	P	-	win5	-	""
T   4275  186  137   11   20 -	p	-	txCurrency	-	""
B3  4294  134  223   15   70 -	TP	-	pbTransStatusNothing	-	"reset.bmp,&Återställ"
WW  4300    5    9   14   90 -	P	D9	win9	-	""
GB  4302    0    6   20   95 -	p	-	-	-	""

>FORMFILES win4 ROWS 0
#Id	sp
>FORM winSelection ROWS 37 SIZE 304 "Urval"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   4107   11   60   13   60 A8	PU	-	edFromOrder	#841	""
D   4110   25   60   13   60 A8	PU	-	edToOrder	#849	""
D   4129   39   60   13   60 A8	PU	-	edFromCustomer	-	""
D   4130   53   60   13   60 A8	PU	-	edToCustomer	-	""
D   4124   11  190   13   44 A8	PU	-	edGroup	#847	""
D   4087   25  190   13   44 A4	PU	-	edInCharge	-	"853"
D   4213   39  190   13   44 -	P	-	edStatus	-	""
D   4216   53  190   13   44 A3	PU	-	edProjectType	-	""
D   4127   11  302   13   44 A4	PU	-	edSeller	#858	""
XB  4306   27  258   10   55 -	RP	-	xbSystemCurrencyOnly	-	"Enbart SEK"
CE  4271   39  302  200   46 -	Pc	-	cbCurrency	#8601	""
XB  4309   55  258   10  109 -	RP	-	xbAllOrders	-	"Även order utan belopp"
DP  4083   11  444   13   46 D8	P	-	dpFromDate	#8828	""
DP  4085   25  444   14   46 D8	P	-	dpToDate	#8829	""
B3  4079   43  421   15   66 -	QP	-	pbOk	-	"fetchsel.bmp,Hä&mta"
B3  4125   11  236   13   15 -	xTpF	-	pbGroup	-	"seek.bmp"
T   4082   12  378   11   63 -	p	-	txFromDate	-	"Från trans.datum:"
T   4106   12    6   11   42 -	p	-	-	-	"Från ordernr:"
B3  4128   11  351   13   15 -	xTpF	-	pbSeller	-	"seek.bmp"
B3  4088   25  236   13   15 -	xTpF	-	pbInCharge	-	"seek.bmp"
T   4084   26  378   11   61 -	p	-	txToDate	-	"Till trans.datum:"
B3  4131   39  122   13   15 -	xTpF	-	pbFromCustomer	-	"seek.bmp"
B3  4132   53  122   13   15 -	xTpF	-	pbToCustomer	-	"seek.bmp"
T   4133   40    6   11   43 -	p	-	-	-	"Från kund:"
T   4134   54    6   11   39 -	p	-	-	-	"Till kund:"
T   4212   40  142   11   40 -	p	-	-	-	"Status:"
T   4123   12  142   12   44 -	p	-	-	-	"Projektgrupp:"
B3  4214   39  236   13   15 -	SxTpfF	-	pbStatus	-	"seek.bmp"
T   4215   54  142   11   40 -	p	-	-	-	"Projekttyp:"
T   4086   26  142   11   34 -	p	-	-	-	"Ansvarig:"
B3  4217   53  236   13   15 -	xTpfF	-	pbProjectType	-	"seek.bmp"
B3  4111   25  122   13   15 -	xTpF	-	pbToOrder	-	"seek.bmp"
T   4272   40  258   11   34 -	p	-	txCurrencySelection	-	"Valuta:"
B3  4108   11  122   13   15 -	xTpF	-	pbFromOrder	-	"seek.bmp"
T   4126   12  258   11   34 -	p	-	-	-	"Säljare:"
T   4109   26    6   11   42 -	p	-	-	-	"Till ordernr:"
GB  4122    1    3   68  502 -	p	-	-	-	"Urval:"

>FORMFILES winSelection ROWS 0
#Id	sp
>FORM lcOrder ROWS 13 SIZE 106 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
BM  4277    1    1   20   20 -	QHph	-	-	#12864	"Klar"
T   4304    1   21   11   90 -	Hp	-	-	#2021	"Företag"
T   4094    1  111   11   35 -	Hp	-	-	#3003	"Ordernr"
T   4095    1  146   11   55 -	Hp	-	-	#3081	"Projektnamn"
T   4270    1  201   11   45 -	Hp	-	-	#3163	"Valutakod"
T   4295    1  247   11   55 -	RHph	-	-	#10006	"Budget belopp"
T   4135    1  302   11   40 -	RHph	-	-	#10001	"Oattesterat"
T   4253    1  342   11   40 -	RHph	-	-	#10002	"Faktbart"
BM  4252    1  382   20   10 -	QHph	-	-	#12861	""
BM  4193    1  392   20   10 -	QHph	-	-	#12862	""
BM  4254    1  402   20   10 -	QHph	-	-	#12863	""
T   4287    1  412   11   40 -	RHph	-	-	#10005	"Ofakt belopp"
T   4251    1  452   11   30 -	Hp	-	-	#3091	"Upptagen av"

>FORMFILES lcOrder ROWS 2
#Id	sp
30	r
20	r
>FORM lcRows ROWS 14 SIZE 107 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4099    1    1   11   25 -	Hp	-	-	#3403	"Radnr"
T   4100    1   26   11   50 -	Hp	-	-	#3401	"Artikelkod"
T   4101    1   76   11   65 -	Hp	-	-	#3421	"Benämning"
T   4102    1  142   11   60 -	RHp	-	-	#3531	"Budget antal"
T   4284    1  202   11   40 -	RHph	-	-	#10006	"Belopp"
T   4244    1  242   11   35 -	RHph	-	-	#10041	"Oatt.antal"
T   4260    1  277   11   55 -	RHph	-	-	#10001	"Belopp"
T   4246    1  332   11   35 -	RHph	-	-	#10042	"Godk.antal"
T   4265    1  368   11   40 -	RHph	-	-	#10002	"Belopp"
BM  4258    1  408   20   10 -	QHph	-	-	#12861	""
BM  4259    1  418   20   10 -	QHph	-	-	#12862	""
BM  4269    1  428   20   10 -	QHph	-	-	#12863	""
T   4288    1  438   11   40 -	RHph	-	-	#10005	"Ofakt.belopp"
T   4283    1  478   11    0 -	Hp	-	-	#3402	"Ordernr"

>FORMFILES lcRows ROWS 1
#Id	sp
34	r
>FORM lcTrans ROWS 17 SIZE 142 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4113    1    1   11   40 -	Hp	-	-	#3661	"Signatur"
T   4114    1   41   11   45 -	Hp	-	-	#3621	"Benämning"
T   4115    1   86   11   50 -	Hp	-	-	#3611	"Trans.datum"
T   4274    1  136   11   45 -	Hp	-	-	#3695	"Valutakod"
T   4116    1  181   11   35 -	RHp	-	-	#3651	"Kostnad"
T   4117    1  217   11   25 -	RHp	-	-	#3631	"Antal"
T   4187    1  242   11   50 -	RHp	-	-	#3632	"Fakt.antal"
T   4276    1  292   11   40 -	RHph	-	-	#8571	"Belopp"
BM  4192    1  332   20   10 -	QHph	-	-	#12861	""
T   4182    1  342   11    0 -	Hp	-	-	#3601	"Ursprung"
T   4183    1  342   11    0 -	Hp	-	-	#3602	"Ordernr"
T   4184    1  342   11    0 -	Hp	-	-	#3603	"Radnr"
T   4185    1  342   11    0 -	Hp	-	-	#3604	"Transaktionsnr"
T   4186    1  342   11    0 -	Hp	-	-	#3607	"Löpnr"
T   4292    1  342   11    0 -	Hp	-	-	#10050	""
T   4308    1  342   11   40 -	Hp	-	-	#3660	"Just. sign"
T   4307    1  382   11   40 -	Hp	-	-	#3662	"Attestsign."

>FORMFILES lcTrans ROWS 1
#Id	sp
36	r
>FORM win5 ROWS 1 SIZE 1 "win5"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
BM  4231    0    0   60  210 -	Qp	-	bmTrans	-	""

>FORMFILES win5 ROWS 0
#Id	sp
>FORM win6 ROWS 1 SIZE 1 "win6"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
BM  4281    0    0   67  498 -	Qp	-	bmRows	-	""

>FORMFILES win6 ROWS 0
#Id	sp
>FORM win7 ROWS 1 SIZE 1 "win7"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
BM  4286    0    0   67  498 -	Qp	-	bmOrder	-	""

>FORMFILES win7 ROWS 0
#Id	sp
>FORM win8 ROWS 1 SIZE 5 "win8"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4296    3    3   11  175 -	p	F4	txRowInfo	-	"Text"

>FORMFILES win8 ROWS 0
#Id	sp
>FORM win9 ROWS 1 SIZE 5 "win9"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4301    1    1   11   85 -	p	D9F4	txTransOrderNr	-	"Text"

>FORMFILES win9 ROWS 0
#Id	sp
>SOURCE
