Index: cT9120.mac.rou
===================================================================
diff -u -r29059 -r43422
--- cT9120.mac.rou	(.../cT9120.mac.rou)	(revision 29059)
+++ cT9120.mac.rou	(.../cT9120.mac.rou)	(revision 43422)
@@ -13,6 +13,8 @@
 T9	;Naam + functie van ondertekenaar ;
 T10	;Hoedanigheid v/d ondertekenaar(s);
 T11	;Telefoonnr. v/d ondertekenaar(s);
+T12	;E-mail van ondertekenaar ;
+T13	;Telefoon van ondertekenaar ;
 T95	;Aangifte van 2010 kan maar vanaf 05.02.10 worden ingediend.;
 T96	;BTW-nummer is geen ondernemingsnummer;
 T97	;U moet het BTW-nummers invullen! ;
@@ -31,6 +33,8 @@
 T9F	;Nom + fonction signataire ;
 T10F	;Qualit� du (des) signataire(s);
 T11F	;T�l�phone du (des) signataire(s);
+T12F	;E-mail du signataire ;
+T13F	;T�l�phone du signataire ;
 T95F	;Une d�claration de 2010 ne peut �tre d�pos�e qu'� partir du 05.02.10.;
 T96F	;Num�ro de TVA n'est pas un num�ro d' entreprise;
 T97F	;Il faut remplir les 2 num�ros de TVA! ;
@@ -49,6 +53,8 @@
 T9E	;Naam + functie ondertekenaar ;
 T10E	;Hoedanigheid v/d ondertekenaar(s);
 T11E	;Telefoonnr. v/d ondertekenaar(s);
+T12E	;E-mail van ondertekenaar ;
+T13E	;Telefoon van ondertekenaar ;
 T95E	;It is only possible to submit the declaration of 2010 as from 05.02.10.;
 T96E	;BTW-nummer is geen ondernemingsnummer;
 T97E	;U moet het BTW-nummers invullen! ;
@@ -68,9 +74,11 @@
 2	S B(1)=$G(@("^"_Q_"BTW(0,0)")),B(2)=$G(@("^"_Q_"BTW(BP2,0)"))
 	F I=1:1:4 W /CUP(4+I,2),$J(I,2),".",@F6,$P($T(@("T1"_QT)),U,2),I,@F9 W /CUP(4+I,26)," : ",@F2,$P(B(1),D,I+1)
 	W /CUP(9,2)," 5.",@F6,$P($T(@("T2"_QT)),U,2),@F9," : " W /CUP(9,29),@F2,$$BTW^cAFO1($P(B(1),D,7))
-	W /CUP(11,2)," 6.",@F6,$P($T(@("T9"_QT)),U,2)_"1",@F9 W /CUP(11,41)," : ",@F2,$P(B(1),D,9)
-	W /CUP(12,2)," 7.",@F6,$P($T(@("T9"_QT)),U,2)_"2",@F9 W /CUP(12,41)," : ",@F2,$P(B(1),D,12)
-	W /CUP(13,2)," 8.",@F6,$P($T(@("T9"_QT)),U,2)_"3",@F9 W /CUP(13,41)," : ",@F2,$P(B(1),D,13)
+	W /CUP(11,2)," 6.",@F6,$P($T(@("T9"_QT)),U,2),@F9 W /CUP(11,41)," : ",@F2,$P(B(1),D,9)
+	; W /CUP(12,2)," 7.",@F6,$P($T(@("T9"_QT)),U,2)_"2",@F9 W /CUP(12,41)," : ",@F2,$P(B(1),D,12)
+	W /CUP(12,2)," 7.",@F6,$P($T(@("T12"_QT)),U,2),@F9 W /CUP(12,41)," : ",@F2,$P(B(1),D,14)
+	; W /CUP(13,2)," 8.",@F6,$P($T(@("T9"_QT)),U,2)_"3",@F9 W /CUP(13,41)," : ",@F2,$P(B(1),D,13)
+	W /CUP(13,2)," 8.",@F6,$P($T(@("T13"_QT)),U,2),@F9 W /CUP(13,41)," : ",@F2,$P(B(1),D,15)
 	W /CUP(15,2)," 9.",@F6,$P($T(@("T3"_QT)),U,2),@F9 W /CUP(15,41)," : ",@F2,$$JN^cAFO1($P(B(2),D,7))
 	W /CUP(16,2),"10.",@F6,$P($T(@("T4"_QT)),U,2),@F9 W /CUP(16,41)," : ",@F2,$$JN^cAFO1($P(B(2),D,8))	
 	W /CUP(17,2),"11.",@F6,$P($T(@("T5"_QT)),U,2),@F9 W /CUP(17,41),@F2," : " I $L($P(B(2),D)) W $$IP^cAFA1($P(B(2),D),QD,12)_BF
@@ -146,8 +154,10 @@
 C9Z	Q
 	;
 	;  Naam van de ondertekenaar(s)
-86	S I=$T(@("T9"_QT)),BI=$S(K=6:109,K=7:112,1:113),KR=$P(B(1),D,$S(K=6:9,K=7:12,1:13))
-87	S R="KR\22\3\"_$P(I,U,2)_(K-5)_"\\36",$P(R,D,13)=1 D R0
+86	I K=6 S I=$T(@("T9"_QT)),BI=$S(K=6:109,K=7:114,1:115),KR=$P(B(1),D,$S(K=6:9,K=7:14,1:15))
+	I K=7 S I=$T(@("T12"_QT)),BI=$S(K=6:109,K=7:114,1:115),KR=$P(B(1),D,$S(K=6:9,K=7:14,1:15))
+	I K=8 S I=$T(@("T13"_QT)),BI=$S(K=6:109,K=7:114,1:115),KR=$P(B(1),D,$S(K=6:9,K=7:14,1:15))
+87	S R="KR\22\3\"_$P(I,U,2)_$S(K=6:(K-5),1:"")_"\\36",$P(R,D,13)=1 D R0
 88	I K'="-" D S2 G 2
 89	G 3
 	;
@@ -161,5 +171,4 @@
 F2	D TXT^cAFA1(R)
 FZ	K R Q
 	;
-ZZ	; 08.02.08 - 15 u 00 * V9.00
-
+ZZ	; 11.12.09 - 14 u 25 * V9.06