AEFINIT5 ; ; 27-FEB-2004
;;1.0;ANNETEST;;FEB 27, 2004
K ^UTILITY("DIF",$J) S DIFRDIFI=1 F I=1:1:2 S ^UTILITY("DIF",$J,DIFRDIFI)=$T(IXF+I),DIFRDIFI=DIFRDIFI+1
Q
IXF ;;
;;1991212I;AEF EMPLOYEE;^DIZ(1991212,;0;y;n;;n;;;y;o;n
;;