>TYPE   	D
>NAME   	420.d
>CODE   	420.cod
>BY     	@(#)$Author: Jessicaj $
>DATE   	@(#)$Date: 09-04-01 10:46 $
>VERSION	@(#)$Revision: 18 $
>ID     	4072

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

>TEXTINFO ROWS 35 SIZE 816
#id    value    flags    text
IDL_101  101  -  Antal måste anges
IDL_102  102  -  Artikeln saknas i projektet
IDL_103  103  -  &Visa
IDL_104  104  -  Förhandsgranska
IDL_105  105  -  Anteckningar
IDL_106  106  -  Felaktigt datum
IDL_107  107  -  Ordernumret finns redan
IDL_108  108  -  Ordernumret måste börja med en bokstav
IDL_109  109  -  Lager ej angivet
IDL_110  110  -  Överstiger levererat antal
IDL_111  111  -  Måste vara större än 0
IDL_112  112  -  Kunden saknas
IDL_113  113  -  Lagerpris:
IDL_114  114  -  Inköpspris/lev:
IDL_115  115  -  Artikel saknas
IDL_116  116  -  Kalkylpris:
IDL_117  117  -  Setartikeln innehåller bara textrader
IDL_118  118  -  F3:Visa order / välj orderrad
IDL_119  119  -  F3:Utleverans lagerplatser
IDL_120  120  -  Ordernummer %1 är makulerat
IDL_121  121  -  Ordernummer %1 är avslutat
IDL_122  122  -  Ordernummer måste anges
IDL_123  123  -  &Kundinstruktioner
IDL_124  124  -  Klar att fakturera?
IDL_125  125  -  Avsluta uttag?
IDL_126  126  -  Godkänt?
IDL_127  127  -  Makulera ordernummer %1?
IDL_128  128  -  Samma antal måste anges i serienummer och lagerplatser
IDL_129  129  -  Rad är vald, kan inte ändra kund
IDL_130  130  -  &Artikelinstruktioner
IDL_131  131  -  &Orderinstruktioner
IDL_132  132  -  Utvald för fakturering
IDL_133  133  -  Totalt levererat: %1
IDL_134  134  -  Orderhuvud kunde inte uppdateras
IDL_135  135  -  Transaktionsrader finns rapporterade på ordernumret


>STACK ROWS 600 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	leget.bmp
5   4	0xff
6   5	0x0


>APPEVENTS ROWS 6
#id Eventname	ParamList
1101	TempSerialODeliveryCreate	()
1102	TempSerialOdeliveryUpdateTemp	()
1103	TempSerialODeliveryUpdateSer	()
1115	TempLplODeliveryCreate	()
1116	TempLplODeliveryWriteLpl	(int iWorkLu)
1117	TempLplODeliveryUpdateTemp	(int iWorkLu)


>WINDOW ROWS 1
#id       x     y    cy    cx sp1	sp2	Bitmap	font	size	caption
5511     20    90   365   480 SBL	-	-	"-"	  0	"420 Internuttag"

>FORM MAIN ROWS 5 SIZE 33 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW    19   18    0   16  420 -	P	-	win1	-	""
WW   205   48  414  142   68 -	Pz	-	win13	-	""
WW   621    0    4   16  476 -	PhmZ	-	win14	-	""
B3     2  318  414   15   65 -	xTPhwz	-	pbClose	-	"exit.bmp,St&äng"
TB 24497   38    2  296  408 -	PWZ	-	tab2	-	" Internuttag "

>FORMFILES MAIN ROWS 4
#Id	sp
20	r
30	r
34	r
36	r
>FORM tab2 ROWS 1 SIZE 1 "tab2"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW 24328   16    2  276  404 -	PWZ	-	win15	-	""

>FORMFILES tab2 ROWS 0
#Id	sp
>FORM win1 ROWS 5 SIZE 135 "Commands"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3    21    0    2   15   80 -	TPM	-	pbNew	-	"new.bmp,&Nytt löpande uttag"
B3    22    0   84   15   80 -	TPM	-	pbEdit	-	"edit.bmp,R&egistrera uttag"
B3    23    0  166   15   80 -	TPM	-	pbCassation	-	"mak.bmp,&Kassation"
B3 24440    0  248   15   80 -	TPM	-	pbDelete	-	"delete.bmp,&Makulera underlag"
B3 24441    0  330   15   80 -	TPM	-	pbEnd	-	"cancel.bmp,Avsl&uta/Blanketter"

>FORM win13 ROWS 4 SIZE 76 "Operations"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3 24408    0    0   15   65 -	TP	-	pbExecute	-	"ok.bmp,Verk&ställ"
B3 24434   18    0   15   65 -	TP	-	pbJournal	-	"bok.bmp,Da&gbok"
B3 24500   36    0   15   65 -	QP	-	pbChangeCustomer	-	"custom.bmp,&Byt kund"
B3 24501   54    0   15   65 -	QP	-	pbActivity	-	"new.bmp,Ny aktivitet"

>FORMFILES win13 ROWS 0
#Id	sp
>FORM win14 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  474 -	pZ	-	-	-	""

>FORM win15 ROWS 31 SIZE 291 "win15"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D  24341   82   52   13   60 -	PU	-	edCode	#2001	""
DP 24346   96   52   13   62 D8	P	-	dpDate	#8711	""
D  24342  110   52   13   46 -	PU	-	edSign	#8825	""
D  24343  124   52   13   60 -	PU	-	edOrdernr	-	""
D  24344  138   52   13  115 A20	PU	-	edArtCode	#3401	""
D  24347  152   52   13  115 -	P$	-	edArtName	#3621	""
D  24351  166   52   13   60 -	pO	-	edStockSpace	#1033	""
CE 24395  180   52   75   62 -	Pc	-	cbStock	#8830	""
D  24353  194   52   13   44 -	P	-	edAmount	#3631	""
D  24354  208   52   13   44 -	pO	-	edUnit	#15505	""
TB 24330   80  218  194  184 -	pwzu	-	tab1	-	"&1.Projekttyp,&2.Priser,&3.Förs.villkor,&4.Blankettset,&5.Setartikel,&6.Kunddata,&7.Levadr."
GR 24329    0    2   78  400 -	pfWZ	-	lcTable	-	""
T  24332  112    4   11   45 -	p	-	txSign	-	"Signatur:"
T  24333   98    4   11   45 -	p	-	txDate	-	"Datum:"
T  24335  140    4   11   45 -	p	-	txArtCode	-	"Artikelkod:"
T  24331   84    4   11   45 -	p	-	txCode	-	"Kundkod:"
T  24336  154    4   11   45 -	p	-	txArtName	-	"Benämning:"
B3 24349  139  191   13   15 -	xTpfF	-	pbArtCode	-	"seek.bmp"
B3 24350  124  132   13   15 -	xTpfF	-	pbOrdernr	-	"seek.bmp"
T  24337  168    4   11   45 -	p	-	txStockSpace	-	"Lagerplats:"
T  24339  196    4   11   45 -	p	-	txAmount	-	"Antal:"
T  24340  210    4   11   45 -	p	-	txUnit	-	"Enhet:"
T  24334  126    4   11   45 -	p	-	txOrderNr	-	"Ordernummer:"
T  24338  182    4   11   45 -	p	-	txStock	-	"Lager:"
B3 24410   82  132   13   15 -	xTpfF	-	pbCode	-	"seek.bmp"
B3 24490  124  114   13    9 -	xTpfF	-	pbPrevOrderNr	-	"arrowl.bmp"
B3 24491  139  171   13    9 -	xTpfF	-	pbPrevArt	-	"arrowl.bmp"
B3 24492  124  122   13    9 -	xTpfF	-	pbNextOrderNr	-	"arrowr.bmp"
B3 24493  139  181   13    9 -	xTpfF	-	pbNextArt	-	"arrowr.bmp"
B3 24494   82  114   13    9 -	xTpfF	-	pbPrevCode	-	"arrowl.bmp"
B3 24495   82  122   13    9 -	xTpfF	-	pbNextCode	-	"arrowr.bmp"

>FORMFILES win15 ROWS 0
#Id	sp
>FORM tab1 ROWS 7 SIZE 7 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW 24358   28    2  164  178 -	P	-	win16	-	""
WW 24376   28    4  164  178 -	P	-	win17	-	""
WW 24384   28    4  164  178 -	P	-	win18	-	""
WW 24392   28    4  164  178 -	P	-	win19	-	""
WW 24398   28    4  164  178 -	P	-	win20	-	""
WW 24442   28    4  164  178 -	P	-	win21	-	""
WW 24464   28    4  164  178 -	P	-	win22	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win16 ROWS 21 SIZE 159 "Terms"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
CE 24367    2   54   75  100 -	Pc	-	cbTransport	#3173	""
CE 24368   16   54   75  100 -	Pc	-	cbSupplierTerms	#3172	""
CE 24369   30   54   75  100 -	Pc	-	cbPaymentTerms	#3171	""
CE 24439   44   54   75  100 -	Pc	-	cbStatus	#3121	""
DP 24371   58   54   13   58 D8	P	-	dpDueDate	#3114	""
D  24372   72   54   13   56 -	P	-	edTransCost	#3152	""
D  24373   86   54   13   56 -	P	-	edExpCost	#3153	""
D  24526  101   54   13   42 -	PU	-	edInvoiceSerie	#3012	""
D  24374  115   54   13   56 -	PU	-	edInvoiceCustomer	#3183	""
XB 24375  128    4   13   59 -	P	-	xbCompositeInvoice	#3187	"Samlingsfakt:"
B3 24527  100   98   13   15 -	SxTpfF	-	pbInvoiceSerie	-	"seek.bmp"
B3 24485  113  112   13   15 -	xTpfF	-	pbInvoiceCustomer	-	"seek.bmp"
T  24359    4    4   11   48 -	p	-	-	-	"Transportsätt:"
T  24360   18    4   11   48 -	p	-	-	-	"Lev.villkor:"
T  24361   32    4   11   48 -	p	-	-	-	"Bet.villkor:"
T  24438   46    4   11   48 -	p	-	-	-	"Status:"
T  24362   60    4   11   48 -	p	-	-	-	"Förfallodatum:"
T  24363   74    4   11   48 -	p	-	-	-	"Fraktavgift:"
T  24364   88    4   11   48 -	p	-	-	-	"Exp.avgift:"
T  24525  102    4   11   48 -	p	-	-	-	"Fakturanrserie:"
T  24365  115    4   11   48 -	p	-	-	-	"Fakturakund:"

>FORMFILES win16 ROWS 0
#Id	sp
>FORM win17 ROWS 10 SIZE 73 "ProType"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
CE 24387    2   54   75  100 -	Pc	-	cbProjectType	#3011	""
D  24391   16   54   13   86 -	P	-	ProjectName	#3081	""
D  24388   30   54   12   60 -	PU	-	edProjectGroup	#3007	""
CE 24397   44   54   75   62 -	Pc	-	cbTypeStock	#3083	""
XB 24381   58    0   13   62 -	Dp	-	xbDebCust	#3192	"Debitera kund"
T  24380   32    2   11   50 -	p	-	-	-	"Projektgrupp:"
T  24379   18    2   11   50 -	p	-	-	-	"Projektnamn:"
T  24396   46    2   11   50 -	p	-	txTypeStock	-	"Lager:"
T  24378    4    2   11   50 -	p	-	-	-	"Projekttyp:"
B3 24499   30  116   13   15 -	SxTpfF	-	pbProjectGroup	-	"seek.bmp"

>FORMFILES win17 ROWS 0
#Id	sp
>FORM win18 ROWS 5 SIZE 27 "Price"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T  24385    4    2   11   52 -	p	-	-	-	"Normalpris:"
T  24386   18    2   11   52 -	p	-	txCalcPurch	-	"Kalkylpris:"
D  24389    2   54   13   60 -	P	-	edNormPrice	#3551	""
D  24390   16   54   13   60 -	P	-	edCalcPrice	#3554	""
T  24437   30    2   11  110 -	p	-	txTotDel	-	""

>FORMFILES win18 ROWS 0
#Id	sp
>FORM win19 ROWS 31 SIZE 161 "FormSet"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
CE 24427    0   48  208   78 -	Pc	-	cbFormSet	#3071	""
XB 24413   28   86   13   58 -	P	-	xbFormat1	#865	"Check"
CE 24505   28  148  168   30 -	Pc	-	cbPrinter1	#10471	""
XB 24414   42   86   13   58 -	P	-	xbFormat2	#866	"Check"
CE 24506   42  148  164   30 -	Pc	-	cbPrinter2	#10472	""
XB 24415   56   86   13   58 -	P	-	xbFormat3	#867	"Check"
CE 24512   56  148  176   30 -	Pc	-	cbPrinter3	#10473	""
XB 24416   70   86   13   58 -	P	-	xbFormat4	#868	"Check"
CE 24513   70  148  156   30 -	Pc	-	cbPrinter4	#10474	""
XB 24417   84   86   13   58 -	P	-	xbFormat5	#869	"Check"
CE 24514   84  148  140   30 -	Pc	-	cbPrinter5	#10475	""
XB 24507   98   86   13   58 -	P	-	xbFormat6	#870	"Check"
CE 24515   98  148  146   30 -	Pc	-	cbPrinter6	#10476	""
XB 24508  112   86   13   58 -	P	-	xbFormat7	#871	"Check"
CE 24516  112  148  136   30 -	Pc	-	cbPrinter7	#10477	""
XB 24510  126   86   10   58 -	P	-	xbFormat8	#872	"Check"
CE 24517  126  148  122   30 -	Pc	-	cbPrinter8	#10478	""
XB 24484  146   86   10   68 -	P	-	xbPrintNow	#864	"Direkt utskrift"
T  24420   16    4   11   48 -	p	-	-	-	"Blanketter"
T  24424    2    4   10   40 -	p	-	-	-	"Blankettset:"
T  24426   16  120   11   24 -	p	-	-	-	"Skrivas"
T  24419   44    4   11   78 -	p	-	txForm2	-	"Text"
T  24422   72    4   11   78 -	p	-	txForm4	-	"Text"
T  24421   58    4   11   78 -	p	-	txForm3	-	"Text"
T  24423   86    4   11   78 -	p	-	txForm5	-	"Text"
T  24425   16   86   11   32 -	p	-	-	-	"Format"
T  24418   30    4   11   78 -	p	-	txForm1	-	"Text"
T  24504   16  148   11   30 -	p	-	-	-	"Skrivare"
T  24518  100    4   11   78 -	p	-	txForm6	-	"Text"
T  24519  114    4   11   78 -	p	-	txForm7	-	"Text"
T  24520  128    4   11   78 -	p	-	txForm8	-	"Text"

>FORMFILES win19 ROWS 0
#Id	sp
>FORM win20 ROWS 8 SIZE 57 "SetArt"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D  24402    2   54   13   90 -	PU	-	edSetArtCode	#1201	""
D  24403   16   54   13   60 -	P	-	edSetNumber	#8332	""
CE 24502   30   54   50   60 -	Pc	-	cbStockSet	#8831	""
B3 24496   50   54   15   50 -	TP	-	pbGetSetArt	-	"nothing.bmp,&Hämta"
B3 24406    3  149   13   15 -	xTpfF	-	pbSetArt	-	"seek.bmp"
T  24399    3    2   11   50 -	p	-	-	-	"Setartikel:"
T  24400   18    2   11   50 -	p	-	-	-	"Antal:"
T  24503   32    2   11   50 -	p	-	txStockSet	-	"Lager:"

>FORM lcTable ROWS 6 SIZE 50 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T  24428    2    2   11   66 -	Hp	-	-	#3602	"Ordernr"
T  24429    0   44   11   40 -	Hp	-	-	#3603	"Radnr"
T  24430    0   92   11   68 -	Hp	-	-	#3605	"Artikelkod"
T  24431    0  134   11  114 -	Hp	-	-	#3621	"Benämning"
T  24432    0  234   11   56 -	RHp	-	-	#3631	"Antal"
T  24433    0  294   11   42 -	Hp	-	-	#3661	"Signatur"

>FORMFILES lcTable ROWS 4
#Id	sp
36	r
34	r
10	r
30	r
>FORM win21 ROWS 20 SIZE 127 "custdata"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D  24443    2   64   13  100 -	pO	-	edCustomerName	#2021	""
D  24444   16   64   13  100 -	pO	-	edStreetAddress	#2027	""
D  24445   30   64   13  100 -	pO	-	edPostalAddress	#2029	""
D  24446   44   64   13  100 -	pO	-	-	#2030	""
D  24447   58   64   13  100 -	pO	-	-	#2033	""
D  24448   72   64   13  100 -	pO	-	-	#2036	""
D  24449   86   64   13  100 -	pO	-	-	#2041	""
D  24450  100   64   13  100 -	pO	-	-	#2124	""
D  24451  114   64   13   60 -	pO	-	-	#2111	""
D  24452  128   64   13   38 -	pO	-	-	#2185	""
T  24453    4    4   11   58 -	p	-	-	-	"Företag:"
T  24454   18    4   11   58 -	p	-	-	-	"Gatuadress:"
T  24455   32    4   11   58 -	p	-	-	-	"Gatupostadress:"
T  24456   46    4   11   58 -	p	-	-	-	"Utdelningsadress:"
T  24457   60    4   11   58 -	p	-	-	-	"Postadress:"
T  24458   74    4   11   58 -	p	-	-	-	"Land:"
T  24459   88    4   11   58 -	p	-	-	-	"Telefon:"
T  24460  102    4   11   58 -	p	-	-	-	"Kundreferens:"
T  24461  116    4   11   58 -	p	-	-	-	"Kundtyp:"
T  24462  130    4   11   58 -	p	-	-	-	"Kundstatus:"

>FORMFILES win21 ROWS 0
#Id	sp
>FORM win22 ROWS 18 SIZE 112 "SuppAdr"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D  24465    2   60   13  108 -	pO	-	edAdressCode	#3025	""
D  24466   16   60   13  108 -	pO	-	-	#3027	""
D  24467   30   60   13  108 -	pO	-	-	#3030	""
D  24468   44   60   13  108 -	pO	-	-	#3031	""
D  24469   58   60   13  108 -	pO	-	-	#3033	""
D  24470   72   60   13  108 -	pO	-	-	#3034	""
D  24471   86   60   13  108 -	pO	-	edLev6	#3035	""
D  24472  100   60   13  108 -	pO	-	edGods	#3051	""
D  24473  114   60   13  108 -	pO	-	edGoodMarking	#3131	""
T  24474   32    2   11   55 -	p	-	-	-	"Lev.adr 2:"
T  24475   46    2   11   55 -	p	-	-	-	"Lev.adr 3:"
T  24476   60    2   11   56 -	p	-	-	-	"Lev.adr 4:"
T  24477   74    2   11   56 -	p	-	-	-	"Lev.adr 5:"
T  24478   88    2   11   56 -	p	-	-	-	"Lev.adr 6:"
T  24479  102    2   11   56 -	p	-	-	-	"Godsadress:"
T  24480    4    2   11   55 -	p	-	-	-	"Adresskod:"
T  24481   18    2   11   55 -	p	-	-	-	"Lev.adr 1:"
T  24482  116    2   11   55 -	p	-	-	-	"Godsmärkning:"

>FORMFILES win22 ROWS 0
#Id	sp
>SOURCE
