>TYPE   	D
>NAME   	pdainv.d
>CODE   	pdainv.cod
>BY     	@(#)$Author: Helene $
>DATE   	@(#)$Date: 06-12-20 14:13 $
>VERSION	@(#)$Revision: 5 $
>ID     	29001

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

>TEXTINFO ROWS 8 SIZE 243
#id    value    flags    text
IDL_100  100  -  Inventeringsanmodan finns redan.
IDL_101  101  -  Inventeringsanmodan måste anges
IDL_102  102  -  Lager måste anges
IDL_103  103  -  Anmodan är på annan signatur
IDL_104  104  -  Inventeringsanmodan saknas
IDL_105  105  -  Transaktion kunde inte skapas
IDL_106  106  -  Inventeringsanmodan är avslutad
IDL_107  107  -  Inga fler artiklar på inventeringsanmodan


>STACK ROWS 100 SIZE 5000

>FONT ROWS 37
#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 "Tahoma"
2   -11   0   0   0 400   0  0   0   0   0   0   0   0 "Tahoma"
3   -11   0   0   0 400   1  0   0   0   0   0   0   0 "Tahoma"
4   -11   0   0   0 700   0  0   0   0   0   0   0   0 "Tahoma"
5   -13   0   0   0 400   0  0   0   0   0   0   0   0 "Tahoma"
6   -13   0   0   0 400   1  0   0   0   0   0   0   0 "Tahoma"
7   -13   0   0   0 700   0  0   0   0   0   0   0   0 "Tahoma"
8   -16   0   0   0 400   0  0   0   0   0   0   0   0 "Tahoma"
9   -19   0   0   0 400   0  0   0   0   0   0   0   0 "Tahoma"
A   -11   0   0   0 700   0  0   0   0   0   0   0   0 "Verdana"
B   -11   0   0   0 400   1  0   0   0   0   0   0   0 "Verdana"
C   -21   0   0   0 700   0  0   0   0   0   0   0   0 "Verdana"
D   -11   0   0   0 400   1  0   0   0   0   0   0   0 "Arial"
E   -11   0   0   0 700   0  0   0   0   0   0   0   0 "Arial"
F   -19   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
G    -9   0   0   0 400   0  0   0   0   0   0   0   0 "Tahoma"
H   -11   0   0   0 400   0  0   0   0   0   0   0   0 "Tahoma"
I   -11   0   0   0 400   1  0   0   0   0   0   0   0 "Tahoma"
J   -11   0   0   0 700   0  0   0   0   0   0   0   0 "Tahoma"
K   -13   0   0   0 400   0  0   0   0   0   0   0   0 "Tahoma"
L   -13   0   0   0 400   1  0   0   0   0   0   0   0 "Tahoma"
M   -13   0   0   0 700   0  0   0   0   0   0   0   0 "Tahoma"
N   -16   0   0   0 400   0  0   0   0   0   0   0   0 "Tahoma"
O   -19   0   0   0 400   0  0   0   0   0   0   0   0 "Tahoma"
P    -9   0   0   0 400   0  0   0   0   0   0   0   0 "Verdana"
Q   -11   0   0   0 400   0  0   0   0   0   0   0   0 "Verdana"
R   -13   0   0   0 400   0  0   0   0   0   0   0   0 "Verdana"
S   -13   0   0   0 400   1  0   0   0   0   0   0   0 "Verdana"
T   -13   0   0   0 700   0  0   0   0   0   0   0   0 "Verdana"
U   -16   0   0   0 400   0  0   0   0   0   0   0   0 "Verdana"
V   -19   0   0   0 400   0  0   0   0   0   0   0   0 "Verdana"
W    -9   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
X   -11   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
Y   -13   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
Z   -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"


>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   180   150 S	-	hatop2.bmp	"-"	  0	"Inventering"

>FORM MAIN ROWS 2 SIZE 25 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
TB    57   24    2  164  144 -	PB	-	tab1	-	"Huvudinfo,Artikel,Rader"
WW   136    2    2   18  142 -	P	-	win10	-	""

>FORM tab1 ROWS 3 SIZE 3 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW    58   14    2  146  140 -	P	-	win1	-	""
WW    59   14    2  146  140 -	HP	-	win2	-	""
WW    60   14    2  146  140 -	P	-	win3	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win1 ROWS 12 SIZE 53 "huvud"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW    78    2    0   18  138 -	P	-	win4	-	""
D     65   24   50   13   34 -	pUO	-	edSign	-	""
CB    71   38   50   50   70 -	P	-	cbStock	-	""
D     74   66   50   13   70 -	P	-	edName	#17002	""
D    123   80   50   13   70 -	P	-	edDistrict	#11075	""
WW    79  130    0   15  138 -	P	-	win5	-	""
T     66   26    2   11   44 -	p	-	-	-	"Signatur:"
T     68   40    2   11   44 -	p	-	txStock	-	"Lager:"
T     73   54    2   11   44 -	p	-	-	-	"Anmodan:"
T     75   68    2   11   44 -	p	-	-	-	"Beteckning:"
T    122   82    2   11   44 -	p	-	txDistrict	-	"Område:"
CE   139   52   50   50   70 -	P	-	cbInventory	-	""

>FORMFILES win1 ROWS 0
#Id	sp
>FORM win5 ROWS 2 SIZE 37 "win5"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3    77    0   12   15   60 -	QP	-	pbContinue	-	"continue.bmp,Fortsätt"
B3   104    0   76   15   60 -	QP	-	pbConfirm	-	"ok.bmp,Godkänn"

>FORMFILES win5 ROWS 0
#Id	sp
>FORM win2 ROWS 16 SIZE 99 "artikel"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   100    0    0   13  138 -	P	-	win6	-	""
D     94   16    2   13  134 -	PO/	-	-	#1021	""
D     87   30   56   13   52 -	PU/	-	edLpl	#11011	""
D     89   44   56   13   52 -	PU/	-	edBatch	#11012	""
D     97   58   56   13   52 -	pO	-	edStockBalance	#11023	""
D     98   72   56   13   52 -	pO	-	-	#11021	""
XB    93   86    0   13  108 -	p/	-	xbAccumulate	-	"Ackumulera"
D     95  100   56   13   52 -	P	-	edInventoryQuant	#11071	""
WW   105  130    0   15  138 -	P	-	win7	-	""
T     92   74    2   11   52 -	p	-	-	-	"Hittills inv.:"
T     96  102    2   11   52 -	p	-	-	-	"Inv. antal:"
T     90   46    2   11   52 -	p	-	txBatch	-	"Batch:"
T     91   60    2   11   52 -	p	-	txStockBalance	-	"Lagersaldo:"
T     88   32    2   11   52 -	p	-	-	-	"Lagerplats:"
BM   102  100  110   13   15 -	Qp0	-	pbInc	-	"pdaup.bmp"
BM   103  100  124   13   15 -	Qp0	-	pbDec	-	"pdadown.bmp"

>FORMFILES win2 ROWS 0
#Id	sp
>FORM win3 ROWS 6 SIZE 53 "rader"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR   110    2    2  102  132 -	P	-	lcInventoryRowBalance	-	""
GR   127    2    2  102  132 -	P	-	lcInventoryRowNoBalance	-	""
RB   115  114    8   10  120 -	RP/	-	rbShow1	-	"Alla"
RB   116  124    8   10  120 -	RP/	-	rbShow2	-	"Enbart ej inventerade"
RB   117  134    8   10  120 -	RP/	-	rbShow3	-	"Enbart inventerade"
GB   118  104    4   42  128 -	p	-	-	-	"Visa"

>FORMFILES win3 ROWS 0
#Id	sp
>FORM win4 ROWS 2 SIZE 42 "win4"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3    63    2    0   15   68 -	QPM	-	pbNew	-	"new.bmp,Ny anmodan"
B3    64    2   70   15   68 -	QPM	-	pbChange	-	"edit.bmp,Hämta anmodan"

>FORMFILES win4 ROWS 0
#Id	sp
>FORM win6 ROWS 4 SIZE 35 "win6"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3    83    1   92   13   15 -	QpF	-	pbPrevArt	-	"pdaleft.bmp"
B3    82    1  106   13   15 -	QpF	-	pbNexArt	-	"pdaright.bmp"
D     80    0    2   13   88 -	PU	-	edArt	#11005	""
B3   121    1  122   13   15 -	xQpF	-	pbArt	-	"seek.bmp"

>FORMFILES win6 ROWS 0
#Id	sp
>FORM win7 ROWS 2 SIZE 44 "win7"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
B3   106    0    4   15   65 -	QP	-	pbSaveTrans	-	"save.bmp,Spara rad"
B3   120    0   72   15   65 -	QP	-	pbSaveInv	-	"exit_inv.bmp,Avsluta inv"

>FORMFILES win7 ROWS 0
#Id	sp
>FORM lcInventoryRowBalance ROWS 5 SIZE 44 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T    111    0    0   11   44 -	Hp	-	-	#11005	"Artikelkod"
T    124    0   44   11   33 -	Hp	-	-	#11011	"Lagerplats"
T    112    0   78   11   28 -	RHp	-	-	#11021	"Inv.antal"
T    125    0  114   11    0 -	Hp	-	-	#11003	"Radnr"
T    126    0  108   11   20 -	RHp	-	-	#11023	"Saldo"

>FORMFILES lcInventoryRowBalance ROWS 0
#Id	sp
>FORM lcInventoryRowNoBalance ROWS 4 SIZE 39 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T    128    0    0   11    0 -	Hp	-	-	#11003	"Radnr"
T    129    0    0   11   34 -	Hp	-	-	#11005	"Artikelkod"
T    130    0   38   11   50 -	Hp	-	-	#11011	"Lagerplats"
T    131    0   96   11   34 -	RHp	-	-	#11021	"Inv. antal"

>FORMFILES lcInventoryRowNoBalance ROWS 0
#Id	sp
>FORM win10 ROWS 1 SIZE 10 "Rubrik"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
L    140    4   12   11   60 -	p	-	-	-	"pdatop.di"

>FORMFILES win10 ROWS 0
#Id	sp
>SOURCE
