source:
FOIAVistA/trunk/r/GENERIC_CODE_SHEET-GEC/GECSA.m@
1203
| Last change on this file since 1203 was 628, checked in by , 15 years ago | |
|---|---|
| File size: 193 bytes | |
| Line | |
|---|---|
| 1 | GECSA ;WISC/RFJ-old version 1.5 routine ;01 Nov 93 |
| 2 | ;;2.0;GCS;;MAR 14, 1995 |
| 3 | Q |
| 4 | EN1 ; create a code sheet |
| 5 | D ^GECSEDIT Q |
| 6 | KEY ; keypunch a code sheet |
| 7 | D KEY^GECSEDIT Q |
Note:
See TracBrowser
for help on using the repository browser.
