Index: cT408.mac.rou
===================================================================
diff -u -r734 -r3542
--- cT408.mac.rou	(.../cT408.mac.rou)	(revision 734)
+++ cT408.mac.rou	(.../cT408.mac.rou)	(revision 3542)
@@ -1,31 +1,32 @@
-cT408 ;Pointeren rekeningen ;%T40 ; [ 01/03/01  7:20 PM ]
- G 1
- ;
-T0 ;Pointeren rekeningen ;
-T1 ;  Saldo van de niet gepointeerde lijnen: ;
- ;
-T0F ;Pointage des comptes g�n�raux ;
-T1F ;  Solde des lignes non point�es: ;
- ;
-T0E ;Check off accounts ;
-T1E ;  Balance of the lines that have not yet been checked off: ;
- ;
-S1 S (R,I2)=0
-S1A S I2=$O(^HULP(boot,$J+.01,I2)) I I2=""!(I2[" ") G S1Z
-S1B S N=^(I2),NVA=$P(N,D,4),NIV=$P(N,D,30) I NIV G S1A
-S1C I 'NVA,'$P(N,D,8) S R=R+$P(N,D,6)-$P(N,D,7)
-S1D I $P(N,D,8) S R=R+$P(N,D,11)
-S1E G S1A
-S1Z Q
- ;
- ; berekenen
-1 W /CUP(22,1),$P($T(@("T1"_QT)),U,2),@F1 D S1
-2 W $$IP^cAFA1(R,QD,0),BF S R=4 D F2
- ;
-YZ G 2^cT402
- ;
-F1 S R=250
-F2 D TXT^cAFA1(R)
-FZ K R Q
- ;
-ZZ ; 05.02.01 - 16 u 23 * V7.84
\ No newline at end of file
+cT408	;Pointeren rekeningen ;%T40 ; [ 01/03/01  7:20 PM ]
+	G 1
+	;
+T0	;Pointeren rekeningen ;
+T1	;  Saldo van de niet gepointeerde lijnen: ;
+	;
+T0F	;Pointage des comptes g�n�raux ;
+T1F	;  Solde des lignes non point�es: ;
+	;
+T0E	;Check off accounts ;
+T1E	;  Balance of the lines that have not yet been checked off: ;
+	;
+S1	S (R,I2)=0
+S1A	S I2=$O(^TEMP(boot,$J,I2)) I I2=""!(I2[" ") G S1Z
+S1B	S N=^(I2),NVA=$P(N,D,4),NIV=$P(N,D,30) I NIV G S1A
+S1C	I 'NVA,'$P(N,D,8) S R=R+$P(N,D,6)-$P(N,D,7)
+S1D	I $P(N,D,8) S R=R+$P(N,D,11)
+S1E	G S1A
+S1Z	Q
+	;
+	; berekenen
+1	W /CUP(22,1),$P($T(@("T1"_QT)),U,2),@F1 D S1
+2	W $$IP^cAFA1(R,QD,0),BF S R=4 D F2
+	;
+YZ	G 2^cT402
+	;
+F1	S R=250
+F2	D TXT^cAFA1(R)
+FZ	K R Q
+	;
+ZZ	; 18.04.02 - 15 u 36 * V7.92
+