source:
WorldVistAEHR/trunk/r/KERNEL-XU-A4A7-USC-XG-XLF-XNOA-XPD-XQ-XVIR-ZI-ZOSF-ZOSV-ZT-ZU-%Z-XIP--XQAB--XUC--XUR--ZIN--ZTED/XPDINIT5.m@
1582
Last change on this file since 1582 was 613, checked in by , 15 years ago | |
---|---|
File size: 260 bytes |
Rev | Line | |
---|---|---|
[613] | 1 | XPDINIT5 ; ; 03-JUL-1995 |
2 | ;;8.0;KERNEL;;JUL 10, 1995 | |
3 | K ^UTILITY("DIF",$J) S DIFRDIFI=1 F I=1:1:4 S ^UTILITY("DIF",$J,DIFRDIFI)=$T(IXF+I),DIFRDIFI=DIFRDIFI+1 | |
4 | Q | |
5 | IXF ;;KIDS^XPD | |
6 | ;;9.6I;BUILD;^XPD(9.6,;0;y;y;;n;;;n | |
7 | ;; | |
8 | ;;9.7I;INSTALL;^XPD(9.7,;0;y;y;;n;;;n | |
9 | ;; |
Note:
See TracBrowser
for help on using the repository browser.