|
XPDINIT5 ; ; 03-JUL-1995
|
|
;;8.0;KERNEL;;JUL 10, 1995
|
|
K ^UTILITY("DIF",$J) S DIFRDIFI=1 F I=1:1:4 S ^UTILITY("DIF",$J,DIFRDIFI)=$T(IXF+I),DIFRDIFI=DIFRDIFI+1
|
|
Q
|
|
IXF ;;KIDS^XPD
|
|
;;9.6I;BUILD;^XPD(9.6,;0;y;y;;n;;;n
|
|
;;
|
|
;;9.7I;INSTALL;^XPD(9.7,;0;y;y;;n;;;n
|
|
;;
|