>TYPE   	D
>NAME   	513.d
>CODE   	513.cod
>BY     	@(#)$Author: Mats $
>DATE   	@(#)$Date: 06-09-22 15:39 $
>VERSION	@(#)$Revision: 3 $
>ID     	5527

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

>TEXTINFO ROWS 39 SIZE 885
#id    value    flags    text
IDL_101  101  -  &Visa
IDL_102  102  -  Anteckningar
IDL_103  103  -  Återstår:
IDL_104  104  -  F2: Planeringsinfo
IDL_105  105  -  Budgetantal %1 varav ställtid %2
IDL_106  106  -  Startvecka måste anges
IDL_107  107  -  Färdigvecka måste anges
IDL_108  108  -  Det finns ej godkända förslag, lämna rutinen ändå
IDL_109  109  -  Planering klar
IDL_110  110  -  Felaktigt intervall
IDL_111  111  -  Tillv.order saknas
IDL_112  112  -  Börja planera annan TO?
IDL_113  113  -  Resursgrupp saknas
IDL_114  114  -  Verktygskod saknas
IDL_115  115  -  Maskinkod saknas
IDL_116  116  -  Tillv.nr måste anges
IDL_117  117  -  Inga operationer att planera
IDL_118  118  -  Tillv.order kan ej uppdateras
IDL_119  119  -  Tillv.typ saknas
IDL_120  120  -  Felaktigt helgdatum
IDL_121  121  -  Inga TO i gruppen
IDL_122  122  -  Börja planera annan grupp?
IDL_123  123  -  Första operationen behöver starta redan %1 , planera framifrån istället
IDL_124  124  -  För många operationer att planera > %1
IDL_125  125  -  M-S
IDL_126  126  -  M-L
IDL_127  127  -  M-F+S
IDL_128  128  -  M-F
IDL_129  129  -  Återstår timmar
IDL_130  130  -  Fel vid uppdatering av post i register %1
IDL_131  131  -  Kunde inte hitta rad: %1 i tillv.order %2
IDL_132  132  -  Felaktigt helgdatum
IDL_133  133  -  Planerad
IDL_134  134  -  Förslag
IDL_135  135  -  Markerad operation
IDL_136  136  -  Alla operationer
IDL_137  137  -  Ingen operation markerad
IDL_138  138  -  Ange dag i vecka
IDL_139  139  -  Ett fel uppstod när beläggning för TO %1 rad %2 skulle registreras.


>STACK ROWS 100 SIZE 5000

>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	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   350   445 SB	-	-	"-"	  8	"513 Planera TO"

>FORM MAIN ROWS 25 SIZE 253 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   621    2    4   16  418 -	Phm	-	win1	-	""
RB  4474   23    4   10   40 -	RP	-	rbManufact	-	"&Tillv.nr:"
RB  4475   37    4   10   40 -	RP	-	rbGroup	-	"&Grupp:"
D   4103   22   44   13   60 -	pUO	-	edManufact	-	""
D   4420   36   44   13   60 -	pUO	-	edGroup	-	""
TB  4072  136    4  166  430 -	PZ	-	tab1	-	"Operationer"
B3  4433  304    8   15   65 -	TPw	-	pbSave	-	"save.bmp,&Planera rad"
B3  4085  304   76   15   65 -	Tpw	-	pbSaveAll	-	"nothing.bmp,Go&dkänn förslag"
B3     2  304  370   15   65 -	xTpwz	-	pbExit	-	"exit.bmp,St&äng"
T   4124   23  156   11   43 -	p	-	-	-	"Produktkod:"
D   4125   22  200   13  100 -	pUO	-	edProduct	-	""
D   4130   36  200   13  100 -	pO$	-	edName	-	""
T   4129   37  156   11   43 -	p	-	-	-	"Benämning:"
T   4169   23  310   11   41 -	p	-	-	-	"Ordernamn:"
D   4168   22  352   13   80 -	pO$	-	edOrderName	-	""
B3  4425   22  126   13   15 -	xQpfF	-	pbManufact	-	"seek.bmp"
B3  4426   22  116   13    9 -	xQpfF	-	pbNextManufact	-	"arrowr.bmp"
B3  4427   22  106   13    9 -	xQpfF	-	pbPrevManufact	-	"arrowl.bmp"
GR  4101   56    2   74  430 -	pWZ	-	lcTable	-	""
D   4445   36  352   13   54 -	pO	-	edHeadQuant	-	""
T   4446   37  310   11   41 -	p	-	-	-	"Antal:"
B3  4473   36  106   13   15 -	xQpfF	-	pbGroup	-	"seek.bmp"
B3  4484  304  280   15   65 -	Tpw	-	pbGantt	-	"gant.bmp,Ga&ntt"
B3  4487  304  212   15   65 -	Tpw	-	pbDeplan	-	"nothing.bmp,P&lanera av"
B3  4489  304  144   15   65 -	Tpw	-	pbProposal	-	"nothing.bmp,N&ytt förslag"

>FORMFILES MAIN ROWS 0
#Id	sp
>FORM tab1 ROWS 1 SIZE 1 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW  4073   14    2  148  425 -	PZ	-	win2	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win2 ROWS 25 SIZE 159 "Order"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D   4345    6   50   13  110 -	pO	-	edCode	-	""
D   4347   20   50   13  115 -	pO$	-	edCodeName	-	""
D   4353   34   50   12   60 -	pU	-	edResource	-	""
D   4413   48   50   13  100 -	pU	-	edMachine	-	""
D   4355   62   50   13  100 -	pU	-	edToolCode	-	""
D   4171   76   50   13   48 -	p	-	edQuant	-	""
DP  4177   90   50   13   48 W5	Pa	-	dpStartWeek	-	""
DP  4178  104   50   13   48 W5	Pa	-	dpEndWeek	-	""
T   4346    7    2   11   47 -	p	-	-	-	"Artikelkod:"
GR  4394   18  172   67  252 -	pZd	-	lcCapacity	-	""
T   4348   21    2   11   47 -	p	-	-	-	"Benämning:"
T   4284  105    2   11   47 -	p	-	-	-	"Färdigvecka:"
T   4354   35    2   11   47 -	p	-	-	-	"Resursgrupp:"
T   4172   77    2   11   47 -	p	-	txQuant	-	"Återstår:"
T   4356   63    2   11   47 -	p	-	-	-	"Verktygskod:"
T   4183   91    2   11   47 -	p	-	-	-	"Startvecka:"
T   4414   49    2   11   47 -	p	-	-	-	"Maskinkod:"
G   4411   86  172   60  252 -	pZ	-	grUtilizedAck	-	""
CE  4286   76  106   50   60 -	pfc	-	cbUnit	#7913	""
B3  4429   34  112   13   15 -	xQpF	-	pbResource	-	"seek.bmp"
B3  4431   48  152   13   15 -	xQpF	-	pbMachine	-	"seek.bmp"
B3  4432   62  152   13   15 -	xQpF	-	pbToolCode	-	"seek.bmp"
T   4444   35  130   11   40 -	Hp	-	txWeekend	-	"Helgtext"
T   4447    2  172   14  236 -	HpZ	C9D6F9	txLabel	-	"Text"
B3  4491    2  408   15   15 -	Qp	-	pbInspect	-	"central.bmp"

>FORMFILES win2 ROWS 0
#Id	sp
>FORM lcTable ROWS 12 SIZE 99 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4468    1    1   11   40 -	Hph	-	-	#7901	"Tillv.nr"
T   4469    1   41   11   25 -	Hph	-	-	#7903	"Radnr"
T   4459    1   67   11   40 -	Hp	-	-	#7927	"Op.ordning"
T   4460    1  107   11   50 -	Hp	-	-	#7905	"Artikelkod"
T   4461    1  157   11   74 -	Hp	-	-	#7921	"Benämning"
T   4462    1  231   11   46 -	RHph	-	-	#8331	"Antal"
T   4470    1  277   11   40 -	Hp	-	-	#7945	"Startvecka"
T   4471    1  317   11   40 -	Hp	-	-	#7947	"Färdigvecka"
T   4472    1  357   11   45 -	Hp	-	-	#7963	"Resursgrupp"
T   4488    1  402   11   25 -	Hp	-	-	#8830	"Planerad"
T   4485   14    1   11    0 -	Hp	-	-	#17801	""
T   4486   14    1   11    0 -	Hp	-	-	#17807	""

>FORMFILES lcTable ROWS 3
#Id	sp
79	r
75	r
80	r
>FORM lcCapacity ROWS 7 SIZE 68 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T   4404    1    1   11   25 -	Hph	-	-	#29503	"Vecka"
T   4405    1   26   11   25 -	RHp	-	-	#29531	"Kapacitet"
T   4406    1   51   11   35 -	RHp	-	-	#10042	"Plan. bel."
T   4467    1   87   11   35 -	RHp	-	-	#10044	"Ledigt"
T   4409    1  122   11   35 -	RHp	-	-	#10031	"Bel. %"
T   4408    1  157   11   60 -	RHp	-	-	#10051	"Ack. ledig kap"
T   4410    1  217   11    0 -	Hp	-	-	#29501	"Resursgrupp"

>FORMFILES lcCapacity ROWS 1
#Id	sp
295	r
>FORM win1 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  404 -	pZ	-	-	-	""

>FORMFILES win1 ROWS 0
#Id	sp
>SOURCE
