source: FOIAVistA/trunk/r/KERNEL-XU-A4A7-USC-XG-XLF-XNOA-XPD-XQ-XVIR-ZI-ZOSF-ZOSV-ZT-ZU-%Z-XIP--XQAB--XUC--XUR--ZIN--ZTED/XUSHSHP.m@ 1800

Last change on this file since 1800 was 628, checked in by George Lilly, 15 years ago

initial load of FOIAVistA 6/30/08 version
File size: 217 bytes
Line 
1XUSHSHP ;SF/STAFF - HASHING ROUTINE FOR SIG BLOCK IN FILE 200 ;4/24/89 15:26 ;
2 ;;8.0;KERNEL;;Jul 10, 1995
3HASH Q ; Primary entry point
4 ;;
5EN Q ; CALLED BY XUS3
6 ;;
7DE Q ; Called from XUAPURGE
8EN1 ;
9EN2 ;
10EN3 Q
Note: See TracBrowser for help on using the repository browser.