>TYPE   	D
>NAME   	330-1.d
>CODE   	330-1.cod
>BY     	@(#)$Author: Anderst $
>DATE   	@(#)$Date: 05-10-26 11:45 $
>VERSION	@(#)$Revision: 3 $
>ID     	13505

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

>TEXTINFO ROWS 18 SIZE 533
#id    value    flags    text
IDL_100  100  -  Faktura %1 upptagen av %2 i rutin %3
IDL_101  101  -  Fakturan finns redan med i urvalet
IDL_102  102  -  Välj in kredit?
IDL_103  103  -  Kreditnota för %1 går inte att avräkna. Debetfakturor saknas.
IDL_104  104  -  Fel vid registrering av temporärregister: %1
IDL_105  105  -  Summa
IDL_106  106  -  Av&markera alla
IDL_107  107  -  &Markera alla
IDL_108  108  -  Fel vid ändring av journal
IDL_109  109  -  Kan ej registrera betalning. Felaktig post i PURESJO, ta bort UB0.
IDL_110  110  -  Ändra betalningsdatum
IDL_111  111  -  Registrera betalning
IDL_112  112  -  Inga fakturor funna
IDL_113  113  -  Godkänd?
IDL_114  114  -  Registrera betalning klart
IDL_115  115  -  Glöm inte ändra datum på de fakturor som ska avräknas.
IDL_116  116  -  Glöm inte ändra datum på kreditnota.
IDL_117  117  -  För stort belopp


>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   320   380 SB	-	-	"-"	  0	""

>FORM MAIN ROWS 5 SIZE 80 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
TB    15  172    8  114  302 -	PZw	-	tab1	-	"&Urval,&Delsummor,&Kreditnotor"
GR    14    6    6  148  304 -	PWZd	-	lcTable	-	""
B3    35  184  312   15   65 -	TPwz	-	pbOk	-	"ok.bmp,Verk&ställ"
B3     2  270  312   15   65 -	xTPwz	-	pbExit	-	"exit.bmp,St&äng"
PB    40  156  256   15   54 -	pfwz	-	pbAll	-	"&Markera alla"

>FORMFILES MAIN ROWS 1
#Id	sp
40	r
>FORM tab1 ROWS 3 SIZE 3 "tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW    16   14    2   96  298 -	P	-	win1	-	""
WW    48   12    2   99  298 -	PZ	-	win2	-	""
WW    50   12    2   99  298 -	PZ	-	win3	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win1 ROWS 19 SIZE 106 "Urval"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
DP    18   14   46   13   46 D8	P	-	dpFrom	#844	""
DP    19   14   96   13   46 D8	P	-	dpTo	#846	""
D     21   28   46   13   60 -	PU	-	edSupplier	#841	""
CE    22   42   46   50   96 -	Pc	-	cbCurrency	#851	""
D     36   56   46   13   60 -	PU	-	edInvoiceNo	#8140	""
PB    39   74  114   14   54 -	P	-	pbShow	-	"&Visa urval"
D     25    8  230   13   60 -	PO	-	-	#8591	""
D     26   22  230   13   60 -	PO	-	-	#8592	""
D     27   36  230   13   60 -	PO	-	-	#8593	""
T     24   44    6   11   40 -	p	-	-	-	"Valuta:"
T     28    8  176   11   54 -	p	-	-	-	"Summa debet:"
T     29   22  176   11   54 -	p	-	-	-	"Summa kredit:"
T     30   36  176   11   54 -	p	-	-	-	"Netto:"
T     17   16    6   11   40 -	p	-	-	-	"Datum:"
T     37   58    6   11   40 -	p	-	-	-	"Fakturanr:"
T     20   30    6   11   40 -	p	-	-	-	"Lev.kod:"
T     42   16   92   11    3 -	p	-	-	-	"-"
B3   309   28  110   13   15 -	SxTpfF	-	pbSupplier	-	"seek.bmp"
GB    38    2    2   92  170 -	p	-	-	-	"Urval"

>FORMFILES win1 ROWS 0
#Id	sp
>FORM lcTable ROWS 14 SIZE 116 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
XB   348    1    1   10   16 -	RHPh	-	-	#10091	""
T    349    1   17   11   50 -	Hph	-	-	#12841	"Datum"
T    350    1   67   11   72 -	Hph	-	-	#2021	"Leverantör"
T    351    1  139   11   50 -	Hph	-	-	#10071	"Fakturanr"
T    352    1  189   11   20 -	Hph	-	-	#10081	""
T    353    1  209   11   50 -	RHph	-	-	#8571	"Belopp"
T    354    1  259   11    0 -	Hp	-	-	#4605	"Fakturatyp"
T    355    1  259   11    0 -	Hp	-	-	#4606	"Fakturanr"
T    356    1  259   11    0 -	Hp	-	-	#10041	"Antal 1"
T    357    1  259   11    0 -	Hp	-	-	#2001	"F÷retagskod"
T    358    1  259   11    0 -	Hp	-	-	#12863	"Egenskaper"
T    359    1  259   11    0 -	Hp	-	-	#4614	"Kalkylkurs"
T    360    1  259   11    0 -	Hp	-	-	#4602	"Uppdragsnr"
T    361    1  259   11    0 -	Hp	-	-	#4603	"Radnr"

>FORMFILES lcTable ROWS 1
#Id	sp
40	r
>FORM win2 ROWS 1 SIZE 1 "Summor"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR    49    6    6   90  286 -	PZ	-	lcSum	-	""

>FORMFILES win2 ROWS 0
#Id	sp
>FORM win3 ROWS 5 SIZE 30 "Kredit"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
GR    53    4    2   76  292 -	PZ	-	lcCredit	-	""
D     54   84  156   13   60 -	P	-	edCreditAmount	#10010	""
PB   136   84  224   13   70 -	P	-	pbCreditAmount	-	"Välj"
T     55   85  113   11   42 -	p	-	-	-	"Belopp:"
PB   251   84    3   13   60 -	P	-	pbDelCredit	-	"Ta bort invald"

>FORMFILES win3 ROWS 0
#Id	sp
>FORM lcSum ROWS 6 SIZE 48 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T    303    1    1   11   45 -	Hp	-	-	#12850	"Datum"
T    304    1   46   11   40 -	Hp	-	-	#12861	"Leverantör"
T    305    1   86   11   40 -	Hp	-	-	#12862	"Valuta"
T    306    1  126   11   50 -	RHp	-	-	#10014	"Belopp"
T    307    1  176   11    0 -	Hp	-	-	#12801	"kreditat"
T    308    1  176   11    0 -	Hp	-	-	#12864	"Kundkod"

>FORMFILES lcSum ROWS 0
#Id	sp
>FORM lcCredit ROWS 10 SIZE 109 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T    324    2    1   11   30 -	Hph	-	-	#10082	"Fakturanr"
T    325    2   31   11   55 -	Hp	-	-	#4617	"Lev fakt.nr"
T    326    2   86   11   65 -	RHph	-	-	#8572	"Betalt belopp"
T    327    3  152   11   75 -	Hph	-	-	#4633	"Betalningsdatum"
T    328    3  228   11   46 -	RHph	-	-	#8573	"Restbelopp"
T    329    2  273   11    0 -	Hp	-	-	#4602	"Uppdragsnr"
T    330    2  273   11    0 -	Hp	-	-	#4603	"Radnr"
T    331    2  273   11    0 -	Hp	-	-	#4605	"Fakturatyp"
T    332    2  273   11    0 -	Hp	-	-	#4606	"Fakturanr"
T    333    2  273   11    0 -	Hp	-	-	#2021	"Företag"

>FORMFILES lcCredit ROWS 0
#Id	sp
>SOURCE
