source: FOIAVistA/trunk/r/IFCAP-PRC-PRX--PRCA--PRCN/PRCS.m@ 1572

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

initial load of FOIAVistA 6/30/08 version

File size: 257 bytes
Line 
1PRCS ;SF-ISC/LJP-CONTROL POINT ACT. MENU VARIABLE INIT/KILL ;9-19-89/15:19
2V ;;5.1;IFCAP;;Oct 20, 2000
3 ;Per VHA Directive 10-93-142, this routine should not be modified.
4EXIT K C2,CPCK,DIC,PRC,PRCSC,PRCSIP,I,J,K,O,S,X,Y Q
5INIT2 S IOP=IO(0) D ^%ZIS K IOP Q
Note: See TracBrowser for help on using the repository browser.