source: WorldVistAEHR/trunk/r/REGISTRATION-DGQE-DG-DPT-GRPX-VAD-VAF-VAS-VAT-VAU--VA-VIC--DGBT--DGJ--DGYA--VALM/DG53154P.m@ 1064

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

initial load of WorldVistAEHR

File size: 372 bytes
RevLine 
[613]1DG53154P ;ALB/MM - POST INSTALLATION ROUTINE FOR DG*5.3*154;11/25/97
2 ;;5.3;Registration;**154**;Aug 13 1993
3 ;
4EN ;
5 ;Check for ^DD(45.52) Edit Clerk multiple
6 I $D(^DD(45.52)) D Q
7 .K ^DD(45.52)
8 .D BMES^XPDUTL(">>Edit Clerk multiple (#45.52) found. Data dictionary nodes deleted.")
9 .Q
10 D BMES^XPDUTL(">>Edit Clerk multiple (#45.52) not found. Nothing deleted.")
11 Q
Note: See TracBrowser for help on using the repository browser.