source:
FOIAVistA/trunk/r/DIETETICS-FH/FHIP1.m@
884
| Last change on this file since 884 was 628, checked in by , 16 years ago | |
|---|---|
| File size: 167 bytes | |
| Line | |
|---|---|
| 1 | FHIP1 ; HISC/JH - Routine to Change ALTERNATE NAME X Ref ;5/13/97 11:44 |
| 2 | ;;5.0;Dietetics;**8**;Jun 07, 1995 |
| 3 | K ^FH(111,"B") |
| 4 | S DIK="^FH(111," D IXALL^DIK K DA,DIK |
| 5 | Q |
Note:
See TracBrowser
for help on using the repository browser.
