>TYPE   	D
>NAME   	433.d
>CODE   	433.cod
>BY     	@(#)$Author: Helene $
>DATE   	@(#)$Date: 06-09-19 11:35 $
>VERSION	@(#)$Revision: 3 $
>ID     	4073

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

>TEXTINFO ROWS 31 SIZE 814
#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_105  105  -  Ordernummer saknas
IDL_106  106  -  Ange radnummer
IDL_108  108  -  Ange lev.vecka
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_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_133  133  -  Inköp ackumuleras per lev. Överför i rutin 430 om ackumulering inte ska göras
IDL_135  135  -  Ordernr:
IDL_136  136  -  Tillv.nr:
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 5 SIZE 35 "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  404   82   76 -	PWz	-	win8	-	""
B3 24250  258  404   15   73 -	xTPhw	-	pbCancel	-	"exit.bmp,St&äng"

>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 34 SIZE 246 "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   80 A25	PU	-	edCode	#5110	""
D  24040  106  256   13  102 -	p	-	edName	#5121	""
CB 24369  128   60   50  104 -	P	-	cbOrigin	-	""
D  24168  142   60   13   86 -	PU	-	edOrderNr	-	""
D  24045  156   60   13   86 -	P	-	edRow	#5103	""
D  24046  170   60   13   86 -	PU	-	edSupplier	#5001	""
CE 24265  184   60   75  104 -	Pc	-	cbStock	#8830	""
DP 24170  198   60   13   52 W5	Pa	-	dpToWeek	#8715	""
D  24100  128  256   13   50 -	P	-	edQuant	#5141	""
DP 24171  142  256   13   52 W5	Pa	-	dpDelWeek	#5135	""
XB 24371  156  180   13   84 -	P	-	xbDirect	-	"Direktleverans"
XB 24372  170  180   13   84 -	P	-	xbCostFromOrder	#5018	"Kostnad från order"
XB 24373  184  180   13   84 -	P	-	xbLabelFromOrder	#5019	"Benämning från order"
T  24041  144    6   11   52 -	p	-	txOrderNr	-	"Ordernr:"
B3 24174  156  148   13   15 -	xTpfF	-	pbRow	-	"seek.bmp"
B3 24229   92  118   13   15 -	xTpfF	-	pbBasis	-	"seek.bmp"
B3 24048  106  162   13   15 -	xTpfF	-	pbCode	-	"seek.bmp"
T  24051  130  182   11   70 -	p	-	-	-	"Inköp antal:"
T  24050  200    6   11   52 -	p	-	-	-	"Till vecka:"
B3 24101  142  148   13   15 -	xTpfF	-	pbOrderNr	-	"seek.bmp"
T  24254  186    6   11   52 -	p	-	txStock	-	"Lager:"
T  24037  108    6   11   52 -	p	-	-	-	"Artikelkod:"
T  24038  108  182   11   68 -	p	-	-	-	"Benämning:"
B3 24318  106  142   13    9 -	xTpfF	-	pbPrevArt	-	"arrowl.bmp"
B3 24319  106  152   13    9 -	xTpfF	-	pbNextArt	-	"arrowr.bmp"
T  24166   94    6   11   52 -	p	-	txBasis	-	"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:"
B3 24169  170  148   13   15 -	xTpfF	-	pbSupplier	-	"seek.bmp"
T  24043  172    6   11   52 -	p	-	-	-	"Lev.kod:"
T  24052  144  182   11   70 -	p	-	-	-	"Lev.vecka:"

>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 5
#Id	sp
50	r
30	r
34	r
10	r
20	r
>FORM win8 ROWS 4 SIZE 84 "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   37    0   15   73 -	TP	-	pbDelete	-	"delete.bmp,&Makulera "
B3 24302   18    0   15   73 -	TP	-	pbCancelTransfer	-	"cancel.bmp,Av&bryt överföring"
PB 24306   56    0   15   73 -	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
