source: FOIAVistA/tag/r/IFCAP-PRC-PRX--PRCA--PRCN/PRCOSRV9.m@ 736

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

initial load of FOIAVistA 6/30/08 version

File size: 391 bytes
Line 
1PRCOSRV9 ;WISC/DJM-Special Transaction Interface ;8/22/94 1:37 PM
2V ;;5.1;IFCAP;;Oct 20, 2000
3 ;Per VHA Directive 10-93-142, this routine should not be modified.
4START ;This routine will delete the following transactions coming from ISMS
5 ;from file 423.6.
6 ;
7 ; IFC-834 IFC-839 IFC-840 IFC-841 IFC-836 IFC-843
8 ; IFC-844 IFC-845
9 ;
10 N DA,DIK
11 S DIK="^PRCF(423.6,",DA=PRCDA D ^DIK
12 Q
Note: See TracBrowser for help on using the repository browser.