STANDARD DATA DICTIONARY #46.12 -- RAI MDS WARD TRANSLATION FILE 3/24/25 PAGE 1 STORED IN ^DGRU(46.12, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.3) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- DD ACCESS: @ RD ACCESS: WR ACCESS: DEL ACCESS: LAYGO ACCESS: AUDIT ACCESS: @ CROSS REFERENCED BY: COTS WARD NAME(AC), VISTA WARD NAME(B) 46.12,.01 VISTA WARD NAME 0;1 POINTER TO WARD LOCATION FILE (#42) (Required) INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,16)=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: DEC 21, 1999 DESCRIPTION: The name of the Vista Ward Location which requires translation to a different name on the Accu-Max system. The name must be a ward name already in the Vista Ward Location file (#42). TECHNICAL DESCR: Pointer to the Ward Location file which requires translation on Accu-Max system because the name exceeds 15 characters. SCREEN: S DIC("S")="I $P(^(0),U,16)=1" EXPLANATION: Only allow selection of wards flagged as RAI/MDS wards CROSS-REFERENCE: 46.12^B 1)= S ^DGRU(46.12,"B",$E(X,1,30),DA)="" 2)= K ^DGRU(46.12,"B",$E(X,1,30),DA) 46.12,.02 COTS WARD NAME 0;2 FREE TEXT (Required) INPUT TRANSFORM: K:$L(X)>15!($L(X)<2) X LAST EDITED: FEB 11, 2000 HELP-PROMPT: Answer must be 2-15 characters in length. DESCRIPTION: The name of the ward on the Accu-Max system which represents the Vista ward selected. TECHNICAL DESCR: Free text field 2 - 15 characters. CROSS-REFERENCE: 46.12^AC 1)= S ^DGRU(46.12,"AC",$E(X,1,30),DA)="" 2)= K ^DGRU(46.12,"AC",$E(X,1,30),DA) This cross reference is for looking up the VistA ward location from the translated ward location. FILES POINTED TO FIELDS WARD LOCATION (#42) VISTA WARD NAME (#.01) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):