source: FOIAVistA/tag/r/REGISTRATION-DGQE-DG-DPT-GRPX-VAD-VAF-VAS-VAT-VAU--VA-VIC--DGBT--DGJ--DGYA--VALM/DGYQPRE.m@ 1569

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

initial load of FOIAVistA 6/30/08 version

File size: 304 bytes
Line 
1DGYQPRE ;AISC/TET - PRE INIT TO PATCH DG*5.3*41
2 ;;5.3;Registration;**41**;Aug 13, 1993
3PRE ;pre init after committment
4 ;delete field in multiple of file 2 (Patient), field 1000 (disp log enter/edit), subfile 2.101, field 3 (facility applying to)
5 S DIK="^DD(2.101,",DA=3,DA(1)=2.101 D ^DIK
6 K DA,DIK Q
Note: See TracBrowser for help on using the repository browser.