>TYPE   	D
>NAME   	chcust.d
>CODE   	chcust.cod
>BY     	@(#)$Author: Helene $
>DATE   	@(#)$Date: 05-08-18 13:19 $
>VERSION	@(#)$Revision: 4 $
>ID     	4090

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

>TEXTINFO ROWS 4 SIZE 107
#id    value    flags    text
IDL_100  100  -  Kunden saknas
IDL_101  101  -  Felaktigt antal parametrar till 'chcust.d'
IDL_102  102  -  Kund måste anges
IDL_105  105  -  Möjligt att ändra leveransadress


>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 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   225   280 SB	-	-	"-"	  0	"Byt kund"

>FORM MAIN ROWS 16 SIZE 142 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D     11   10   56   13   50 -	PU	-	edCustomer	#2001	""
D     12   24   56   13  130 -	P	-	edName	#2021	""
WW    40   54  192  126   84 -	P	-	win2	-	""
TB    58   46    4  134  184 -	P	-	tab1	-	"&1.Lev.Adress"
B3    19  190  172   15   50 -	TP	-	pbOk	-	"ok.bmp,&Ok"
B3     2  190  226   15   50 -	TP	-	pbCancel	-	"cancel.bmp,Av&bryt"
B3    24    8  216   15   50 -	Qp	-	pbNewCustomer	-	"new.bmp,&Ny kund"
B3    16   24  186   13    9 -	xTPF	-	pbPrevName	-	"arrowl.bmp"
B3    17   10  114   13    9 -	xTPF	-	pbNextCustomer	-	"arrowr.bmp"
B3    18   24  194   13    9 -	xTPF	-	pbNextName	-	"arrowr.bmp"
T     13   12    8   11   46 -	p	-	-	-	"Kundkod:"
T     14   26    8   11   46 -	p	-	-	-	"Kund:"
B3    21   10  122   13   15 -	xTPF	-	pbCustomer	-	"seek.bmp"
B3    22   24  202   13   15 -	xTPF	-	pbName	-	"seek.bmp"
B3    15   10  106   13    9 -	xTPF	-	pbPrevCustomer	-	"arrowl.bmp"
FR    26    6    4   36  270 -	p	-	-	-	""

>FORM win2 ROWS 2 SIZE 25 "Criteria"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
XB    42   10    6   10   72 -	RP	-	xbAdress	-	"Byt lev.adress"
GB    41    0    0  126   84 -	p	-	-	-	"Kriterier"

>FORMFILES win2 ROWS 0
#Id	sp
>FORM tab1 ROWS 1 SIZE 1 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW    37   14    4  116  176 -	P	-	win1	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win1 ROWS 16 SIZE 115 "Levadr"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
CE    48    4   52  236  106 -	Pc	-	cbAdress	#3025	""
D     27   18   52   13  120 -	P	-	edAdr1	#3027	""
D     29   32   52   13  120 -	P	-	edAdr2	#3030	""
D     31   46   52   13  120 -	P	-	edAdr3	#3031	""
D     30   60   52   13  120 -	P	-	edAdr4	#3033	""
D     32   74   52   13  120 -	P	-	edAdr5	#3034	""
D     50   88   52   13  120 -	P	-	edAdr6	#3035	""
D     56  102   52   13  120 -	P	-	-	#3051	""
T     36   76    4   11   46 -	p	-	-	-	"Lev.adress 5:"
T     34   48    4   11   46 -	p	-	-	-	"Lev.adress 3:"
T     28   20    4   11   46 -	p	-	-	-	"Lev.adress 1:"
T     51   90    4   11   46 -	p	-	-	-	"Lev.adress 6:"
T     35   62    4   11   46 -	p	-	-	-	"Lev.adress 4:"
T     57  104    4   11   48 -	p	-	-	-	"Godsadress:"
T     33   34    4   11   44 -	p	-	-	-	"Lev.adress 2:"
T     49    6    4   11   46 -	p	-	-	-	"Adresskod:"

>FORMFILES win1 ROWS 0
#Id	sp
>SOURCE
