Print Page as PDF
SETTING DD NODES ICR (1941)

SETTING DD NODES    ICR (1941)

Name Value
NUMBER 1941
IA # 1941
FILE NUMBER 1
GLOBAL ROOT DD(
DATE CREATED 1997/02/21
CUSTODIAL PACKAGE VA FILEMAN
CUSTODIAL ISC San Francisco
USAGE Private
TYPE File
DBIC APPROVAL STATUS APPROVED
NAME SETTING DD NODES
GENERAL DESCRIPTION
This integration agreement is for a one time use for
AICS v3.0 to set the following three DD nodes.  These nodes point to the
Expressions file (757.01) which has changed global locations in Lexicon
Utility v2.0 from ^GMP to ^LEX.  Approximately half of VAMC's have installed
Lexicon Utility v2.0.  The setting of these nodes will set the Data
Dictionaries to the correct global location for the version of Lexicon
Utility.

I $D(^LEX) D
.S ^DD(357.3,2.02,0)="CLINICAL LEXICON ENTRY^P757.01'^LEX(757.01,^2;2^Q"
.S ^DD(358.3,2.02,0)="CLINICAL LEXICON ENTRY^P757.01'^LEX(757.01,^2;2^Q"
.S ^DD(357.951,2.02,0)="CLINICAL LEXICON^P757.01'^LEX(757.01,^2;2^Q"
.D MES^XPDUTL(">>> AICS Data Dictionaries updated to use Lexicon Utility
version 2.0")
E D MES^XPDUTL(">>> AICS Data Dictionaries updated to use Clinical Lexicon
Utility version 1.0")
GLOBAL REFERENCE
GLOBAL REFERENCE FIELD NUMBER
DD(357.3,2.02,0)
FIELD NUMBER ACCESS
ALL Direct Global Write & w/Fileman
DD(358.3,2.02,0)
FIELD NUMBER ACCESS
ALL Direct Global Write & w/Fileman
DD(357.951,2.02,0)
FIELD NUMBER ACCESS
ALL Direct Global Write & w/Fileman
STATUS Active
DURATION Next Version
ID DD(
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE ISC
AUTOMATED INFO COLLECTION SYS Washington/Silver Spring
GOOD ONLY FOR VERSION AICS V3.0