source:
FOIAVistA/trunk/r/SPINAL_CORD_DYSFUNCTION-SPN/SPNPRI21.m@
711
| Last change on this file since 711 was 628, checked in by , 15 years ago | |
|---|---|
| File size: 222 bytes | |
| Line | |
|---|---|
| 1 | SPNPRI21 ;SD/CM- Pre init action for patch 21; 8-20-2003 |
| 2 | ;;2.0;Spinal Cord Dysfunction;**21**;01/02/1997 |
| 3 | EN ; |
| 4 | S DA="" |
| 5 | S DA=$O(^SPNL(154.92,"B","OUTCOMES",DA)) |
| 6 | I DA="" K DA Q |
| 7 | S DIK="^SPNL(154.92," |
| 8 | D ^DIK |
| 9 | K DA,DIK |
| 10 | Q |
Note:
See TracBrowser
for help on using the repository browser.
