>TYPE   	D
>NAME   	436.d
>CODE   	436.cod
>BY     	@(#)$Author: Helene $
>DATE   	@(#)$Date: 05-06-29 11:02 $
>VERSION	@(#)$Revision: 2 $
>ID     	4080

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

>TEXTINFO ROWS 50 SIZE 964
#id    value    flags    text
IDL_100  100  -  %1 måste anges
IDL_101  101  -  Rad måste väljas
IDL_102  102  -  Spara rad
IDL_103  103  -  Objektet saknas
IDL_104  104  -  Avdelningen saknas
IDL_105  105  -  Ordernumret saknas
IDL_106  106  -  Blankettset måste anges
IDL_107  107  -  &Visa
IDL_108  108  -  Förfrågan saknas
IDL_109  109  -  Förfrågan är avslutad
IDL_110  110  -  O = Ordernr
IDL_111  111  -  Info
IDL_112  112  -  Förfrågan finns redan
IDL_113  113  -  Förfrågannumret måste börja med en bokstav
IDL_114  114  -  F3: Hämta mall
IDL_115  115  -  Vill du ta bort leverantör %1 ur inköpsförfrågan
IDL_116  116  -  Leverantör saknas
IDL_117  117  -  Förfrågan %1 är avslutad
IDL_118  118  -  Vill du avsluta förfrågan %1?
IDL_119  119  -  Makulera förfrågan %1?
IDL_120  120  -  Leverantör %1 finns redan i inköpsförfrågan!
IDL_121  121  -  Enhetskod finns ej!
IDL_122  122  -  Format saknas i blankettset
IDL_123  123  -  T = Tillverkningsnr
IDL_124  124  -  Tillverkningsnr saknas
IDL_125  125  -  Tillverkningsrad saknas
IDL_126  126  -  Inte samma artikelkod på tillverkningsraden
IDL_127  127  -  Inte samma artikelkod på orderraden
IDL_128  128  -  Artikelkod kan bara vara %1 tecken
IDL_129  129  -  Leverantören är spärrad
IDL_130  130  -  Anteckningar
IDL_131  131  -  Öppen
IDL_132  132  -  Accept
IDL_133  133  -  Avvisad
IDL_134  134  -  &Inköpsinfo
IDL_135  135  -  Artikelinfo
IDL_136  136  -  &Artikeldata
IDL_137  137  -  Stafflings&priser
IDL_138  138  -  = Inköpsenhet
IDL_139  139  -  Antal
IDL_140  140  -  Radnr
IDL_141  141  -  F3: Visa order
IDL_142  142  -  F3:Ändra artikel
IDL_143  143  -  F3:Inköpsförslag
IDL_144  144  -  F3:Sök orderrader
IDL_145  145  -  Ordernr:
IDL_146  146  -  Orderrad:
IDL_147  147  -  Tillv.nr:
IDL_148  148  -  Tillv.rad:
IDL_149  149  -  Kunde inte hitta rad %1. Felkod: %2


>STACK ROWS 1000 SIZE 7000

>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 8
#id color	comment
1   0xff0000   	""
2   0xff       	""
3   0xff00ff   	""
4   0xffffff   	""
5   0xc0c0c0   	""
6   0x80       	""
7   0x808080   	""
8   0x0        	""


>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   338   510 SBL	-	-	"-"	  0	"436 Inköpsförfrågan"

>FORM MAIN ROWS 6 SIZE 48 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  2021   20    0   18  288 -	P	-	win2	-	""
TB  2030   58    6  253  420 -	PWZ	-	tab1	-	"H&uvud,Rad&er,&Leverantörer"
WW  2111   70  430  196   80 -	Pz	-	win8	-	""
WW  2024   38    2   16  400 -	P	-	win3	-	""
WW   621    2    4   16  501 -	PZ	-	win1	-	""
B3     2  294  430   15   80 -	xTPw	-	pbExit	-	"exit.bmp,St&äng"

>FORM win1 ROWS 23 SIZE 23 "win1"
#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  499 -	pZ	-	-	-	""

>FORM win2 ROWS 3 SIZE 66 "command"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3  2022    2    4   15   75 -	TPM	-	pbNew	-	"new.bmp,&Ny förfrågan"
B3  2023    2   82   15   75 -	TPM	-	pbChange	-	"edit.bmp,Än&dra"
B3  2196    2  160   15   75 -	TP	-	pbPrintForms	-	"print.bmp,Skriv &blanketter"

>FORMFILES win2 ROWS 0
#Id	sp
>FORM win3 ROWS 5 SIZE 21 "win3"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   2025    2   46   13   54 -	pO	-	edQueryNo	-	""
T   2026    4    4   11   40 -	p	-	-	-	"Förfrågan:"
D   2027    2  112   13  138 -	pO	-	-	#5661	""
D   2028    2  312   13   60 -	pO	-	-	#5321	""
T   2029    4  264   11   43 -	p	-	-	-	"Summa:"

>FORM tab1 ROWS 4 SIZE 4 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  2190   16    2   16  156 -	P	-	win11	-	""
WW  2031   32    2  217  416 -	P	-	win4	-	""
WW  2115   12    2  238  416 -	PWZ	-	win9	-	""
WW  2032   12    2  237  416 -	PWZ	-	win5	-	""

>FORM win4 ROWS 17 SIZE 107 "Head"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   2038    2   66   13   60 -	PU	-	edOrder	#5654	""
T   2039    4    6   11   56 -	p	-	-	-	"Ordernr:"
D   2040   16   66   13  108 -	P	-	edName	#5661	""
T   2041   18    6   11   56 -	p	-	-	-	"Beteckning:"
B3  2043    2  128   13   15 -	SxTpfF	-	pbOrder	-	"seek.bmp"
DP  2044   30   66   13   44 D8	P	-	dpDate	#5665	""
T   2045   32    6   11   56 -	p	-	-	-	"Datum:"
D   2046   44   66   13   44 -	PU	-	edOurRef	#5655	""
T   2047   46    6   11   56 -	p	-	-	-	"Vår ref:"
B3  2048   44  111   13   15 -	SxTpfF	-	pbOurRef	-	"seek.bmp"
CE  2049   58   66  188   90 -	Pc	-	cbForm	#5659	""
T   2050   60    6   11   56 -	p	-	-	-	"Blankettset:"
XB  2051   72    4   13   72 -	P	-	xbDirectPrint	-	"Direkt utskrift"
D   2052   86   66   13  124 -	P	-	edInfo1	#5662	""
D   2053  100   66   13  124 -	P	-	edInfo2	#5663	""
T   2054   88    6   11   56 -	p	-	-	-	"Info 1:"
T   2055  102    6   11   56 -	p	-	-	-	"Info 2:"

>FORMFILES win4 ROWS 1
#Id	sp
5650	-
>FORM win5 ROWS 1 SIZE 9 "Rows"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
L   2110   44  134   11   60 -	p	-	-	-	"436-r.di"

>FORM win8 ROWS 3 SIZE 63 "win8"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3  2152    0    0   15   80 -	TP	-	pbDeleteQuery	-	"delete.bmp,&Makulera förfrågan"
PB  2151   18    0   15   80 -	P	-	pbCancelQuery	-	"Avsluta f&örfrågan"
B3  2157   82    0   15   80 -	TP	-	pbCloseRows	-	"ok.bmp,&Klar"

>FORM win9 ROWS 25 SIZE 220 "Supplier"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR  2128    6    6  106  402 -	PfWZ	-	lcSupplier	-	""
D   2116  126   72   13   60 -	PU	-	edSuppCode	#5673	""
D   2117  140   72   13  124 -	pfO	-	edSuppName	#2021	""
D   2118  154   72   13  124 -	P	-	edSuppRef	#5677	""
CE  2199  154   72   50  124 -	HPc	-	cbSuppRef	#5677	""
CE  2119  168   72   50  126 -	Pc	-	cbSuppForm	#5689	""
D   2120  182   72   13  124 -	P	-	edSuppInfo1	#5681	""
D   2121  196   72   13  124 -	P	-	edSuppInfo2	#5682	""
B3  2158  222    6   15   64 -	TPw	-	pbSaveSupplier	-	"save.bmp,S&para"
B3  2129  222   72   15   64 -	TPw	-	pbNewSupplier	-	"new.bmp,N&y"
B3  2130  222  138   15   64 -	TPw	-	pbDeleteSupplier	-	"delete.bmp,&Ta bort"
PB  2185  222  204   15   64 -	Pw	-	pbRegQuotation	-	"Re&gistrera offert"
PB  2186  222  270   15   64 -	Pw	-	pbCreatePurchOrder	-	"Skapa inköps&order"
PB  2194  222  336   15   64 -	Pw	-	pbPurchasePrices	-	"Leverantörspr&iser"
BM  2200  154  196   15   15 -	THp	-	bmSuppRef	-	"contact.bmp"
T   2127  198   10   11   60 -	p	-	-	-	"Info 2:"
T   2123  142   10   11   60 -	p	-	-	-	"Leverantör:"
T   2124  156   10   11   60 -	p	-	-	-	"Er referens:"
B3  2162  126  150   13   15 -	SxTpfF	-	pbSuppCode	-	"seek.bmp"
B3  2198  126  134   13    9 -	xTpfF	-	pbSupplierPrev	-	"arrowl.bmp"
B3  2197  126  142   13    9 -	xTpfF	-	pbSupplierNext	-	"arrowr.bmp"
T   2126  184   10   11   60 -	p	-	-	-	"Info 1:"
T   2122  128   10   11   60 -	p	-	-	-	"Lev.kod:"
T   2125  170   10   11   60 -	p	-	-	-	"Blankettset:"
FU  2187  122    6   94  402 -	pZw	-	-	-	""

>FORMFILES win9 ROWS 1
#Id	sp
5670	-
>FORM lcSupplier ROWS 6 SIZE 67 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   2176    1    1   11   44 -	Hp	-	-	#5673	"Lev.kod"
T   2177    1   45   11   94 -	Hp	-	-	#2021	"Leverantör"
T   2178    1  139   11   64 -	Hp	-	-	#5683	"Utskrift datum"
T   2179    1  203   11   64 -	Hp	-	-	#5685	"Offert datum"
T   2180    1  267   11   70 -	RHp	-	-	#5687	"Offertbelopp"
T   2181    0  336   11   56 -	Hp	-	-	#8831	"Status"

>FORMFILES lcSupplier ROWS 2
#Id	sp
5670	r
20	r
>FORM win11 ROWS 3 SIZE 21 "win11"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   2191    2   66   13   60 -	PU	-	edInquiry	#5651	""
B3  2192    2  130   13   15 -	SxTpfF	-	pbInquiry	-	"seek.bmp"
T   2193    4    6   11   55 -	p	-	-	-	"Förfrågan:"

>SOURCE
