>TYPE   	D
>NAME   	3510-CPA.d
>CODE   	3510-CPA.cod
>BY     	@(#)$Author: Pelle $
>DATE   	@(#)$Date: 05-11-15 10:26 $
>VERSION	@(#)$Revision: 2 $
>ID     	22072

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

>TEXTINFO ROWS 3 SIZE 74
#id    value    flags    text
IDL_101  101  -  Tid måste anges
IDL_102  102  -  OK: 1   Avbryt: 0
IDL_107  107  -  Får ej vara tidigare än instämplingstid


>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      0     0   148   160 SB	-	-	"-"	  0	"Komplettera frånvarostämpling"

>FORM MAIN ROWS 5 SIZE 15 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
EM    56   10    8   30  146 -	POWZ	C1D9	edInfo	-	""
WW    57   46    4   68  154 -	Pw	-	win1	-	""
GB    71    2    4   42  154 -	pWZ	-	gbInfo	-	"Meddelande"
WW    78  119    6   23  154 -	Pw	-	win2	-	""
WW    81  119    7   23  154 -	Pw	-	win3	-	""

>FORM win1 ROWS 10 SIZE 59 "win1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T     58   12    6   11   36 -	p	-	-	-	"Datum"
DP    59   10   50   13   46 D8	pO	-	-	#30102	""
D     61   24   50   13   30 -	PO	-	-	#30103	""
T     64   26    6   11   34 -	p	-	-	-	"Tid ut:"
D     65   38   50   13   30 -	P	-	edTime	#30713	""
T     73   12  104   11   40 -	p	-	edDayText	-	""
T     75   40    6   11   36 -	p	-	-	-	"Till tid:"
T     76   54    6   11   44 -	p	-	-	-	"Anmärkning:"
D     77   52   50   13  100 -	P	-	edTransText	#30705	""
GB    70    0    0   68  154 -	p	-	-	-	"Frånvarostämpling"

>FORMFILES win1 ROWS 0
#Id	sp
>FORM win2 ROWS 2 SIZE 11 "win2"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D     79    2   52   13   20 -	P	-	edCmd	-	""
T     80    4    7   11   60 -	p	-	-	-	"Kommando:"

>FORMFILES win2 ROWS 0
#Id	sp
>FORM win3 ROWS 2 SIZE 30 "win3"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3    45    2   46   15   50 -	TP	-	pbOk	-	"ok.bmp,&Ok"
B3     2    2  100   15   50 -	xTP	-	pbCancel	-	"cancel.bmp,Av&bryt"

>FORMFILES win3 ROWS 0
#Id	sp
>SOURCE
