>TYPE   	D
>NAME   	REGVER.d
>CODE   	REGVER.cod
>BY     	@(#)$Author: Annhe $
>DATE   	@(#)$Date: 06-01-20 13:29 $
>VERSION	@(#)$Revision: 9 $
>ID     	9069

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

>TEXTINFO ROWS 81 SIZE 2093
#id    value    flags    text
IDL_100  100  -  F6 = Momsavräkning
IDL_102  102  -  Standardtext saknas
IDL_103  103  -  F6 = Omvandla %1-belopp till %2
IDL_106  106  -  Objekt %1 saknas
IDL_107  107  -  Objekt %1 avregistrerat
IDL_108  108  -  Objekt %1 används ej detta år
IDL_109  109  -  Avdelning %1 saknas
IDL_110  110  -  Avdelning %1 avregistrerad
IDL_111  111  -  Avdelning %1 används ej detta år
IDL_112  112  -  Momsavräkning
IDL_113  113  -  Ej resultatkonto
IDL_114  114  -  Momskonto %1 saknas
IDL_115  115  -  Momskod %1 saknas
IDL_117  117  -  Verifikatet saknas
IDL_118  118  -  Perioden är ej öppen
IDL_119  119  -  Period saknas för %1
IDL_120  120  -  Moms avräknad i denna period
IDL_121  121  -  Verifikatet balanserar inte
IDL_122  122  -  Balansen är 0
IDL_123  123  -  Debetkonto
IDL_124  124  -  Kreditkonto
IDL_125  125  -  Orderpåföring?
IDL_126  126  -  Makulera verifikat
IDL_127  127  -  Gammal rad, får ej ändras
IDL_128  128  -  Aktivera
IDL_129  129  -  Konto ej angivet
IDL_130  130  -  Radera
IDL_131  131  -  Parkera
IDL_132  132  -  Verifikatserie
IDL_133  133  -  Beteckning
IDL_134  134  -  Verifikatnummer måste anges
IDL_135  135  -  Objekt måste anges
IDL_136  136  -  Avdelning måste anges
IDL_137  137  -  Valutabelopp ej angivet
IDL_138  138  -  Verifikatserie inte angiven
IDL_139  139  -  Verifikatserie saknas för bokföringsåret
IDL_140  140  -  Valutakurs ej angiven
IDL_141  141  -  Datum måste anges
IDL_142  142  -  Bankkurs saknas
IDL_143  143  -  Makulera rad
IDL_144  144  -  Text måste anges
IDL_145  145  -  Makulera ändringar
IDL_146  146  -  Otillåtet datum
IDL_147  147  -  Fler tilläggsverifikat kan inte göras
IDL_148  148  -  Spara verifikat %1
IDL_149  149  -  Ny
IDL_150  150  -  Mak
IDL_151  151  -  &Makulera ändring
IDL_152  152  -  &Makulera verifikat
IDL_153  153  -  Sista ver.nr har använts
IDL_155  155  -  Serien är upptagen av %1
IDL_156  156  -  Verifikatet är ett icke hämtat periodiseringsverifikat
IDL_157  157  -  Verifikatet är ett hämtat periodiseringsverifikat
IDL_158  158  -  Spara som periodiseringsverifikat igen för att ändra periodiseringen
IDL_160  160  -  Konto %1 är ett periodiseringskonto
IDL_162  162  -  Verifikat %1 sparas och ett spegelverifikat att hämta nästa period skapas
IDL_163  163  -  Beloppet i %2 och beloppet i %1 har inte samma tecken
IDL_164  164  -  Ändringen gäller bara för aktuellt verifikat
IDL_165  165  -  Orderpåföring kan inte vändas på rad %1, hittar inte %2
IDL_166  166  -  Högsta tillåtna parkeringsnr är 99
IDL_167  167  -  F8 = Sök
IDL_168  168  -  Det finns periodiseringar att överföra i perioden
IDL_169  169  -  Funktionen är spärrad
IDL_170  170  -  Du är redan inloggad i rutin 910
IDL_172  172  -  910 Registrera verifikat
IDL_173  173  -  Kurs
IDL_174  174  -  Datum
IDL_175  175  -  Inventarie %1 är makulerad
IDL_176  176  -  Verifikatnr %1 skapat
IDL_177  177  -  Inventarienr: %1
IDL_178  178  -  910 Verifikat %1 %2 %3
IDL_179  179  -  Post i LU %1 kunde inte uppdateras
IDL_181  181  -  Post %1 i LU %2 kunde inte hittas
IDL_182  182  -  Kontoklass %1 saknas i kontoplan %2. Kontoplan registreras i rutin 963
IDL_183  183  -  Konto %1 har ingen momskod
IDL_184  184  -  Verifikatserien kan ej spärras
IDL_185  185  -  Verifikatserie kunde inte frisläppas
IDL_186  186  -  Filen %1 kan inte öppnas
IDL_187  187  -  Inventarie %1 skapad
IDL_188  188  -  Post %1 i LU %2 kunde inte raderas
IDL_190  190  -  Verifikat med hämtade periodiseringar kan inte parkeras


>STACK ROWS 500 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	0xc0c0c0
2   1	pattern
3   2	tegel.bmp
5   4	0xff
6   5	0x0


>APPEVENTS ROWS 1
#id Eventname	ParamList
1053	BeforeCostPlace	()


>WINDOW ROWS 1
#id       x     y    cy    cx sp1	sp2	Bitmap	font	size	caption
5511     20    90   300   440 SBL	-	-	"-"	  0	"910 Registrera verifikat"

>FORM MAIN ROWS 6 SIZE 60 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   621    0    2   16  362 -	PhmZ	-	win4	-	""
WW  4239   20    0   40  366 -	P	-	win13	-	""
WW  4248   76  354  162   82 -	P	-	win14	-	""
TB   124   64    2  196  350 -	PWZ	-	tab1	-	"Verifikath&uvud,Verifikatrad&er"
B3     2  244  356   15   77 -	xTPhz	-	-	-	"exit.bmp,St&äng"
B3 24168    0    0   13    9 -	SxTpfF	-	-	-	"seek.bmp"

>FORMFILES MAIN ROWS 1
#Id	sp
250	r
>FORM tab1 ROWS 2 SIZE 2 "623 - tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   680   16    4  178  342 -	PWZ	-	win1	-	""
WW  4127   16    4  178  324 -	P	-	win9	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win1 ROWS 41 SIZE 323 "Rows"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR  4214   18    2   88  338 -	pWZ	-	lcTable	-	""
D   4101  108   34   13   50 -	PU	-	edAccount	#28001	""
D   4102  108  124   12   50 -	pU	-	edObject	#28021	""
D   4103  108  212   13   50 -	pU	-	edDepartment	#28031	""
D   2255  122   34   13  160 -	P$	-	edTranstext	#28071	""
D   2257  136   34   12   56 f15.2	P$	-	edAmount	#28051	""
CE  4194  136  150   76   46 -	HPc	-	cbExchangeRate	#28088	""
D   4199  148   34   13   56 f12.2	HP	-	edCurrencyAmount	#28062	""
B3  2415  162    2   15   58 -	QP	-	pbOk	-	"save.bmp,Spara ra&d"
B3  2416  162   62   15   58 -	QP	-	pbNewRow	-	"new.bmp,N&y rad"
B3  4217  162  122   15   62 -	QP	-	pbDeleteRow	-	"del.bmp,Maku&lera rad"
B3 24026  162  186   15   82 -	QP	-	pbChangePer	-	"edit.bmp,Ändra peri&odisering"
B3 24148  162  270   15   70 -	QP	-	pbShowRows	-	"info.bmp,Ursprungsrader"
T   4200  151    4   10   28 -	p	-	txCurrency	-	"SEK:"
T   2258  138    4   11   28 -	p	-	-	-	"Belopp:"
T   2254  124    4   11   28 -	p	-	-	-	"Text:"
T   2252  110    4   11   28 -	p	-	-	-	"Konto:"
B3 24033  108  102   13   15 -	SxTpfF	-	pbAccount	-	"seek.bmp"
T   4226    5  240   10   24 -	p	-	-	-	"Balans:"
B3 24034  108  192   13   15 -	SxTpfF	-	pbObject	-	"seek.bmp"
D   4227    2  270   13   60 -	pO	-	edBalance	#28052	""
B3  4105  122  196   13   15 -	SxTpfF	-	pbTranstext	-	"seek.bmp"
D   4225    2   38   13  116 -	pO	-	edVerification	-	""
T   4224    5    4   10   32 -	p	-	-	-	"Verifikat:"
B3 24035  108  280   13   15 -	SxTpfF	-	pbDepartment	-	"seek.bmp"
D  24136    2  188   13   44 -	pO	-	edShowDate	#28045	""
T  24137    5  160   10   24 -	p	-	-	-	"Datum:"
T  24147  110  166   11   40 -	Hp	-	txDep	-	"Avdelning:"
T   4195  138  124   11   24 -	Hp	-	txRate	-	"Kurs:"
T  24161  138  216   11   40 -	p	-	txInfoObject	-	"Objekt:"
T  24162  150  216   11   40 -	p	-	txInfoDep	-	"Avdelning:"
T  24163  138  256   11   82 -	p	-	txObjName	-	""
T  24164  150  256   11   82 -	p	-	txDepName	-	""
B3 24165  108  272   13    9 -	SxTpfF	-	pbDepArrowR	-	"arrowR.bmp"
B3 24166  108  264   13    9 -	SxTpfF	-	pbDepArrowL	-	"arrowL.bmp"
B3 24167  108  184   13    9 -	SxTpfF	-	pbObjectArrowR	-	"arrowR.bmp"
B3 24169  108  176   13    9 -	SxTpfF	-	pbObjectArrowL	-	"arrowL.bmp"
B3 24170  108   94   13    9 -	SxTpfF	-	pbAccArrowR	-	"arrowR.bmp"
B3 24171  108   86   13    9 -	SxTpfF	-	pbAccArrowL	-	"arrowL.bmp"
T  24172  124  216   11   40 -	p	-	-	-	"Saldo:"
T  24173  124  256   11   82 -	p	-	txSaldo	#28061	""

>FORMFILES win1 ROWS 0
#Id	sp
>FORM win4 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  4071    0    0   15  360 -	pZ	-	-	-	""

>FORM lcTable ROWS 9 SIZE 53 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T  24151    0    1   11   20 -	Hp	-	-	#22509	"Rad"
T  24152    0   21   11   23 -	Hp	-	-	#22510	"Konto"
T  24153    0   44   11   25 -	Hp	-	-	#22511	"Objekt"
T  24154    0   69   11   36 -	Hp	-	-	#22512	"Avdelning"
T  24155    0  105   11   68 -	Hp	-	-	#22521	"Trans.text"
T  24143    0  173   11   46 -	RHp	-	-	#8851	"Debet"
T  24144    0  219   11   48 -	RHp	-	-	#8852	"Kredit"
T  24145    0  267   11    8 -	Hp	-	-	#8821	""
T  24146    0  275   11   18 -	RHp	-	-	#8830	""

>FORMFILES lcTable ROWS 0
#Id	sp
>FORM win9 ROWS 20 SIZE 132 "Head"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW 24029   20   50   14  102 -	P	-	win15	-	""
CE  4223    6   52  228   74 -	HDPc	-	cbSerie	#28081	""
D  24032   34   52   13   54 -	HpO	-	dpBookDate	#28045	""
DP  4190   34   52   13   56 D8	DP	-	dpDate	#28045	""
XB 24006   36  116   10   68 -	RDp	-	xbClosingPeriod	-	"&Bokslutsverifikat"
XB 24149   36  186   10   86 -	RDp	-	xbAuto	-	"Aut&omatkonteringar"
D   4139   48   52   13  198 -	DP$	-	edVertext	#28072	""
D   4133   62   52   13   54 A9	DpU	-	edRef	#28075	""
D   4135   76   52   13   54 A10	DpU	-	edMotpart	#28076	""
D   4131   90   52   13  198 A30	Dp	-	edInfo1	#28073	""
D   4129  104   52   13  198 A30	Dp	-	edInfo2	#28074	""
T  24007   36    8   10   42 -	p	-	-	-	"Ver.datum:"
T   4134   78    8   11   42 -	p	-	-	-	"Motpart:"
T   4222    8    8   10   42 -	Hp	-	txSerie	-	"Ver.serie:"
T   4130   92    8   11   42 -	p	-	-	-	"Info 1:"
T   4136   22    8   11   42 -	p	-	txVerNr	-	"Ver.nr:"
T   4128  106    8   11   42 -	p	-	-	-	"Info 2:"
T   4137   50    8   11   42 -	p	-	-	-	"Ver.text:"
B3  4143   48  252   13   15 -	SxTpfF	-	pbVertext	-	"seek.bmp"
T   4132   64    8   11   42 -	p	-	-	-	"Referens:"

>FORMFILES win9 ROWS 0
#Id	sp
>FORM win13 ROWS 6 SIZE 118 "Commands"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
CE  4245    4   32  100   40 -	Pc	-	cbYear	#24901	""
B3  4240   20    2   15   77 -	TPM	-	pbNew	-	"new.bmp,&Nytt verifikat"
B3  4241   20   82   15   77 -	TPM	-	pbOpen	-	"open.bmp,&Öppna verifikat"
B3  4242   20  162   15   77 -	TPM	-	pbSupplement	-	"append.bmp,&Tilläggsverifikat"
B3 24150   20  242   15   77 -	QPM	-	pbPrintVer	-	"print.bmp, Skri&v verifikat"
T   4246    8    4   10   24 -	p	-	-	-	"Bokf.år:"

>FORMFILES win13 ROWS 0
#Id	sp
>FORM win14 ROWS 9 SIZE 255 "Operations"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3  4253   18    2   15   77 -	QP	-	pbCancelVer	-	"del.bmp,&Makulera verifikat"
B3  4250   36    2   15   77 -	QP	-	pbCodingTemplate	-	"templ.bmp,&Konteringsmall"
B3  4251   54    2   15   77 -	QP	-	pbParkVer	-	"p.bmp,&Parkera verifikat"
B3 24008   72    2   15   77 -	QP	-	pbGetParkedVer	-	"poff.bmp,Hämta& parkerat"
B3  4252   90    2   15   77 -	QP	-	pbPrelVer	-	"nothing.bmp,Prel&iminärverifikat"
B3 24027  108    2   15   77 -	QP	-	pbPeriodVer	-	"nothing.bmp,Periodiseringsver&."
B3 24028  126    2   15   77 -	QP	-	pbGetPer	-	"nothing.bmp,Hämta periodiserin&g"
B3 24036  144    2   15   77 -	QP	-	pbOrderAss	-	"nothing.bmp,Orderp&åföring"
B3 24005    0    2   15   77 -	QP	-	pbSave	-	"save.bmp,&Spara verifikat"

>FORMFILES win14 ROWS 0
#Id	sp
>FORM win15 ROWS 4 SIZE 32 "win15"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D  24030    0    2   13   54 A6	Dp	-	edVerNr	#28041	""
B3 24031    0   74   13   15 -	SxTpfF	-	pbVerNr	-	"seek.bmp"
B3 24157    0   58   13    9 -	SxTpfF	-	pbVerArrowL	-	"arrowl.bmp"
B3 24158    0   66   13    9 -	SxTpfF	-	pbVerArrowR	-	"arrowr.bmp"

>FORMFILES win15 ROWS 0
#Id	sp
>SOURCE
