>TYPE   	D
>NAME   	PURCHEGN.d
>CODE   	PURCHEGN.cod
>BY     	@(#)$Author: Sandor $
>DATE   	@(#)$Date: 08-10-21 13:24 $
>VERSION	@(#)$Revision: 13 $
>ID     	7126

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

>TEXTINFO ROWS 8 SIZE 214
#id    value    flags    text
IDL_100  100  -  Spara egenskaper
IDL_101  101  -  Om inköpsrabatt ligger fast ändras inköpspris och baspris.
IDL_102  102  -  Negativ inköpsrabatt visas inte på inköp.
IDL_131  131  -  Försäljningsbenämning
IDL_132  132  -  Setartikelbenämning
IDL_133  133  -  Artikelbenämning
IDL_134  134  -  Inköpsbenämning
IDL_135  135  -  Leverantörsbenämning


>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   288   272 SB	-	-	"-"	  0	"Egenskaper lager/inköp"

>FORM MAIN ROWS 3 SIZE 104 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
TB    11    2    6  244  262 -	PWZ	-	tab1	-	"&Inköp,Ink.pris/In&k.anm,Inle&v,&Lager,Ko&st.bokf,Art.be&n.,B&ehovsanalys"
B3    29  248  162   15   50 -	QPwz	-	pbOk	-	"ok.bmp,&Ok"
B3     2  248  218   15   50 -	QPwz	-	-	-	"cancel.bmp,Av&bryt"

>FORMFILES MAIN ROWS 0
#Id	sp
>FORM tab1 ROWS 7 SIZE 7 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   183   12    2  230  258 -	PWZ	-	win1	-	""
WW   206   12    2  230  258 -	PWZ	-	win2	-	""
WW   292   12    2  230  258 -	PWZ	-	win3	-	""
WW   304   12    2  230  258 -	P	-	win4	-	""
WW   313   12    2  230  258 -	P	-	win5	-	""
WW   351   12    2  230  258 -	P	-	win6	-	""
WW   376   12    2  230  258 -	P	-	win7	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win1 ROWS 27 SIZE 259 "Inköp"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
CE   228   12  104  204   92 -	Pc	-	cbPurchasetype	#19893	""
XB   229   26   10   13  102 -	P	-	-	#19824	"Direkt utskrift"
D    244   40  104   13  140 -	P	-	-	#19851	""
D    243   54  104   13  140 -	P	-	-	#19852	"19852"
D    242   68  104   13  140 -	P	-	-	#19853	""
D    241   82  104   13  140 -	P	-	-	#19854	""
D    383   96  104   13  140 -	P	-	-	#19855	""
D    384  110  104   13  140 -	P	-	-	#19856	""
D    387  124  104   13  140 -	P	-	-	#19857	""
CE   240  138  104  150  114 -	Pc	-	cbModeOfConvayance	#19863	""
CE   239  152  104  146  114 -	Pc	-	cbTermsOfDelivery	#19862	""
CE   238  166  104  134  114 -	Pc	-	cbTermsOfPayment	#19861	""
T    233   70   12   11   88 -	p	-	-	-	"Leveransadress 3:"
T    234   84   12   11   88 -	p	-	-	-	"Leveransadress 4:"
T    235  140   12   11   88 -	p	-	-	-	"Transportsätt:"
T    236  154   12   11   88 -	p	-	-	-	"Leveransvillkor:"
T    237  168   12   11   88 -	p	-	-	-	"Betalningsvillkor:"
T    231   42   12   11   88 -	p	-	-	-	"Leveransadress 1:"
T    227   14   12   11   88 -	p	-	-	-	"Standard inköpstyp:"
T    385   98   12   11   88 -	p	-	-	-	"Leveransadress 5:"
T    386  112   12   11   88 -	p	-	-	-	"Leveransadress 6:"
T    232   56   12   11   88 -	p	-	-	-	"Leveransadress 2:"
T    388  126   12   11   88 -	p	-	-	-	"Godsadress:"
CE   396  202  104  186  114 -	Pc	-	cbSetPurchaseInquiry	#19892	""
T    397  204   12   11   88 -	p	-	-	-	"Blankettset:"
GB   226    2    8  186  240 -	p	-	-	-	"Inköp"
GB   398  192    8   28  240 -	p	-	-	-	"Inköpsförfrågan"

>FORMFILES win1 ROWS 0
#Id	sp
>FORM win2 ROWS 16 SIZE 438 "Inlev"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
XB   248   28   24   10   86 -	RP	-	xbArticleRegister	-	"Artikelregistret"
XB   412   28  114   10  102 -	RP	-	xbOnlyMainSupplier	-	"Endast om huvudleverantör"
XB   413   38   24   10   86 -	RP	-	xbSupplierRegister	-	"Leverantörsprisregistret"
GB   411   16   14   34  224 -	p	-	-	-	"Föreslå ändra inköpspris och leverantörspris"
XB   375   54   24   10  154 -	RP	-	xbUpdatePriceInclDiscount	#19809	"Uppdatera inköpspris inkl inköpsrabatt"
XB   249   64   24   10  154 -	RP	-	-	#19802	"Uppdatera inköpsrad"
XB   250   74   24   10  154 -	RP	-	-	#19843	"Inleveransjournal"
XB   245   96   24   10  118 -	RP	-	xbCurrentRate1	-	"Inleverans i rutin 431"
XB   246  106   24   10  118 -	RP	-	xbCurrentRate2	-	"Inleverans i rutin 314 och 315"
XB   247  116   24   10  118 -	RP	-	xbCurrentRate3	-	"Avstäm pris i rutin 314 och 315"
GB   251   86   14   42  224 -	p	-	-	-	"Använd aktuell dagskurs vid"
D    262  132  148   13   60 -	P	-	-	#19806	""
CE   297  146  148   50   90 -	Pc	-	cbSet	#19808	""
T    263  134   14   11  130 -	p	-	-	-	"Varning om antal större än:"
T    298  148   14   11  130 -	p	-	-	-	"Standard blankettset för fria inleveranser:"
GB   252    6    8  158  240 -	p	-	-	-	"Inleverans"

>FORMFILES win2 ROWS 0
#Id	sp
>FORM win3 ROWS 8 SIZE 280 "Lager"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
XB   293   12   18   10  236 -	RP	-	-	#19823	"Spärra saldojustering"
XB   294   22   18   10  236 -	RP	-	xbStockPrice	-	"Lagerpris på inventeringstransaktioner"
XB   389   32   18   10  236 -	RP	-	xbIndirectCost	-	"Omkostnader på inventeringstransaktioner"
XB   394   42   18   10  236 -	RP	-	xbConvertCategory	-	"Kategori 2 artiklar omvandlas till kategori 1 om de anges vid inventering"
XB   399   52   18   10  174 -	RP	-	xbInvSortArt	-	"Sortera inventeringsjournal i artikelkodsordning"
D    400   66  112   13   60 -	P	-	-	#19822	""
T    401   66   17   11   90 -	p	-	-	-	"Varning om antal större än:"
GB   296    2    8   82  248 -	p	-	-	-	"Lager"

>FORMFILES win3 ROWS 0
#Id	sp
>FORM win4 ROWS 4 SIZE 58 "Benämning"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR   306   19   14   76  130 -	P	-	lcLabelPrio	-	""
PB   307   64  148   13   30 -	DP	-	pbLabelTypeUp	-	"&Upp"
PB   308   82  148   13   30 -	DP	-	pbLabelTypeDown	-	"&Ned"
GB   305    6    6   97  180 -	p	-	-	-	"Prioritering vid hämtning av inköpsbenämningar"

>FORMFILES win4 ROWS 0
#Id	sp
>FORM lcLabelPrio ROWS 3 SIZE 28 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T    309    1    1   11   30 -	Hp	-	-	#853	"Prioritet"
T    310    1   31   11   84 -	Hp	-	-	#841	"Benämningstyp"
T    312    1  115   11    0 -	Hp	-	-	#851	"Typ"

>FORM win5 ROWS 34 SIZE 219 "Behovsanalys"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
XB   314   14   32   10  100 -	RP	-	xbNeedPurchase	-	"Anmodan i behovsanalys"
RB   317   40   32   10   65 -	RP	-	rbAnalyseWeek	-	"Vecka"
RB   319   50   32   10   65 -	RP	-	rbAnalyseDay	-	"Dag"
D    322   82   58   13   32 -	P	-	edPeriod2	-	""
D    323   96   58   13   32 -	P	-	edPeriod3	-	""
D    324  110   58   13   32 -	P	-	edPeriod4	-	""
D    325  124   58   13   32 -	P	-	edPeriod5	-	""
D    326  138   58   13   32 -	P	-	edPeriod6	-	""
D    327  152   58   13   32 -	P	-	edPeriod7	-	""
D    328  166   58   13   32 -	P	-	edPeriod8	-	""
D    329   82  184   13   32 -	P	-	edPeriod9	-	""
D    330   96  184   13   32 -	P	-	edPeriod10	-	""
D    331  110  184   13   32 -	P	-	edPeriod11	-	""
D    332  124  184   13   32 -	P	-	edPeriod12	-	""
D    333  138  184   13   32 -	P	-	edPeriod13	-	""
D    334  152  184   13   32 -	P	-	edPeriod14	-	""
D    335  166  184   13   32 -	P	-	-	-	""
T    336   83   22   11   34 -	p	-	-	-	"Period 2"
T    337   97   22   11   34 -	p	-	-	-	"Period 3"
T    338  111   22   11   34 -	p	-	-	-	"Period 4"
T    339  125   22   11   34 -	p	-	-	-	"Period 5"
T    340  139   22   11   34 -	p	-	-	-	"Period 6"
T    341  153   22   11   34 -	p	-	-	-	"Period 7"
T    342  167   22   11   34 -	p	-	-	-	"Period 8"
T    343   83  144   11   34 -	p	-	-	-	"Period 9"
T    344   97  144   11   34 -	p	-	-	-	"Period 10"
T    345  111  144   11   34 -	p	-	-	-	"Period 11"
T    346  125  144   11   34 -	p	-	-	-	"Period 12"
T    347  139  144   11   34 -	p	-	-	-	"Period 13"
T    348  153  144   11   34 -	p	-	-	-	"Period 14"
T    349  167  144   11   34 -	p	-	-	-	"Period 15"
GB   315    0    8  206  242 -	p	-	-	-	"Behovsanalys"
GB   320   28   16   36  126 -	p	-	-	-	"Periodtyp"
GB   321   71   17  115  220 -	p	-	-	-	"Antal per period"

>FORMFILES win5 ROWS 0
#Id	sp
>FORM win6 ROWS 6 SIZE 107 "Kostnadsbokföring"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
XB   353   12   32   10  122 -	RP	-	xbShowTransactions	-	"Visa transaktioner"
XB   354   36   32   10  122 -	RP	-	xb1	-	"Lagerförda artiklar"
XB   355   46   32   10  122 -	RP	-	xb2	-	"Ej lagerförda artiklar"
XB   356   56   32   10  122 -	RP	-	xb3	-	"Tider"
GB   357   26   26   42  208 -	p	-	-	-	"Kategori"
GB   352    2    8   74  240 -	p	-	-	-	"Kostnadsbokföring i rutin 742"

>FORMFILES win6 ROWS 0
#Id	sp
>FORM win7 ROWS 14 SIZE 322 "Inköpspris"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
RB   381   22   16   10  102 -	RP	-	rbInkPrice	-	"Inköpspris som inköpspris"
RB   380   32   16   10  102 -	RP	-	rbBasPrice	-	"Baspris som inköpspris"
GB   382   12   12   35  150 -	p	-	-	-	"Pris vid inköp"
XB   379   50   16   10  102 -	RP	-	xbPurchaseDiscount	#19839	"Inköpsrabatt på inköp"
XB   378   60   16   10  102 -	RP	-	xbFixedDiscount	#19840	"Fast inköpsrabatt"
GB   377    2    8   73  240 -	p	-	-	-	"Inköpspris"
XB   402   92   16   10  154 -	RP	-	xbAccPurchaseSupp	-	"Ackumulera inköp per leverantör i rutin 430"
XB   403  102   16   10  154 -	RP	-	xbAccPurchaseArt	-	"Ackumulera inköp per artikel"
XB   404  112   16   10  154 -	RP	-	xbCostFromOrder	-	"Kostnad från kundorder"
XB   405  122   16   10  154 -	RP	-	xbLabelFromOrder	-	"Benämning från kundorder"
XB   406  132   16   10  154 -	RP	-	xbTextPurchase	-	"Hämta tillhörande text"
XB   407  142   16   10  154 -	RP	-	xbStockFromPurchaseHead	-	"Huvudlager på inköpsrader"
XB   408  152   16   10  154 -	RP	-	xbLabelFromRequest	-	"Benämning från anmodan"
GB   409   82    8   85  240 -	p	-	-	-	"Inköpsanmodan"

>FORMFILES win7 ROWS 0
#Id	sp
>SOURCE
