>TYPE   	D
>NAME   	120_kp.d
>CODE   	120_kp.cod
>BY     	@(#)$Author: Peter $
>DATE   	@(#)$Date: 07-04-24 9:13 $
>VERSION	@(#)$Revision: 4 $
>ID     	1053

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

>TEXTINFO ROWS 9 SIZE 181
#id    value    flags    text
IDL_100  100  -  Tillverkningsprojekt
IDL_101  101  -  Ordernummer måste anges
IDL_102  102  -  Offertdatum:
IDL_103  103  -  Giltig till:
IDL_104  104  -  Acontofakturerat:
IDL_105  105  -  Slutfakturerat:
IDL_106  106  -  Datum:
IDL_107  107  -  Ändra projektstatus
IDL_108  108  -  Projektstatus %1 saknas. Registrera i rutin 786.


>STACK ROWS 100 SIZE 5000

>FONT ROWS 12
#id Hgt Wth Esc Ori Wgt Ita  Ul Sth Chs Opr Clp Qua Pch Name
1   -21   0   0   0 400   0  0   0   0   0   0   0   0 "MS Sans Serif"
2   -17   0   0   0 400   1  1   0   0   0   0   0   0 "Times Rmn"
3   -21   0   0   0 400   0  0   0   0   0   0   0   0 "President"
4    -9   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
5   -11   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
6   -11   0   0   0 400   1  0   0   0   0   0   0   0 "Arial"
7   -11   0   0   0 700   0  0   0   0   0   0   0   0 "Arial"
8   -13   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
9   -13   0   0   0 400   1  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 8
#id color	comment
1   0xff0000   	""
2   0xff       	""
3   0xff00ff   	""
4   0xffffff   	""
5   0xc0c0c0   	""
6   0x80       	""
7   0x808080   	""
8   0x0        	""


>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   134   230 S	-	-	"-"	  0	"Kundfaktura"

>FORM MAIN ROWS 37 SIZE 236 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D     11   16   76   13   52 -	PU	-	edProject	#8130	""
CE    12   30   76  144   86 -	Pc	-	cbProStatus	#8821	""
DP    13   44   76   13   52 D8	P	-	dpFinnishDate	-	""
XB    33   58   12   13   72 -	P	-	xbTidy	-	"Städas:"
D     47  179   76   13   52 -	pO	-	edOnAcc	#3231	""
WW    65   72   10   28  148 -	P	-	win1	-	""
DP    17  100   76   13   52 D8	P	-	dpInvoiceDate	#8711	""
D     37  114   76   13   52 -	HP	-	edVAT	#8572	""
B3    18   98  172   15   50 -	TP	-	pbOk	-	"ok.bmp,&Ok"
B3     2  116  172   15   50 -	xTP	-	pbCancel	-	"cancel.bmp,&Avbryt"
D     41  164   76   13   84 -	pO	-	edCustomer	#2021	""
DP    62  164   76   13   52 D8	HpO	-	dpOfferDate	-	""
XB    34   72   12   13   72 -	HP	-	xbEndInvoice	#865	"Slutfaktura:"
D     48  192   76   13   52 -	pO	-	edEndInvoiced	#3241	""
DP    63  178   76   13   52 D8	HpO	-	dpValidDate	#3115	""
D     49  206   76   13   52 f8	pO	-	edNotInvoiced	-	""
D     50  220   76   13   52 -	pO	-	edRepCost	#3251	""
T     53  222   14   11   60 -	p	-	txRepCost	-	"Rapp kostnad:"
D     40  150   76   13   84 -	pO	-	-	#3081	""
T     56  208   14   11   60 -	p	-	txNotInvoiced	-	"Ofakturerat:"
T     52  195   14   11   60 -	p	-	txEndInvoiced	-	"Slutfakturerat:"
T     51  180   14   11   60 -	p	-	txOnAcc	-	"Acontofakturerat:"
T     44  166   14   11   60 -	p	-	-	-	"Kund:"
T     43  152   14   11   60 -	p	-	-	-	"Projektnamn:"
T     38  116   14   11   60 -	Hp	-	txVAT	-	"Moms:"
T     36  102   14   11   61 -	Hp	-	txNet	-	"Netto:"
T     23   46   14   11   61 -	p	-	txFinnishDate	-	"Avslutat:"
T     24  102   14   11   61 -	p	-	txInvoiceDate	-	"Fakt.datum:"
T     21   32   14   11   61 -	p	-	-	-	"Status:"
T     20   18   14   11   61 -	p	-	-	-	"Ordernummer:"
B3    28   16  128   13    9 -	xTpfF	-	pbPrevOrder	-	"arrowl.bmp"
B3    29   16  136   13    9 -	xTpfF	-	pbNextOrder	-	"arrowr.bmp"
B3    26   16  144   13   15 -	xTpfF	-	pbProject	-	"seek.bmp"
T     57  208  132   11   28 -	p	-	txCurrency	-	""
D     35  100   76   13   52 -	HP	-	edNet	#8571	""
GB    64  142    6  102  158 -	p	-	-	-	""
GB    30    4    8  128  158 -	p	-	-	-	""

>FORM win1 ROWS 5 SIZE 44 "win1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
DP    66    0   66   13   52 D8	P	-	dpDeliverDate	#8712	""
D     69   14   66   13   52 5A	PU	-	edInvoiceSerie	#8830	""
B3    70   14  120   13   15 -	SxTpfF	-	pbInvoiceSerie	-	"seek.bmp"
T     67    2    4   11   60 -	p	-	-	-	"Värderingsdatum:"
T     68   16    4   11   60 -	p	-	-	-	"Fakturanrserie:"

>FORMFILES win1 ROWS 0
#Id	sp
>SOURCE
