source: FOIAVistA/trunk/r/GENERIC_CODE_SHEET-GEC/GECSA.m@ 847

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

initial load of FOIAVistA 6/30/08 version

File size: 193 bytes
Line 
1GECSA ;WISC/RFJ-old version 1.5 routine ;01 Nov 93
2 ;;2.0;GCS;;MAR 14, 1995
3 Q
4EN1 ; create a code sheet
5 D ^GECSEDIT Q
6KEY ; keypunch a code sheet
7 D KEY^GECSEDIT Q
Note: See TracBrowser for help on using the repository browser.