>TYPE   	D
>NAME   	712-c.d
>CODE   	712-c.cod
>BY     	@(#)$Author: Mats $
>DATE   	@(#)$Date: 07-01-10 8:06 $
>VERSION	@(#)$Revision: 2 $
>ID     	7166

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

>TEXTINFO ROWS 15 SIZE 710
#id    value    flags    text
IDL_100  100  -  Prislista
IDL_101  101  -  Kundavtal
IDL_102  102  -  Kampanj
IDL_103  103  -  Prislista måste anges
IDL_104  104  -  Kundavtal måste anges
IDL_105  105  -  Kampanjkod måste anges
IDL_106  106  -  Från-datum måste anges vid kopiering inom samma prislista
IDL_107  107  -  Från-datum måste anges vid kopiering inom samma kundavtal
IDL_109  109  -  %1 priser kopierade
IDL_110  110  -  Kundavtalets startdatum är %1
IDL_111  111  -  Inga priser kopierade
IDL_115  115  -  Från %1:
IDL_116  116  -  Till %1:
IDL_117  117  -  Felaktigt datumintervall
IDL_118  118  -  Kundavtalets slutdatum är %1


>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   150   334 SB	-	-	"-"	  0	"Kopiera priser"

>FORM MAIN ROWS 4 SIZE 39 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW    78    4    2  114  160 -	P	-	win3	-	""
WW    62    4  164  114  168 -	P	-	win1	-	""
B3    45  120  226   15   50 -	TP	-	pbOk	-	"ok.bmp,&Verkställ"
B3     2  120  282   15   50 -	TP	-	pbCancel	-	"cancel.bmp,Av&bryt"

>FORM win1 ROWS 13 SIZE 81 "win1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
RB    63   12    6   10   52 -	RP	-	rbPriceList	-	"Prislista"
RB    65   26    6   10   52 -	RP	-	rbAgreement	-	"Kundavtal"
RB    67   40    6   10   52 -	RP	-	rbDrive	-	"Kampanj"
CE    64   10   62  150  100 -	Pc	-	cbPriceList	#851	""
CE    66   24   62  150  100 -	Pc	-	cbAgreement	#852	""
CE    68   38   62  150  100 -	Pc	-	cbDrive	#853	""
CE    83   52   62  150  100 -	DPc	-	cbToPriceList	#857	""
DP    92   80   62   13   50 D8	pO	-	dpFromDate	#844	""
DP    94   94   62   13   50 D8	pO	-	dpToDate	#846	""
T     82   54   18   11   40 -	p	-	-	-	"Prislista"
T     93   96   18   11   44 -	p	-	-	-	"Till datum:"
T     91   82   18   11   44 -	p	-	-	-	"Från datum:"
GB    69    0    0  112  168 -	p	-	-	-	"Kopiera till"

>FORMFILES win1 ROWS 0
#Id	sp
>FORM win3 ROWS 15 SIZE 105 "win3"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D     85   10   68   13   44 -	pO	-	edHead	-	""
D     89   38   68   13   50 -	pO	-	edCodeType	-	""
D    100   52   68   13   66 -	PU	-	edFromCode	#841	""
D    101   66   68   13   66 -	PU	-	edToCode	#849	""
DP    79   80   68   13   50 D8	P	-	dpPriceDate	#842	""
T     80   82    6   11   62 -	p	-	-	-	"Priser giltiga:"
T     95   40    6   11   62 -	p	-	-	-	"Prisnivå:"
D     87   24   68   13   22 -	DpO	-	edPriceList	-	""
T     98   54    6   11   62 -	p	-	txFrom	-	"Från"
T     99   68    6   11   62 -	p	-	txTo	-	"Till:"
T     84   12    6   11   62 -	p	-	txHead	-	"Avtalstyp:"
T     86   26    6   11   62 -	Dp	-	txPriceList	-	"Prislista, kampanj:"
B3   102   50  136   13   15 -	xQpF	-	pbFromCode	-	"seek.bmp"
B3   103   64  136   14   15 -	xQpF	-	pbToCode	-	"seek.bmp"
GB    90    0    2  112  156 -	p	-	-	-	"Kopiera från"

>FORMFILES win3 ROWS 0
#Id	sp
>SOURCE
