>TYPE   	D
>NAME   	742.d
>CODE   	742.cod
>BY     	@(#)$Author: Peter $
>DATE   	@(#)$Date: 07-04-26 10:36 $
>VERSION	@(#)$Revision: 4 $
>ID     	7090

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

>TEXTINFO ROWS 11 SIZE 210
#id    value    flags    text
IDL_100  100  -  Rutinen är ej installerad
IDL_101  101  -  Felaktigt intervall
IDL_102  102  -  %1 måste anges
IDL_103  103  -  Inget att kostnadsföra
IDL_104  104  -  1 = Utleveranser
IDL_105  105  -  2 = Inventeringsdiff
IDL_106  106  -  2 = Inleveranser
IDL_107  107  -  3 = Alla
IDL_108  108  -  Förhandsgranska
IDL_109  109  -  Överföring registrerad
IDL_110  110  -  Ingen bokföring skapad


>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 2
#id Eventname	ParamList
1041	ArtCatSelect	(int iCat)
1051	AfterGetDepObj	(str sObj, str sDep)


>WINDOW ROWS 1
#id       x     y    cy    cx sp1	sp2	Bitmap	font	size	caption
5511     10    10   300   416 SB	-	-	"-"	  0	"742 Kostnadsbokföring"

>FORM MAIN ROWS 6 SIZE 41 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4099   28    8   20  314 -	P	-	win13	-	""
WW  4072    6    8   18  390 -	pZ	-	win9	-	""
GR  4131   52    8   86  314 -	pWZ	-	lcTable	-	""
TB  4224  142    8  128  314 -	PZ	-	tab1	-	" Kostnadsbokföring "
WW  4080   54  326  130   84 -	Pz	-	win12	-	""
B3     2  256  328   15   80 -	xTPwz	-	pbClose	-	"Exit.bmp, St&äng"

>FORM tab1 ROWS 3 SIZE 3 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4137   16    4  106  184 -	P	-	win14	-	""
WW  4148   14    4  111  184 -	P	-	win15	-	""
WW  4168   17  192  106  116 -	P	-	win16	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win9 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  386 -	pZ	-	-	-	""

>FORM win12 ROWS 5 SIZE 110 "Operations"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3  4128    2    2   15   80 -	TP	-	pbCreate	-	"ok.bmp,Ska&pa förslag"
B3  4081   19    2   15   80 -	TP	-	pbPrint	-	"Print.bmp, &Bokföringorder"
B3  4083   36    2   15   80 -	TP	-	pbMak	-	"delete.bmp, &Makulera förslag"
B3  4082   53    2   15   80 -	TP	-	pbTransfer	-	"ok.bmp, &Skapa bokf&öring"
PS  4130   72    2   11   80 -	Hp	CFD9	psTransQuant	-	"Text"

>FORMFILES win12 ROWS 0
#Id	sp
>FORM win13 ROWS 3 SIZE 106 "Commands"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3  4100    3    2   15  100 -	TPM	-	pbAcounting	-	"nothing.bmp, Skapa &bokföring"
B3  4101    3  105   15  100 -	TPM	-	pbProjAcounting	-	"Nothing.bmp, &Kostnadsbokför projekt"
B3  4102    3  208   15  100 -	THPM	-	pbMPLAcounting	-	"nothing.bmp, &Lagerbokför tillverkning"

>FORM lcTable ROWS 12 SIZE 78 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4214    2    1   11   40 -	Hp	-	-	#17701	"Konto"
T   4215    2   41   11   40 -	Hp	-	-	#17702	"Objekt"
T   4216    2   81   11   40 -	Hp	-	-	#17703	"Avdelning"
T   4217    2  121   11   65 -	RHp	-	-	#17704	"Debet"
T   4218    2  187   11   65 -	RHp	-	-	#17705	"Kredit"
T   4225    2  252   11   35 -	Hp	-	-	#17713	"Dim 3"
T   4226    2  287   11   35 -	Hp	-	-	#17714	"Dim 4"
T   4227   14    1   11   35 -	Hp	-	-	#17715	"Dim 5"
T   4228   14   37   11   35 -	Hp	-	-	#17716	"Dim 6"
T   4229   14   72   11   35 -	Hp	-	-	#17717	"Dim 7"
T   4230   14  107   11   35 -	Hp	-	-	#17718	"Dim 8"
T   4231   14  143   11   35 -	Hp	-	-	#17719	"Dim 9"

>FORM win14 ROWS 13 SIZE 126 "win14"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   4138    6   64   13   70 -	P	-	edFrOrder	#841	""
D   4139   20   64   13   70 -	P	-	edToOrder	#849	""
B3  4140    5  155   13   15 -	xTpF	-	pbFrOrder	-	"seek.bmp"
B3  4141   19  155   13   15 -	xTpF	-	pbToOrder	-	"seek.bmp"
CE  4142   34   64  100  106 -	Pc	-	cbProjType	#856	""
T   4143    7    1   11   62 -	p	-	txFrOrder	-	"Från ordernummer:"
T   4144   20    1   11   62 -	p	-	txToOrder	-	"Till ordernummer:"
PB  4145   53   64   13   56 -	P	-	pbChoose	-	"Väl&j ordrar"
T   4175   36    1   11   62 -	p	-	txProjType	-	"Projekttyp:"
B3  4176    5  135   13    9 -	xTpF	-	pbFrOrderPrev	-	"arrowl.bmp"
B3  4177   19  135   13    9 -	xTpF	-	pbToOrderPrev	-	"arrowl.bmp"
B3  4178    5  145   13    9 -	xTpF	-	pbFrOrderNext	-	"arrowr.bmp"
B3  4179   19  145   13    9 -	xTpF	-	pbToOrderNext	-	"arrowr.bmp"

>FORMFILES win14 ROWS 0
#Id	sp
>FORM win15 ROWS 14 SIZE 112 "win15"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
CE  4149    2   50   50  112 1	P	-	cbSelect	-	""
CE  4150   16   50   50  112 A10	Pc	-	cbArtType	#851	""
CE  4151   30   50  100  112 -	Pc	-	cbCreateProjType	#853	""
DP  4153   44   50   13   52 D8	P	-	dpFromDate	#844	""
DP  4154   44  112   13   50 D8	P	-	dpToDate	#846	""
T   4156    4    4   11   44 -	p	-	txSelect	-	"Urval:"
T   4157   18    4   11   44 -	p	-	txArtType	-	"Artikeltyp:"
T   4158   32    4   11   44 -	p	-	txCreateProjType	-	"Projekttyp:"
T   4173   46    4   11   44 -	p	-	txDate	-	"Trans.datum:"
T   4174   46  103   11    6 -	p	-	-	-	" -"
XB  4221   70   11   10   88 -	RP	-	xbCat1	-	"Lagerförda artiklar"
XB  4222   80   11   10   86 -	RP	-	xbCat2	-	"Ej lagerförda artiklar"
XB  4223   90   11   10   86 -	RP	-	xbCat3	-	"Tider"
GB  4220   60    3   48  100 -	p	-	-	-	"Kategorier"

>FORMFILES win15 ROWS 0
#Id	sp
>FORM win16 ROWS 3 SIZE 40 "win16"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
XB  4169   16    9   10   80 -	P	-	xbShowTrans	-	"Visa Transaktioner"
CE  4171   30    8   83  100 -	Pc	-	cbPrinter	#815	""
GB  4172    2    4   46  108 -	p	-	gbPrintInfo	-	"Utskriftsegenskaper"

>FORMFILES win16 ROWS 0
#Id	sp
>SOURCE
