- DG53216P ;ALB/JDS POST INIT FOR DG*5.3*216
- ;;5.3;Registration;**216,1015**;Aug 13, 1993;Build 21
- S ^DD(35.2,.01,"DEL",1,0)="I $G(DGEDMODE) W *7,!,""Cannot Delete in this Mode"""
- DG53216P ;ALB/JDS POST INIT FOR DG*5.3*216
- +1 ;;5.3;Registration;**216,1015**;Aug 13, 1993;Build 21
- +2 SET ^DD(35.2,.01,"DEL",1,0)="I $G(DGEDMODE) W *7,!,""Cannot Delete in this Mode"""