source:
WorldVistAEHR/trunk/r/SPINAL_CORD_DYSFUNCTION-SPN/SPNLGUCD.m@
1087
Last change on this file since 1087 was 613, checked in by , 15 years ago | |
---|---|
File size: 269 bytes |
Line | |
---|---|
1 | SPNLGUCD ;ISCSF/RWF - SCD Patient hashing ;07/08/94 10:17 |
2 | ;;2.0;Spinal Cord Dysfunction;;01/02/1997 |
3 | Q |
4 | EN(X) ;EF. |
5 | N X1,X2,PA,PI,PJ,PL,PR,PX,PY,PY1,PZ |
6 | S X1=37,X2=13 |
7 | D EN^XUSHSHP |
8 | Q X |
9 | DE(X) ;EF. |
10 | N X1,X2,PA,PI,PJ,PL,PR,PX,PY,PY1,PZ |
11 | S X1=37,X2=13 |
12 | D DE^XUSHSHP |
13 | Q X |
Note:
See TracBrowser
for help on using the repository browser.