>TYPE   	D
>NAME   	433.d
>CODE   	433.cod
>BY     	@(#)$Author: Helene $
>DATE   	@(#)$Date: 05-12-29 15:59 $
>VERSION	@(#)$Revision: 8 $
>ID     	4073

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

>TEXTINFO ROWS 41 SIZE 1035
#id    value    flags    text
IDL_100  100  -  Fel vid uppdatering. Felkod: %1
IDL_101  101  -  Underlag saknas
IDL_102  102  -  Ledtid dagar: %1, Förpackningsstorlek: %2
IDL_103  103  -  Ange artikelkod
IDL_104  104  -  Artikelkod saknas
IDL_105  105  -  Ordernummer saknas
IDL_106  106  -  Ange radnummer
IDL_107  107  -  Ange lev.kod
IDL_108  108  -  Ange lev.vecka
IDL_109  109  -  Ange ordernummer
IDL_110  110  -  Leverantören saknas
IDL_111  111  -  Beredningsunderlag slut
IDL_112  112  -  Tidigare än innevarande vecka
IDL_113  113  -  Ange till vilken vecka
IDL_114  114  -  &Visa
IDL_115  115  -  Makulera inköpsanmodan. Löpnummer: %1. Artikelkod: %2
IDL_116  116  -  Inköpsanmodan löpnummer %1 är makulerad
IDL_117  117  -  Vill du avbryta överföring?
IDL_118  118  -  Info
IDL_119  119  -  Ange beredningsunderlag
IDL_120  120  -  Inga poster
IDL_121  121  -  O = Order
IDL_122  122  -  T = Tillverkningsnr
IDL_123  123  -  Tillverkningsnumer saknas
IDL_124  124  -  Anteckningar
IDL_125  125  -  Tillverkningsrad saknas
IDL_126  126  -  Inte samma artikelkod på tillverkningsraden
IDL_127  127  -  Inte samma artikelkod på orderraden
IDL_128  128  -  Orderrad saknas
IDL_129  129  -  %1 Artikelkod: %2
IDL_130  130  -  Registrerad som kund
IDL_131  131  -  Antal ej angivet
IDL_132  132  -  Leverantören är spärrad
IDL_133  133  -  Inköp ackumuleras per lev. Överför i rutin 430 om ackumulering inte ska göras
IDL_134  134  -  Artikelkod kan bara vara %1 tecken
IDL_135  135  -  Ordernr:
IDL_136  136  -  Tillv.nr:
IDL_137  137  -  Landkod %1 saknas. Nyregistrera i rutin 823
IDL_138  138  -  Kunde inte hitta order %1
IDL_139  139  -  Kunde inte hitta inköpsanmodan: %1. Felkod: %2
IDL_140  140  -  Inköpsanmodan %1 kunde inte raderas. Felkod: %2


>STACK ROWS 5000 SIZE 10000

>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 0
#id Eventname	ParamList


>WINDOW ROWS 1
#id       x     y    cy    cx sp1	sp2	Bitmap	font	size	caption
5511     20    90   300   480 SB	-	-	"-"	  0	"433 Inköpsberedning"

>FORM MAIN ROWS 4 SIZE 19 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   621    0    6   16  470 -	PhmZ	-	win4	-	""
WW 24251   16    6   22  468 -	P	-	win9	-	""
TB 24341   40    6  234  396 -	PWZ	-	tab1	-	"Inköpsberedning"
WW 24245   52  405  206   76 -	PWz	-	win8	-	""

>FORMFILES MAIN ROWS 2
#Id	sp
5160	r
50	r
>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  468 -	pZ	-	-	-	""

>FORM tab1 ROWS 1 SIZE 1 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW 24035   14    2  218  388 -	PWZ	-	win5	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win5 ROWS 35 SIZE 242 "win5"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR 24036    2    2   88  382 -	pfWZ	-	lcTable	-	""
D  24228   92   60   13   55 -	PU	-	edBasis	#5161	""
D  24172  106   60   13   55 A20	PU	-	edCode	#5110	""
D  24040  106  252   13  102 -	p	-	edName	#5121	""
CB 24369  128   60   50   90 -	P	-	cbOrigin	-	""
D  24168  142   60   13   55 -	PU	-	edOrderNr	-	""
D  24045  156   60   13   55 -	P	-	edRow	#5103	""
D  24046  170   60   13   55 -	PU	-	edSupCode	#5001	""
CE 24340  184   60   75  106 -	Pc	-	cbIntrastat	#2982	""
CE 24265  198   60   75  106 -	Pc	-	cbStock	#8830	""
DP 24170  128  252   13   52 W5	Pa	-	dpToWeek	#8715	""
D  24100  142  252   13   50 -	P	-	edPurchaseNr	#5141	""
DP 24171  156  252   13   52 W5	Pa	-	dpDelWeek	#5135	""
B3 24169  170  118   13   15 -	xTpfF	-	pbSupCode	-	"seek.bmp"
T  24043  172    6   11   52 -	p	-	-	-	"Lev.kod:"
T  24052  158  182   11   62 -	p	-	-	-	"Lev.vecka:"
T  24041  144    6   11   52 -	p	-	txOrderNr	-	"Ordernr:"
B3 24174  156  118   13   15 -	xTpfF	-	pbRow	-	"seek.bmp"
B3 24229   92  118   13   15 -	xTpfF	-	pbBasis	-	"seek.bmp"
B3 24048  106  136   13   15 -	xTpfF	-	pbCode	-	"seek.bmp"
T  24051  144  182   11   62 -	p	-	tStock	-	"Inköp antal:"
T  24050  130  182   11   62 -	p	-	-	-	"Till vecka:"
B3 24101  142  118   13   15 -	xTpfF	-	pbOrderNr	-	"seek.bmp"
T  24254  200    6   11   52 -	p	-	tStock	-	"Lager:"
T  24037  108    6   11   52 -	p	-	-	-	"Artikelkod:"
T  24038  108  182   11   62 -	p	-	-	-	"Benämning:"
B3 24318  106  118   13    9 -	xTpfF	-	pbPrevArt	-	"arrowl.bmp"
B3 24319  106  126   13    9 -	xTpfF	-	pbNextArt	-	"arrowr.bmp"
T  24339  186    6   11   52 -	p	-	txIntrastat	-	"Intrastatkod:"
T  24166   94    6   11   52 -	p	-	tBasis	-	"Underlag:"
FR 24060  123    4    1  380 -	pZ	-	-	-	""
T  24042  158    6   11   52 -	p	-	-	-	"Radnr:"
T  24370  130    6   11   52 -	p	-	txOrigin	-	"Ursprung:"
XB 24371  170  180   13   82 -	P	-	xbDirect	-	"Direktleverans"
XB 24372  184  180   13   82 -	P	-	xbLabelFromOrder	#5019	"Benämning från order"

>FORMFILES win5 ROWS 0
#Id	sp
>FORM lcTable ROWS 9 SIZE 67 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T  24360    1    1   11   50 -	Hp	-	-	#5110	"Artikelkod"
T  24361    1   51   11   90 -	Hp	-	-	#5121	"Benämning"
T  24362    1  141   11   52 -	Hp	-	-	#5001	"Lev.kod"
T  24363    1  193   11   34 -	RHp	-	-	#5141	"Antal"
T  24364    1  227   11   48 -	Hp	-	-	#5102	"Ordernr"
T  24365    1  275   11   30 -	Hp	-	-	#5103	"Rad"
T  24366    1  305   11   40 -	Hp	-	-	#5135	"lev.vecka"
T  24367    1  345   11   25 -	HpL	-	-	#861	"Sen"
T  24368    1  370    0    0 -	RHph	-	-	#5005	"Löpnr"

>FORMFILES lcTable ROWS 3
#Id	sp
50	r
30	r
34	r
>FORM win8 ROWS 5 SIZE 100 "Operations"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3 24246    0    0   15   73 -	TP	-	pbSave	-	"save.bmp,&Spara "
B3 24248   36    0   15   73 -	TP	-	pbDelete	-	"delete.bmp,&Makulera "
B3 24250  190    0   15   73 -	xTPhw	-	pbCancel	-	"exit.bmp,St&äng"
B3 24302   18    0   15   73 -	TP	-	pbCancelTransfer	-	"cancel.bmp,Av&bryt överföring"
PB 24306   56    0   15   72 -	P	-	pbProposal	-	"&Inköpsförslag"

>FORMFILES win8 ROWS 0
#Id	sp
>FORM win9 ROWS 4 SIZE 111 "Commands"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3 24252    4    0   15   95 -	TPM	-	pbNewRequest	-	"new.bmp,&Enstaka artiklar"
B3 24307    4  100   15   95 -	TPM	-	pbBasisRequest	-	"new.bmp,&Beredningsunderlag"
B3 24253    4  200   15   95 -	TPM	-	pbOpenRequest	-	"open.bmp,Ö&ppna inköpsanmodan"
B3 24304    4  300   15   95 -	TPM	-	pbTransfer	-	"trans.bmp,&Överför anmodan"

>FORMFILES win9 ROWS 0
#Id	sp
>SOURCE
