--- freem_fileman/USER/DIK.m	2025/04/28 14:13:20	1.1
+++ freem_fileman/USER/DIK.m	2025/04/28 19:23:48	1.2
@@ -29,8 +29,7 @@ INX	I %["TRIGGER" S %=^(X),^UTILITY("DIK
 A	F DV=0:0 S DV=$O(^DD(DH,"AUDIT",DV)) Q:DV'>0  D A1
 	Q
 A1	D 0 S ^UTILITY("DIK",DIKJ,DH,DV,99)="S DIIX="_(4-X)_" D:$G(DIK(0))'[""A"" AUDIT" Q
-0	;
-	S DW=$P(^DD(DH,DV,0),U,4),^UTILITY("DIK",DIKJ,DH,DV)=$P(DW,";",1),DW=$P(DW,";",2)
+0       S DW=$P(^DD(DH,DV,0),U,4),^UTILITY("DIK",DIKJ,DH,DV)=$P(DW,";",1),DW=$P(DW,";",2)
 	S ^UTILITY("DIK",DIKJ,DH,DV,0)=$S(DW:"S X=$P(^(X),U,"_DW_")",1:"S X=$E(^(X),"_+$E(DW,2,9)_","_$P(DW,",",2)_")"),DW=0 Q
 	;
 IX	;
@@ -43,7 +42,7 @@ IX1	;
 	S X=1 D DD,1^DIK1 G Q
 	;
 IXALL	;
-	N DIKJ,DIKS,DIKZ1,DIN,DH,DU,DV,DW,DIKDA
+	N DIKJ,DIKS,DIKZ1,DIN,DH,DU,DV,DW,DIKDA        
 	D CHKS I $D(DIKZ1) N DIKSAT S DIKSAT=1,DA=0 G @DIKGP
 	S (DA,DCNT)=0,X=1 D DD,CNT^DIK1 G Q
 	;