DG53216P ;ALB/JDS POST INIT FOR DG*5.3*216
;;5.3;Registration;**216**;Aug 13, 1993
S ^DD(35.2,.01,"DEL",1,0)="I $G(DGEDMODE) W *7,!,""Cannot Delete in this Mode"""
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HDG53216P 169 printed Dec 13, 2024@02:36:42 Page 2
DG53216P ;ALB/JDS POST INIT FOR DG*5.3*216
+1 ;;5.3;Registration;**216**;Aug 13, 1993
+2 SET ^DD(35.2,.01,"DEL",1,0)="I $G(DGEDMODE) W *7,!,""Cannot Delete in this Mode"""