>TYPE   	D
>NAME   	SEVEIMP.d
>CODE   	SEVEIMP.cod
>BY     	@(#)$Author: Magnus $
>DATE   	@(#)$Date: 05-09-01 13:12 $
>VERSION	@(#)$Revision: 2 $
>ID     	84

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

>TEXTINFO ROWS 12 SIZE 255
#id    value    flags    text
IDL_103  103  -  Kan inte hitta filen
IDL_104  104  -  Radera importtypen %1, dess egenskaper och filbeskrivningen
IDL_107  107  -  Kan inte radera medlevererade typer
IDL_108  108  -  Typ ej angiven
IDL_109  109  -  Kan inte hitta importtypen
IDL_110  110  -  Kan inte ladda fillayout
IDL_111  111  -  Skarp
IDL_112  112  -  Test
IDL_113  113  -  Fillayout saknas
IDL_114  114  -  Spara filbeskrivning
IDL_115  115  -  Res&ultat,Fe&l
IDL_116  116  -  Sökväg


>STACK ROWS 500 SIZE 6000

>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   336   420 SB	-	-	"-"	  0	"SEVEIMP"

>FORM MAIN ROWS 4 SIZE 4 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   621    4    4   15  408 -	PZ	-	win2	-	""
WW  2212   24    6   54  332 -	P	-	win21	-	""
WW  2121   24  346  284   66 -	PWz	-	win10	-	""
WW  2230   80    6  230  332 -	PWZ	-	win23	-	""

>FORM win2 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 -	STHpfF	-	pbTool	-	""
B3  2001    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2002    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2003    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2004    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2005    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2006    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2007    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2008    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2009    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2010    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2011    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2012    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2013    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2014    0    0   13   15 -	STHpfF	-	pbTool	-	""
FU  2020    0    0   15  406 -	pZ	-	-	-	""

>FORMFILES win2 ROWS 0
#Id	sp
>FORM win10 ROWS 9 SIZE 148 "Commands"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3  2211    0    0   15   64 -	TP	-	pbFileDesc	-	"edit.bmp,&Editera filbsk."
B3  2228   18    0   15   64 -	TP	-	pbDelete	-	"delete.bmp,Ra&dera typ"
B3  2229   36    0   15   64 -	TP	-	pbSave	-	"save.bmp,&Spara typ"
B3  2122   96    0   15   64 -	TP	-	pbStart	-	"dscomp.bmp,Läs &in"
RB  2233  126   12   10   50 -	RP	-	rbTest	-	"Test"
RB  2234  138   12   10   50 -	RP	-	rbReal	-	"Skarpt"
B3  2309   54    0   15   64 -	QP	-	pbSendEgn	-	"package.bmp,Sänd egn"
GB  2232  114    2   40   64 -	p	-	-	-	"Importläge"
B3     2  264    0   15   64 -	TPw	-	pbCancel	-	"exit.bmp,St&äng"

>FORMFILES win10 ROWS 0
#Id	sp
>FORM win21 ROWS 10 SIZE 57 "win21"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   2214    4   44   13   16 A1	PU	-	edType	-	""
D   2217   18   44   13   60 -	P	-	edTypeName	#13705	""
D   2221   32   44   13  126 -	P	-	edPath	-	""
WW  2223    0  214   52  110 -	P	-	win22	-	""
T   2213    4    0   14   42 -	p	-	-	-	"Typ:"
T   2216   18    0   11   42 -	p	-	-	-	"Beteckning:"
T   2220   32    0   11   42 -	p	-	-	-	"Fil:"
B3  2215    2   62   13   15 -	SxTpfF	-	pbType	-	"seek.bmp"
B3  2222   32  172   13   15 -	SxTpfF	-	pbPath	-	"foldercl.bmp"
B3  2304   32  188   13   15 -	SxTpfF	-	pbOpen	-	"edit.bmp"

>FORMFILES win21 ROWS 0
#Id	sp
>FORM win22 ROWS 4 SIZE 69 "win22"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
RB  2225   12   12   10   90 -	RP	-	rbBoth	-	"Nyreg och uppdatering"
RB  2226   22   12   10   90 -	RP	-	rbNew	-	"Endast nyregistrering"
RB  2227   32   12   10   90 -	RP	-	rbUpdate	-	"Endast uppdatering"
GB  2224    0    0   50  106 -	p	-	-	-	"Urval"

>FORMFILES win22 ROWS 0
#Id	sp
>FORM win23 ROWS 1 SIZE 24 "Resultat"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
TB  2243    2    2  226  328 -	PWZ	-	tab1	-	"Tab&1,Tab&2,Tab&3,Tab&4"

>FORMFILES win23 ROWS 0
#Id	sp
>FORM tab1 ROWS 2 SIZE 2 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  2244   12    2  210  324 -	PWZ	-	win24	-	""
WW  2264   12    2  196  324 -	P	-	win25	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win24 ROWS 14 SIZE 104 "win24"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   2245  188    4   11   70 -	p	-	-	-	"Antal poster:"
T   2246  198    4   11   70 -	p	-	-	-	"Nyregistrerade poster:"
T   2247  188  116   11   66 -	p	-	-	-	"Uppdaterade poster:"
T   2248  188   80   11   30 -	p	-	txReadRec	-	"0"
T   2249  198   80   11   30 -	p	-	txNewRec	-	"0"
T   2250  198  186   11   30 -	p	-	txError	-	"0"
GR  2253   16    2   64  320 -	pWZ	-	lcRec	-	""
T   2260  198  116   11   66 -	p	-	-	-	"Felaktiga poster:"
T   2261  188  186   11   30 -	p	-	txUpdateRec	-	"0"
T   2262  188  224   11   46 -	p	-	-	-	"Importläge:"
T   2263  188  272   11   48 -	p	-	txMode	-	"Test"
GR  2281  100    2   84  320 -	pZ	-	lcDnrs	-	""
WW  2305   88    2   12  320 -	PZ	D6	win26	-	""
WW  2307    4    2   12  320 -	PZ	D6	win27	-	""

>FORMFILES win24 ROWS 0
#Id	sp
>FORM lcResult ROWS 2 SIZE 15 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   2279    0    0   11  208 -	Hp	-	-	#8125	"Post"
T   2280    0  210   11  106 -	Hp	-	-	#8120	"Operation"

>FORMFILES lcResult ROWS 0
#Id	sp
>FORM win25 ROWS 2 SIZE 18 "Fel"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR  2265   14    2  176  316 -	p	-	lcErrors	-	""
T   2303    4    6   11   60 -	p	-	-	-	"Felaktiga poster"

>FORMFILES win25 ROWS 0
#Id	sp
>FORM lcRec ROWS 2 SIZE 15 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   2284    2    4   11  196 -	Hp	-	-	#8125	"Post"
T   2285    2  202   11  104 -	Hp	-	-	#8110	"Operation"

>FORMFILES lcRec ROWS 0
#Id	sp
>FORM lcDnrs ROWS 5 SIZE 49 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   2295    1    1   11   32 -	Hp	-	-	#8847	"Datanr"
T   2296    1   33   11   66 -	Hp	-	-	#8833	"Benämning"
T   2297    1   99   11  102 -	Hp	-	-	#12861	"Gammalt värde"
T   2298    1  201   11  104 -	Hp	-	-	#12862	"Nytt värde"
T   2299    1  305   11    0 -	Hp	-	-	#12865	"Nyckel"

>FORMFILES lcDnrs ROWS 0
#Id	sp
>FORM lcErrors ROWS 3 SIZE 16 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   2300    1    1   11   94 -	Hp	-	-	#12863	"Post"
T   2301    2   96   11   30 -	Hp	-	-	#8713	"Filrad"
T   2302    2  132   11  178 -	Hp	-	-	#12864	"Fel"

>FORMFILES lcErrors ROWS 0
#Id	sp
>FORM win26 ROWS 1 SIZE 10 "win26"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   2306    0    6   11  100 -	p	C9D6F8	-	-	"Postrader"

>FORMFILES win26 ROWS 0
#Id	sp
>FORM win27 ROWS 1 SIZE 7 "win27"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   2308    0    6   11  116 -	p	C9D6F8	-	-	"Poster"

>FORMFILES win27 ROWS 0
#Id	sp
>SOURCE
