Index: cAN214.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN214.mac.rou	(.../cAN214.mac.rou)	(revision 29059)
+++ cAN214.mac.rou	(.../cAN214.mac.rou)	(revision 43425)
@@ -40,4 +40,3 @@
 YZ	Q
 	;
 ZZ	; 18.05.04 - 15 u 48 * V8
-
Index: cANU40.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU40.mac.rou	(.../cANU40.mac.rou)	(revision 29059)
+++ cANU40.mac.rou	(.../cANU40.mac.rou)	(revision 43425)
@@ -53,4 +53,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN2050.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN2050.mac.rou	(.../cAN2050.mac.rou)	(revision 29059)
+++ cAN2050.mac.rou	(.../cAN2050.mac.rou)	(revision 43425)
@@ -71,4 +71,3 @@
 YZ	Q
 	;
 ZZ	; 25.04.06 - 15 u 44 * V8.07
-
Index: cAN2242.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN2242.mac.rou	(.../cAN2242.mac.rou)	(revision 29059)
+++ cAN2242.mac.rou	(.../cAN2242.mac.rou)	(revision 43425)
@@ -81,4 +81,3 @@
 R0	S $P(R,D,12)=$T(+0),$P(R,D,13)=1 D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 02.06.03 -  9 u 52 * V7.95
-
Index: cAN210.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN210.mac.rou	(.../cAN210.mac.rou)	(revision 29059)
+++ cAN210.mac.rou	(.../cAN210.mac.rou)	(revision 43425)
@@ -86,4 +86,3 @@
 REFTOPZ	Q
 	;
 ZZ	; 04.04.05 - 14 u 29 * V8.03
-
Index: cANU200.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU200.mac.rou	(.../cANU200.mac.rou)	(revision 29059)
+++ cANU200.mac.rou	(.../cANU200.mac.rou)	(revision 43425)
@@ -45,4 +45,3 @@
 E1	D ER^cAN000($P($T(@("T2"_QT)),U,2)) G YZ
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN211.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN211.mac.rou	(.../cAN211.mac.rou)	(revision 29059)
+++ cAN211.mac.rou	(.../cAN211.mac.rou)	(revision 43425)
@@ -51,4 +51,3 @@
 YZ	Q
 	;
 ZZ	; 18.05.04 - 15 u 48 * V8
-
Index: cANFAX.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANFAX.mac.rou	(.../cANFAX.mac.rou)	(revision 29059)
+++ cANFAX.mac.rou	(.../cANFAX.mac.rou)	(revision 43425)
@@ -48,4 +48,3 @@
 RESENDZ	Q
 	;
 ZZ	; 29.10.02 - 11 u 38 * V7.93
-
Index: cAN2142.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN2142.mac.rou	(.../cAN2142.mac.rou)	(revision 29059)
+++ cAN2142.mac.rou	(.../cAN2142.mac.rou)	(revision 43425)
@@ -69,4 +69,3 @@
 YZ	Q
 	;
 ZZ	; 04.04.05 - 14 u 29 * V8.03
-
Index: cANEM0.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANEM0.mac.rou	(.../cANEM0.mac.rou)	(revision 29059)
+++ cANEM0.mac.rou	(.../cANEM0.mac.rou)	(revision 43425)
@@ -314,4 +314,3 @@
 	Q
 	;
 ZZ	; 24.02.06 - 15 u 49 * V8.06
-
Index: cAN001.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN001.mac.rou	(.../cAN001.mac.rou)	(revision 29059)
+++ cAN001.mac.rou	(.../cAN001.mac.rou)	(revision 43425)
@@ -81,4 +81,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cANR0.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANR0.mac.rou	(.../cANR0.mac.rou)	(revision 29059)
+++ cANR0.mac.rou	(.../cANR0.mac.rou)	(revision 43425)
@@ -26,4 +26,3 @@
 	Q
 	;
 ZZ	; 24.02.06 -  9 u 54 * V8.06
-
Index: cANU201.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU201.mac.rou	(.../cANU201.mac.rou)	(revision 29059)
+++ cANU201.mac.rou	(.../cANU201.mac.rou)	(revision 43425)
@@ -57,4 +57,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN1011.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN1011.mac.rou	(.../cAN1011.mac.rou)	(revision 29059)
+++ cAN1011.mac.rou	(.../cAN1011.mac.rou)	(revision 43425)
@@ -195,4 +195,3 @@
 INDZ	Q
 	;
 ZZ	; 29.08.07 - 10 u 22 * V8.09
-
Index: cANU204.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU204.mac.rou	(.../cANU204.mac.rou)	(revision 29059)
+++ cANU204.mac.rou	(.../cANU204.mac.rou)	(revision 43425)
@@ -78,4 +78,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 19.03.07 - 15 u 31 * V8.08
-
Index: cANU22.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU22.mac.rou	(.../cANU22.mac.rou)	(revision 29059)
+++ cANU22.mac.rou	(.../cANU22.mac.rou)	(revision 43425)
@@ -135,4 +135,3 @@
 S2Z	Q
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN2301.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN2301.mac.rou	(.../cAN2301.mac.rou)	(revision 29059)
+++ cAN2301.mac.rou	(.../cAN2301.mac.rou)	(revision 43425)
@@ -99,4 +99,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN207.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN207.mac.rou	(.../cAN207.mac.rou)	(revision 29059)
+++ cAN207.mac.rou	(.../cAN207.mac.rou)	(revision 43425)
@@ -62,4 +62,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cANU107.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU107.mac.rou	(.../cANU107.mac.rou)	(revision 29059)
+++ cANU107.mac.rou	(.../cANU107.mac.rou)	(revision 43425)
@@ -26,4 +26,3 @@
 	;
 Z	X ^cZ Q
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN208.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN208.mac.rou	(.../cAN208.mac.rou)	(revision 29059)
+++ cAN208.mac.rou	(.../cAN208.mac.rou)	(revision 43425)
@@ -71,4 +71,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN605.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN605.mac.rou	(.../cAN605.mac.rou)	(revision 29059)
+++ cAN605.mac.rou	(.../cAN605.mac.rou)	(revision 43425)
@@ -27,4 +27,3 @@
 YZ	K %S1,%LNMAX B 1 Q
 	;
 ZZ	; 30.03.01 - 13 u 39 * V7.85
-
Index: cAN003.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN003.mac.rou	(.../cAN003.mac.rou)	(revision 29059)
+++ cAN003.mac.rou	(.../cAN003.mac.rou)	(revision 43425)
@@ -159,4 +159,3 @@
 	;
 Z	X ^cZ Q
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN200.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN200.mac.rou	(.../cAN200.mac.rou)	(revision 29059)
+++ cAN200.mac.rou	(.../cAN200.mac.rou)	(revision 43425)
@@ -99,4 +99,3 @@
 YZ	Q
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cANU110.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU110.mac.rou	(.../cANU110.mac.rou)	(revision 29059)
+++ cANU110.mac.rou	(.../cANU110.mac.rou)	(revision 43425)
@@ -123,4 +123,3 @@
 YZ	Q
 	;
 ZZ	; 19.03.07 - 15 u 31 * V8.08
-
Index: cANU100.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU100.mac.rou	(.../cANU100.mac.rou)	(revision 29059)
+++ cANU100.mac.rou	(.../cANU100.mac.rou)	(revision 43425)
@@ -45,4 +45,3 @@
 E1	D ER^cAN000($P($T(@("T2"_QT)),U,2)) G YZ
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN0091.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN0091.mac.rou	(.../cAN0091.mac.rou)	(revision 29059)
+++ cAN0091.mac.rou	(.../cAN0091.mac.rou)	(revision 43425)
@@ -67,4 +67,3 @@
 	Q
 	;
 ZZ	; 29.10.02 - 11 u 38 * V7.93
-
Index: cAN2221.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN2221.mac.rou	(.../cAN2221.mac.rou)	(revision 29059)
+++ cAN2221.mac.rou	(.../cAN2221.mac.rou)	(revision 43425)
@@ -67,4 +67,3 @@
 UPDATEZ	Q
 	;
 ZZ	; 10.12.01 - 10 u 49 * V7.9
-
Index: cAN222.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN222.mac.rou	(.../cAN222.mac.rou)	(revision 29059)
+++ cAN222.mac.rou	(.../cAN222.mac.rou)	(revision 43425)
@@ -67,4 +67,3 @@
 DMAZ	Q
 	;
 ZZ	; 23.06.05 - 17 u 03 * V8.04
-
Index: cAN004.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN004.mac.rou	(.../cAN004.mac.rou)	(revision 29059)
+++ cAN004.mac.rou	(.../cAN004.mac.rou)	(revision 43425)
@@ -56,4 +56,3 @@
 	;
 Z	X ^cZ Q
 ZZ	; 24.02.06 -  9 u 54 * V8.06
-
Index: cANCJOB.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANCJOB.mac.rou	(.../cANCJOB.mac.rou)	(revision 29059)
+++ cANCJOB.mac.rou	(.../cANCJOB.mac.rou)	(revision 43425)
@@ -276,4 +276,3 @@
 	;   
 ZZ	; 15.12.05 - 12 u 16 * V8.05
 	
-
Index: cANU101.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU101.mac.rou	(.../cANU101.mac.rou)	(revision 29059)
+++ cANU101.mac.rou	(.../cANU101.mac.rou)	(revision 43425)
@@ -57,4 +57,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 04.04.05 - 14 u 29 * V8.03
-
Index: cANT79.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANT79.mac.rou	(.../cANT79.mac.rou)	(revision 29059)
+++ cANT79.mac.rou	(.../cANT79.mac.rou)	(revision 43425)
@@ -120,4 +120,3 @@
 YZ	K R,R1,R2,R3,R4,RJ1,RS0,RS1,RS2,RS3,RS4,RS5 Q
 	;
 ZZ	; 29.08.07 - 10 u 22 * V8.09
-
Index: cANU206.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU206.mac.rou	(.../cANU206.mac.rou)	(revision 29059)
+++ cANU206.mac.rou	(.../cANU206.mac.rou)	(revision 43425)
@@ -40,4 +40,3 @@
 	;
 Z	X ^cZ Q
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN206.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN206.mac.rou	(.../cAN206.mac.rou)	(revision 29059)
+++ cAN206.mac.rou	(.../cAN206.mac.rou)	(revision 43425)
@@ -94,4 +94,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 19.03.07 - 15 u 31 * V8.08
-
Index: cAN008.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN008.mac.rou	(.../cAN008.mac.rou)	(revision 29059)
+++ cAN008.mac.rou	(.../cAN008.mac.rou)	(revision 43425)
@@ -242,4 +242,3 @@
 PARBATCHZ	Q
 	;
 ZZ	; 19.03.07 - 15 u 31 * V8.08
-
Index: cANU205.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU205.mac.rou	(.../cANU205.mac.rou)	(revision 29059)
+++ cANU205.mac.rou	(.../cANU205.mac.rou)	(revision 43425)
@@ -105,4 +105,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 19.03.07 - 15 u 31 * V8.08
-
Index: cANLOCKC.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANLOCKC.mac.rou	(.../cANLOCKC.mac.rou)	(revision 29059)
+++ cANLOCKC.mac.rou	(.../cANLOCKC.mac.rou)	(revision 43425)
@@ -83,4 +83,3 @@
 MESSZ	Q R
 	;
 ZZ	; 19.03.07 - 15 u 31 * V8.08
-
Index: cANU302.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU302.mac.rou	(.../cANU302.mac.rou)	(revision 29059)
+++ cANU302.mac.rou	(.../cANU302.mac.rou)	(revision 43425)
@@ -56,4 +56,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cANR21.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANR21.mac.rou	(.../cANR21.mac.rou)	(revision 29059)
+++ cANR21.mac.rou	(.../cANR21.mac.rou)	(revision 43425)
@@ -155,4 +155,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q
 	;
 ZZ	; 24.02.06 -  9 u 54 * V8.06
-
Index: cANU104.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU104.mac.rou	(.../cANU104.mac.rou)	(revision 29059)
+++ cANU104.mac.rou	(.../cANU104.mac.rou)	(revision 43425)
@@ -64,4 +64,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cANU31.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU31.mac.rou	(.../cANU31.mac.rou)	(revision 29059)
+++ cANU31.mac.rou	(.../cANU31.mac.rou)	(revision 43425)
@@ -53,4 +53,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cANCLCK.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANCLCK.mac.rou	(.../cANCLCK.mac.rou)	(revision 29059)
+++ cANCLCK.mac.rou	(.../cANCLCK.mac.rou)	(revision 43425)
@@ -103,4 +103,3 @@
 	;
 ZZ	; 19.03.07 - 15 u 31 * V8.08
 	        
-
Index: cAN002.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN002.mac.rou	(.../cAN002.mac.rou)	(revision 29059)
+++ cAN002.mac.rou	(.../cAN002.mac.rou)	(revision 43425)
@@ -122,4 +122,3 @@
 S3Z	Q
 	;
 ZZ	; 24.02.06 -  9 u 54 * V8.06
-
Index: cAN209.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN209.mac.rou	(.../cAN209.mac.rou)	(revision 29059)
+++ cAN209.mac.rou	(.../cAN209.mac.rou)	(revision 43425)
@@ -94,4 +94,3 @@
 S3Z	Q
 	;
 ZZ	; 04.04.05 - 14 u 29 * V8.03
-
Index: cANU303.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU303.mac.rou	(.../cANU303.mac.rou)	(revision 29059)
+++ cANU303.mac.rou	(.../cANU303.mac.rou)	(revision 43425)
@@ -61,4 +61,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cANTIT.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANTIT.mac.rou	(.../cANTIT.mac.rou)	(revision 29059)
+++ cANTIT.mac.rou	(.../cANTIT.mac.rou)	(revision 43425)
@@ -46,4 +46,3 @@
 YZ	Q
 	;
 ZZ	; 29.10.02 - 11 u 38 * V7.93
-
Index: cAN1031.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN1031.mac.rou	(.../cAN1031.mac.rou)	(revision 29059)
+++ cAN1031.mac.rou	(.../cAN1031.mac.rou)	(revision 43425)
@@ -112,4 +112,3 @@
 BEL	W $C(7) Q     
 	;
 ZZ	; 29.10.02 - 11 u 38 * V7.93
-
Index: cANU12.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU12.mac.rou	(.../cANU12.mac.rou)	(revision 29059)
+++ cANU12.mac.rou	(.../cANU12.mac.rou)	(revision 43425)
@@ -111,4 +111,3 @@
 C1Z	W !?2,$P($T(@("T3"_QT)),U,4) Q
 	;
 ZZ	; 04.11.04 - 10 u 11 * V8.02
-
Index: cANU202.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU202.mac.rou	(.../cANU202.mac.rou)	(revision 29059)
+++ cANU202.mac.rou	(.../cANU202.mac.rou)	(revision 43425)
@@ -52,4 +52,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN325.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN325.mac.rou	(.../cAN325.mac.rou)	(revision 29059)
+++ cAN325.mac.rou	(.../cAN325.mac.rou)	(revision 43425)
@@ -148,4 +148,3 @@
 DESCRZ	Q R
 	;
 ZZ	; 18.05.04 - 15 u 48 * V8
-
Index: cAN0081.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN0081.mac.rou	(.../cAN0081.mac.rou)	(revision 29059)
+++ cAN0081.mac.rou	(.../cAN0081.mac.rou)	(revision 43425)
@@ -227,4 +227,3 @@
 OREFZ	Q oREF
 	;
 ZZ	; 29.08.07 - 10 u 22 * V8.09
-
Index: cANLOG.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANLOG.mac.rou	(.../cANLOG.mac.rou)	(revision 29059)
+++ cANLOG.mac.rou	(.../cANLOG.mac.rou)	(revision 43425)
@@ -76,4 +76,3 @@
 	D OPB(T,+$G(PRI)) Q
 	;----------------------------------------------------------------------
 ZZ	; 07.02.02 - 11 u 22 * V7.91
-
Index: cANU301.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU301.mac.rou	(.../cANU301.mac.rou)	(revision 29059)
+++ cANU301.mac.rou	(.../cANU301.mac.rou)	(revision 43425)
@@ -57,4 +57,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN322.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN322.mac.rou	(.../cAN322.mac.rou)	(revision 29059)
+++ cAN322.mac.rou	(.../cAN322.mac.rou)	(revision 43425)
@@ -323,4 +323,3 @@
 DQZ	Q X
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN220.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN220.mac.rou	(.../cAN220.mac.rou)	(revision 29059)
+++ cAN220.mac.rou	(.../cAN220.mac.rou)	(revision 43425)
@@ -78,4 +78,3 @@
 YZ	S K="-" Q
 	;
 ZZ	; 23.06.05 - 17 u 03 * V8.04
-
Index: cANU30.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU30.mac.rou	(.../cANU30.mac.rou)	(revision 29059)
+++ cANU30.mac.rou	(.../cANU30.mac.rou)	(revision 43425)
@@ -41,4 +41,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN2205.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN2205.mac.rou	(.../cAN2205.mac.rou)	(revision 29059)
+++ cAN2205.mac.rou	(.../cAN2205.mac.rou)	(revision 43425)
@@ -52,4 +52,3 @@
 EZ	S K="-" Q
 	;
 ZZ	; 25.04.06 - 15 u 44 * V8.07
-
Index: cANR20.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANR20.mac.rou	(.../cANR20.mac.rou)	(revision 29059)
+++ cANR20.mac.rou	(.../cANR20.mac.rou)	(revision 43425)
@@ -336,4 +336,3 @@
 VRAAGZ	Q
 	;
 ZZ	; 19.03.07 - 15 u 31 * V8.08
-
Index: cAN2201.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN2201.mac.rou	(.../cAN2201.mac.rou)	(revision 29059)
+++ cAN2201.mac.rou	(.../cAN2201.mac.rou)	(revision 43425)
@@ -64,4 +64,3 @@
 YZ	L -@UREF Q
 	;
 ZZ	; 07.11.01 -  9 u 36 * V7.89
-
Index: cAN324.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN324.mac.rou	(.../cAN324.mac.rou)	(revision 29059)
+++ cAN324.mac.rou	(.../cAN324.mac.rou)	(revision 43425)
@@ -64,4 +64,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN2279.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN2279.mac.rou	(.../cAN2279.mac.rou)	(revision 29059)
+++ cAN2279.mac.rou	(.../cAN2279.mac.rou)	(revision 43425)
@@ -101,4 +101,3 @@
 MUNTZ	Q
 	;
 ZZ	; 19.03.07 - 15 u 31 * V8.08
-
Index: cAN009.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN009.mac.rou	(.../cAN009.mac.rou)	(revision 29059)
+++ cAN009.mac.rou	(.../cAN009.mac.rou)	(revision 43425)
@@ -198,4 +198,3 @@
 PRINTZ	Q
 	;
 ZZ	; 15.04.03 -  9 u 31 * V7.94
-
Index: cANU102.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU102.mac.rou	(.../cANU102.mac.rou)	(revision 29059)
+++ cANU102.mac.rou	(.../cANU102.mac.rou)	(revision 43425)
@@ -72,4 +72,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cANLOCK.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANLOCK.mac.rou	(.../cANLOCK.mac.rou)	(revision 29059)
+++ cANLOCK.mac.rou	(.../cANLOCK.mac.rou)	(revision 43425)
@@ -102,4 +102,3 @@
 	Q
 	;
 ZZ	; 19.03.07 - 15 u 31 * V8.08
-
Index: cAN205.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN205.mac.rou	(.../cAN205.mac.rou)	(revision 29059)
+++ cAN205.mac.rou	(.../cAN205.mac.rou)	(revision 43425)
@@ -107,4 +107,3 @@
 	;
 Z	X ^cZ Q
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN213.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN213.mac.rou	(.../cAN213.mac.rou)	(revision 29059)
+++ cAN213.mac.rou	(.../cAN213.mac.rou)	(revision 43425)
@@ -36,4 +36,3 @@
 YZ	Q
 	;
 ZZ	; 07.11.01 -  9 u 36 * V7.89
-
Index: cAN1010.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN1010.mac.rou	(.../cAN1010.mac.rou)	(revision 29059)
+++ cAN1010.mac.rou	(.../cAN1010.mac.rou)	(revision 43425)
@@ -138,4 +138,3 @@
 BEL	W $C(7) Q     
 	;
 ZZ	; 29.08.07 - 10 u 22 * V8.09
-
Index: cAN221.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN221.mac.rou	(.../cAN221.mac.rou)	(revision 29059)
+++ cAN221.mac.rou	(.../cAN221.mac.rou)	(revision 43425)
@@ -89,4 +89,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cANU304.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU304.mac.rou	(.../cANU304.mac.rou)	(revision 29059)
+++ cANU304.mac.rou	(.../cANU304.mac.rou)	(revision 43425)
@@ -74,4 +74,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cANU111.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU111.mac.rou	(.../cANU111.mac.rou)	(revision 29059)
+++ cANU111.mac.rou	(.../cANU111.mac.rou)	(revision 43425)
@@ -34,4 +34,3 @@
 YZ	Q
 	;
 ZZ	; 25.04.06 - 15 u 44 * V8.07
-
Index: cANU400.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU400.mac.rou	(.../cANU400.mac.rou)	(revision 29059)
+++ cANU400.mac.rou	(.../cANU400.mac.rou)	(revision 43425)
@@ -35,4 +35,3 @@
 YZ	Q
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN006.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN006.mac.rou	(.../cAN006.mac.rou)	(revision 29059)
+++ cAN006.mac.rou	(.../cAN006.mac.rou)	(revision 43425)
@@ -89,4 +89,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cANU21.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU21.mac.rou	(.../cANU21.mac.rou)	(revision 29059)
+++ cANU21.mac.rou	(.../cANU21.mac.rou)	(revision 43425)
@@ -85,4 +85,3 @@
 INTZ	Q
 	;
 ZZ	; 24.02.06 -  9 u 54 * V8.06
-
Index: cANU203.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU203.mac.rou	(.../cANU203.mac.rou)	(revision 29059)
+++ cANU203.mac.rou	(.../cANU203.mac.rou)	(revision 43425)
@@ -62,4 +62,3 @@
 	;
 Z	X ^cZ Q
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN101.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN101.mac.rou	(.../cAN101.mac.rou)	(revision 29059)
+++ cAN101.mac.rou	(.../cAN101.mac.rou)	(revision 43425)
@@ -152,4 +152,3 @@
 	Q
 	;
 ZZ	; 29.08.07 - 10 u 22 * V8.09
-
Index: cANU11.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU11.mac.rou	(.../cANU11.mac.rou)	(revision 29059)
+++ cANU11.mac.rou	(.../cANU11.mac.rou)	(revision 43425)
@@ -75,4 +75,3 @@
 INTZ	Q
 	;
 ZZ	; 04.11.04 - 10 u 11 * V8.02
-
Index: cANFAX1.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANFAX1.mac.rou	(.../cANFAX1.mac.rou)	(revision 29059)
+++ cANFAX1.mac.rou	(.../cANFAX1.mac.rou)	(revision 43425)
@@ -64,4 +64,3 @@
 	Q
 	;
 ZZ	; 30.03.01 - 13 u 39 * V7.85
-
Index: cANU108.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU108.mac.rou	(.../cANU108.mac.rou)	(revision 29059)
+++ cANU108.mac.rou	(.../cANU108.mac.rou)	(revision 43425)
@@ -87,4 +87,3 @@
 	;
 Z	X ^cZ Q
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN226.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN226.mac.rou	(.../cAN226.mac.rou)	(revision 29059)
+++ cAN226.mac.rou	(.../cAN226.mac.rou)	(revision 43425)
@@ -52,4 +52,3 @@
 PROPRIVZ	Q PRIO
 	;
 ZZ	; 07.02.02 - 11 u 22 * V7.91
-
Index: cAN106.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN106.mac.rou	(.../cAN106.mac.rou)	(revision 29059)
+++ cAN106.mac.rou	(.../cAN106.mac.rou)	(revision 43425)
@@ -109,4 +109,3 @@
 YZ	S @OUT=K Q
 	;
 ZZ	; 04.11.04 - 10 u 11 * V8.02
-
Index: cANU207.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU207.mac.rou	(.../cANU207.mac.rou)	(revision 29059)
+++ cANU207.mac.rou	(.../cANU207.mac.rou)	(revision 43425)
@@ -61,4 +61,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN225.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN225.mac.rou	(.../cAN225.mac.rou)	(revision 29059)
+++ cAN225.mac.rou	(.../cAN225.mac.rou)	(revision 43425)
@@ -127,4 +127,3 @@
 USRWZ	Q
 	;
 ZZ	; 29.10.02 - 11 u 38 * V7.93
-
Index: cANEM1.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANEM1.mac.rou	(.../cANEM1.mac.rou)	(revision 29059)
+++ cANEM1.mac.rou	(.../cANEM1.mac.rou)	(revision 43425)
@@ -294,4 +294,3 @@
 	Q
 	;
 ZZ	; 24.02.06 -  9 u 54 * V8.06
-
Index: cANU300.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU300.mac.rou	(.../cANU300.mac.rou)	(revision 29059)
+++ cANU300.mac.rou	(.../cANU300.mac.rou)	(revision 43425)
@@ -45,4 +45,3 @@
 E1	D ER^cAN000($P($T(@("T2"_QT)),U,2)) G YZ
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cANU106.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU106.mac.rou	(.../cANU106.mac.rou)	(revision 29059)
+++ cANU106.mac.rou	(.../cANU106.mac.rou)	(revision 43425)
@@ -60,4 +60,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cANU103.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU103.mac.rou	(.../cANU103.mac.rou)	(revision 29059)
+++ cANU103.mac.rou	(.../cANU103.mac.rou)	(revision 43425)
@@ -62,4 +62,3 @@
 	;
 Z	X ^cZ Q
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cANU305.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU305.mac.rou	(.../cANU305.mac.rou)	(revision 29059)
+++ cANU305.mac.rou	(.../cANU305.mac.rou)	(revision 43425)
@@ -100,4 +100,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 23.06.05 - 17 u 03 * V8.04
-
Index: cANU105.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU105.mac.rou	(.../cANU105.mac.rou)	(revision 29059)
+++ cANU105.mac.rou	(.../cANU105.mac.rou)	(revision 43425)
@@ -106,4 +106,3 @@
 	;
 Z	X ^cZ Q
 ZZ	; 23.06.05 - 17 u 03 * V8.04
-
Index: cANT25.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANT25.mac.rou	(.../cANT25.mac.rou)	(revision 29059)
+++ cANT25.mac.rou	(.../cANT25.mac.rou)	(revision 43425)
@@ -8,7 +8,21 @@
 1 N R S K=0 I $L($G(J1)),$D(R1),$D(R2),$D(R3),$D(@("^"_Q_R3_"(J1,0)")) D S1
 11 G Y
  ;
-S1 N RS5,RS6 F R=1:1:$L(R2,D) S RS5=$P(R2,D,R)-1 S:$L(RS5)=1 RS5="0"_RS5 S BP=(DJ-R1)_"."_RS5,RS6=$$BJ^cAFE1(Q,BP),K=K+$$CBEDR^cAFE1(Q,RS6,$P($G(@("^"_Q_R3_"(J1,(DJ-R1+.11))")),D,$P(R2,D,R)))
+S1  N RS5,RS6 
+	F R=1:1:$L(R2,D) Do
+	. S RS5=$P(R2,D,R)-1 
+	. S:$L(RS5)=1 RS5="0"_RS5 
+	. S BP=(DJ-R1)_"."_RS5
+	. S RS6=$$BJ^cAFE1(Q,BP)
+	. If R3="KL" Do ; statistiek
+	. . New KLNr,Maand
+	. . S KLNr=$P(^KKL(J1,0),"\",1)
+	. . S Maand=(DJ-R1)_"."_$E(100+$P(R2,D,R)-1,2,3)_" "
+	. . S K=K+$P($G(^KSTKL(KLNr,0,Maand)),"\",3)
+	. . ;w " "_KLNr," ",Maand," r2",R2," rs6",RS6," dj",DJ," som",(DJ-R1+.11)," ^p",$P(R2,D,R), " k",K r k
+	. Else  Do ; boekhouding
+	. . S K=K+$$CBEDR^cAFE1(Q,RS6,$P($G(@("^"_Q_R3_"(J1,(DJ-R1+.11))")),D,$P(R2,D,R))) 
+
 S1Z Q
  ;
  ; per boekjaar
Index: cANU20.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU20.mac.rou	(.../cANU20.mac.rou)	(revision 29059)
+++ cANU20.mac.rou	(.../cANU20.mac.rou)	(revision 43425)
@@ -41,4 +41,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cANU210.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU210.mac.rou	(.../cANU210.mac.rou)	(revision 29059)
+++ cANU210.mac.rou	(.../cANU210.mac.rou)	(revision 43425)
@@ -175,4 +175,3 @@
 SUBTOTZ	K TZT M TZT=MEM Q
 	;
 ZZ	; 04.04.05 - 14 u 29 * V8.03
-
Index: cAN2222.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN2222.mac.rou	(.../cAN2222.mac.rou)	(revision 29059)
+++ cAN2222.mac.rou	(.../cAN2222.mac.rou)	(revision 43425)
@@ -142,4 +142,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 18.05.04 - 15 u 48 * V8
-
Index: cAN2132.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN2132.mac.rou	(.../cAN2132.mac.rou)	(revision 29059)
+++ cAN2132.mac.rou	(.../cAN2132.mac.rou)	(revision 43425)
@@ -68,4 +68,3 @@
 YZ	Q
 	;
 ZZ	; 04.04.05 - 14 u 29 * V8.03
-
Index: cANU10.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cANU10.mac.rou	(.../cANU10.mac.rou)	(revision 29059)
+++ cANU10.mac.rou	(.../cANU10.mac.rou)	(revision 43425)
@@ -56,4 +56,3 @@
 R0	S $P(R,D,12)=$T(+0) D ^cAN1000 Q  ; v12 23.01.95
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-
Index: cAN3223.mac.rou
===================================================================
diff -u -r29059 -r43425
--- cAN3223.mac.rou	(.../cAN3223.mac.rou)	(revision 29059)
+++ cAN3223.mac.rou	(.../cAN3223.mac.rou)	(revision 43425)
@@ -62,4 +62,3 @@
 YZ	Q
 	;
 ZZ	; 22.06.04 - 16 u 32 * V8
-