>TYPE   	D
>NAME   	330-2.d
>CODE   	330-2.cod
>BY     	@(#)$Author: Larsa $
>DATE   	@(#)$Date: 09-01-21 13:24 $
>VERSION	@(#)$Revision: 3 $
>ID     	13506

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

>TEXTINFO ROWS 13 SIZE 355
#id    value    flags    text
IDL_100  100  -  Inga uppdrag funna
IDL_101  101  -  Uppdraget finns redan med i urvalet
IDL_102  102  -  Makulera uppdragsrad?
IDL_103  103  -  Makulera uppdrag?
IDL_104  104  -  Kan ej makulera avslutade uppdrag
IDL_105  105  -  Kan ej makulera betald uppdragsrad
IDL_106  106  -  Visar de uppdrag där fakturan ingår
IDL_107  107  -  Fakturan finns ej med i uppdrag för detta betalsätt
IDL_108  108  -  Fakturan finns med i uppdrag med betalsätt %1
IDL_109  109  -  Öppet
IDL_110  110  -  Avslutat
IDL_111  111  -  Återskapa urval?
IDL_112  112  -  Rad ej märkt för borttag


>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 8
#id color	comment
1   0xff0000   	""
2   0xff       	""
3   0xff00ff   	""
4   0xffffff   	""
5   0xc0c0c0   	""
6   0x80       	""
7   0x808080   	""
8   0x0        	""


>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   310   390 SB	-	-	"-"	  0	"Sök/Makulera uppdrag"

>FORM MAIN ROWS 5 SIZE 101 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
TB    15  141    8  144  302 -	PZw	-	tab1	-	"&Urval,U&ppdragsrader,Uppdra&gsradinfo"
GR    14    6    6  132  304 -	PWZd	-	lcHead	-	""
B3     2  270  312   15   65 -	xTPwz	-	pbExit	-	"exit.bmp,St&äng"
B3   235    7  313   15   70 -	QP	-	pbCancelPayment	-	"delete.bmp,&Mak.uppdrag"
B3   236  152  312   15   70 -	QPwz	-	pbCancelPayRows	-	"delete.bmp, Mak.ra&d"

>FORMFILES MAIN ROWS 0
#Id	sp
>FORM tab1 ROWS 3 SIZE 3 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW    16   13    2  130  298 -	P	-	win1	-	""
WW    48   12    2  130  298 -	PZ	-	win2	-	""
WW    50   12    2  130  298 -	p	-	win3	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win1 ROWS 15 SIZE 128 "Urval"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
DP    18   14   64   13   60 D8	P	-	dpDate	#8711	""
XB   271   30    5   10   68 -	P	-	xbFinished	-	"Även avslutade:"
D    272   42   64   13   60 -	P	-	edSign	#8825	""
D     36   56   64   13   60 -	PU	-	edNumber	#8130	""
PB    39   55  150   14   39 -	P	-	pbShow	-	"V&isa urval"
D    313   94   64   13   60 -	PU	-	edInvoice	#8140	""
PB   315   93  150   14   39 -	P	-	pbShowInv	-	"V&isa urval"
T     17   16    6   11   58 -	p	-	-	-	"Datum:"
T     37   57    6   11   58 -	p	-	-	-	"Uppdragsnr:"
T     24   44    6   11   58 -	p	-	-	-	"Signatur:"
T    314   95    6   11   58 -	p	-	-	-	"Fakturanr:"
B3   316   92  128   13   15 -	SxTpfF	-	pbInvoice	-	"seek.bmp"
B3   317   55  128   13   15 -	SxTpfF	-	pbSeekPayOrder	-	"seek.bmp"
GB    38    0    2   76  195 -	p	-	-	-	"Urval datum"
GB   312   78    2   46  195 -	p	-	-	-	"Urval faktura"

>FORMFILES win1 ROWS 0
#Id	sp
>FORM lcTable ROWS 7 SIZE 50 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
XB   217    1    1   10   16 -	RHP	-	-	#10091	""
T    218    1   17   11   50 -	Hp	-	-	#4672	"Uppdragsnr"
T    219    1   67   11   39 -	Hp	-	-	#4683	"Datum"
T    220    1  107   11   50 -	Hp	-	-	#4685	"Tid"
T    222    1  159   11   50 -	Hp	-	-	#4675	"Signatur"
T    223    1  209   11   44 -	Hp	-	-	#4681	"Antal rader"
T    228    2  254   11   47 -	Hp	-	-	#4673	"Status"

>FORMFILES lcTable ROWS 0
#Id	sp
>FORM win2 ROWS 1 SIZE 1 "Uppdragsrader"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR    49    6    6  120  286 -	PZ	-	lcRows	-	""

>FORMFILES win2 ROWS 0
#Id	sp
>FORM win3 ROWS 27 SIZE 191 "Info"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
XB   282   16   12   10   70 -	DP	-	xbGuard	#861	"Bevakning:"
XB   283   28   12   10   70 -	DP	-	xbCredit	#4615	"Kredit:"
DP   284   40   72   13   54 D8	pf	-	-	#4631	""
D    286   54   72   13   54 -	pf	-	-	#4621	""
D    289   14  184   13  104 -	pf	-	-	#4204	""
D    291   28  184   13  104 -	pf	-	-	#4035	""
D    293   42  184   13   60 -	pf	-	-	#4031	""
D    295   56  184   13   28 -	pf	-	-	#4260	""
XB   297   56  236   10   50 -	DP	-	xbDispute	#4071	"Tvist:"
D    300   70  184   13   60 -	pf	-	-	#8125	""
DP   301   84  184   13   60 D8	pf	-	-	#4015	""
D    303   98  184   13   60 -	pf	-	-	#4251	""
D    304  112  184   13   60 -	pf	-	-	#4281	""
T    296   58  140   11   44 -	p	-	-	-	"Kassarabatt:"
T    287   56   13   11   58 -	p	-	-	-	"Belopp:"
D    298  132  184   13   60 -	P	-	-	-	""
T    299   72  140   11   44 -	p	-	-	-	"Bet.sätt:"
T    292   30  140   11   44 -	p	-	-	-	"Kommentar:"
T    285   42   13   11   58 -	p	-	-	-	"Betaln.datum:"
T    302   86  140   11   44 -	p	-	-	-	"Bet.datum:"
T    294   43  140   11   44 -	p	-	-	-	"Vår referens:"
T    290   15  140   11   44 -	p	-	-	-	"Lev.faktnr:"
T    305   99  140   11   44 -	p	-	-	-	"Att betala:"
T    306  113  140   11   44 -	p	-	-	-	"Attest:"
T    308   57  216   11    9 -	p	-	-	-	"%"
GB   281    1    6  126  125 -	p	-	-	-	"Uppdragsinfo"
GB   288    1  134  126  161 -	p	-	-	-	"Leverantörsreskontra info"

>FORMFILES win3 ROWS 0
#Id	sp
>FORM lcSum ROWS 6 SIZE 49 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T    229    0    1   11   25 -	Hp	-	-	#4603	"Radnr"
T    230    0   26   11   45 -	Hp	-	-	#4606	"Fakturanr"
T    231    0   71   11   50 -	Hp	-	-	#2021	"Leverantör"
T    232    0  121   11   47 -	Hp	-	-	#4631	"Betalas"
T    233    0  171   11   43 -	Hp	-	-	#4633	"Betald"
T    234    0  217   11   65 -	RHp	-	-	#4621	"Belopp"

>FORMFILES lcSum ROWS 0
#Id	sp
>FORM lcHead ROWS 7 SIZE 58 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
XB   250    1    1   10   16 -	RHPh	-	-	#10091	""
T    251    1   17   11   50 -	Hph	-	-	#4672	"Uppdragsnr"
T    252    1   67   11   52 -	Hph	-	-	#4683	"Uppdragsdatum"
T    253    1  119   11   26 -	Hph	-	-	#4685	"Tid"
T    254    1  145   11   40 -	Hph	-	-	#4675	"Signatur"
T    255    1  185   11   55 -	Hph	-	-	#4681	"Antal rader"
T    256    1  241   11   46 -	Hph	-	-	#10081	"Status"

>FORMFILES lcHead ROWS 1
#Id	sp
4670	r
>FORM lcRows ROWS 8 SIZE 51 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
XB   273    1    1   10   16 -	RHPh	-	-	#864	""
T    274    8   18   11   25 -	Hph	-	-	#4603	"Radnr"
T    275    9   44   11   34 -	Hph	-	-	#10071	"Fakturanr"
T    276   10   78   11   53 -	Hph	-	-	#2021	"Leverantör"
T    277    7  131   11   40 -	Hph	-	-	#4631	"Betalas"
T    278   10  173   11   40 -	Hph	-	-	#4633	"Betald"
T    279   17  210   11   20 -	Hph	-	-	#4613	""
T    280    2  234   11   44 -	RHph	-	-	#4621	"Belopp"

>FORMFILES lcRows ROWS 1
#Id	sp
46	r
>SOURCE
