Print Page as PDF
Updating DD 'VR' Nodes ICR (5749)

Updating DD 'VR' Nodes    ICR (5749)

Name Value
NUMBER 5749
IA # 5749
GLOBAL ROOT DD(
DATE CREATED 2011/11/30
CUSTODIAL PACKAGE VA FILEMAN
USAGE Private
TYPE File
DBIC APPROVAL STATUS APPROVED
NAME Updating DD 'VR' Nodes
GLOBAL REFERENCE
  • DD(FILE,0,'VR')
  • DD(FILE,0,'VRPK')
  • DD(FILE,0,'VRRV')
STATUS Active
KEYWORDS
  • VR
  • DD
  • VRPK
  • VRRV
DURATION Till Otherwise Agreed
ID DD(
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE SUBSCRIBING DETAILS
LEXICON UTILITY
The Lexicon needs to be able to update the DD "VR"
nodes during data updates.  The Lexicon exports data in the export global
^LEXM.  This export global is created by comparing the development account
with a gold account and recording the changes in ^LEXM in the form of
executable SET and KILL statements.  Also recorded are the DD "VR  nodes.

Example of export global for patch LEX*2.0*80 for file 757.11:

^LEXM(757.11,4)=S ^DD(757.11,0,"VR")="2.0"
^LEXM(757.11,5)=S ^DD(757.11,0,"VRPK")="LEX"
^LEXM(757.11,6)=S ^DD(757.11,0,"VRRV")="80^3131001"

Example of export global for patch ICD*18.0*57 for file 80:

^LEXM(80,5391580)=S ^DD(80,0,"VR")="18.0"
^LEXM(80,5391581)=S ^DD(80,0,"VRPK")="ICD"
^LEXM(80,5391582)=S ^DD(80,0,"VRRV")="57^3131001"

Data installation is done by $ORDERing through the ^LEXM export global and
executing the MUMPS code found in the global.  When the above export global is
installed at a site, the version number for file 757.11 is updated to 80 (for
LEX*2.0*80) and given the effective date of Oct 1, 2013.  The effective date
is not the date released, it is the date that the data becomes effective, and
in this case it is the date the ICD-10 data is effective.

This activity only occurs during the post-install of an ICD, CPT or Lexicon
KIDS Installation containing data.  It is this method of exporting only the
changes in a series of SET and KILL statements that allows for the
distribution of large quantities of data without forcing users off the system.

CREATOR ROWE,KIMBALL
DATE ACTIVATED 2011/12/07
MAIL MESSAGE 55785792
DATE/TIME EDITED
DATE/TIME EDITED ACTION AT THE REQUEST OF WITH CONCURRENCE OF
2011/12/07 17:00 APPROVED ROWE,KIMBALL BEUSCHEL,GARY
Generated from JAN 24, 2019@ IA Listing Descriptions