Print Page as PDF
'DEL' node modification ICR (1535)

'DEL' node modification    ICR (1535)

Name Value
NUMBER 1535
IA # 1535
FILE NUMBER 0
GLOBAL ROOT DD(142.1,.01,'DEL',
DATE CREATED 1996/05/17
CUSTODIAL PACKAGE VA FILEMAN
CUSTODIAL ISC San Francisco
USAGE Private
TYPE File
DBIC APPROVAL STATUS APPROVED
NAME 'DEL' node modification
GENERAL DESCRIPTION
The health summary package needs permission to change
the "DEL" node in the DD structure for file 142.1. This will be done with the
SET command and will be done with patch 7.

Here is the code to reset the "DEL" node:

S ^DD(142.1,.01,"DEL",1,0)="I $S(+$G(DUZ(2))'>0:1,DUZ(2)=5000:0,(DA'<100
001)&(DA'>9999999):0,1:1) N GMZ S GMZ=$S(+$G(DUZ(2)):""ONLY Components Created
a t your site can be deleted"",1:""DUZ(2) MUST equal your DIVISION"") D
EN^DDIOL(GMZ)"

S ^DD(142.1,.01,"DEL",2,0)="I '$D(GMCMP) D EN^DDIOL(""You may only delet e
COMPONENTS using the GMTS IRM/ADPAC COMP EDIT option."","""",""!!"")"
STATUS Active
DURATION Next Version
ID DD(142.1,.01,'DEL',
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE ISC
HEALTH SUMMARY Salt Lake City
GOOD ONLY FOR VERSION 2.7