STANDARD DATA DICTIONARY #2006.631 -- MAG RAD LISTS DEFINITION FILE 9/29/25 PAGE 1
STORED IN ^MAG(2006.631, (13 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
+---------------------------------------------------------------+
| |
| Property of the US Government. |
| No permission to copy or redistribute this software is given. |
| Use of unreleased versions of this software requires the user |
| to execute a written test agreement with the VistA Imaging |
| Development Office of the Department of Veterans Affairs, |
| telephone (301) 734-0100. |
| |
| The Food and Drug Administration classifies this software as |
| a medical device. As such, it may not be changed in any way. |
| Modifications to this software may result in an adulterated |
| medical device under 21CFR820, the use of which is considered |
| to be a violation of US Federal Statutes. |
| |
+---------------------------------------------------------------+
All exam lists are defined in this file; defines the content and format of VistARad Exam Lists.
DD ACCESS: @
RD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
IDENTIFIED BY: LIST # (#.02)[R]
CROSS
REFERENCED BY: NAME(B), LIST #(C)
LAST MODIFIED: DEC 18,2023@14:48:14
2006.631,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>75!($L(X)<3)!'(X'?1." ".E) X
MAXIMUM LENGTH: 75
LAST EDITED: JUL 10, 2019
HELP-PROMPT: Answer must be 3-75 characters in length.
CROSS-REFERENCE: 2006.631^B
1)= S ^MAG(2006.631,"B",$E(X,1,30),DA)=""
2)= K ^MAG(2006.631,"B",$E(X,1,30),DA)
2006.631,.02 LIST # 0;2 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N)!($D(^MAG(2006.631,"C",X))) X
LAST EDITED: DEC 04, 2017
HELP-PROMPT: Type an Integer between 1 and 999; the value must be unique.
DESCRIPTION: Enter a number to be used to uniquely identify this list; this number will be passed as a parameter
from the workstation to cause this list to be generated.
EXECUTABLE HELP: N T,L,C,Q S C=2,L(1)="Used values are:",(L(1,"F"),L(2,"F"))="?10",(L(2),T)="" F S T=$O(^MAG(2006.6
31,"C",T)),Q=('T!(T>8000)) S:'Q&($L(L(C))>40) C=C+1,L(C)="",L(C,"F")="!?26" S:'Q L(C)=L(C)_" "_T I
Q D EN^DDIOL(.L) Q
UNEDITABLE
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 2006.631^C
1)= S ^MAG(2006.631,"C",$E(X,1,30),DA)=""
2)= K ^MAG(2006.631,"C",$E(X,1,30),DA)
2006.631,.03 LIST TYPE 0;3 SET (Required)
'U' FOR UNREAD;
'R' FOR RECENT;
'A' FOR ALL UNREAD & RECENT;
'P' FOR PENDING;
'N' FOR Newly Interpreted;
'H' FOR History;
'I' FOR Indexed;
LAST EDITED: NOV 29, 2017
HELP-PROMPT: Enter the List Type for this list; enter ?? for more help.
DESCRIPTION: This determines what subset of the exams to display, based on the Exam Status value. Choices are:
U -- UNREAD Exams only; Exam Status Category= E(xamined)
R -- RECENT Exams; Status Categories D(ictated) & T(ranscribed)
A -- ALL Active Exams; Categories E, D, & T
P -- PENDING Exams; Category= W(aiting for Exam)
N -- Newly-Interpreted; NO Category
H -- History List; NO Category
I -- Indexed list; NO Category
List Types N, H and I are for internal use only, and are not available for defining reports.
SCREEN: S DIC("S")="I Y'=""N""&(Y'=""H"")&(Y'=""I"")"
EXPLANATION: N, H and I values are for internal use only, and have no use for defining lists.
2006.631,.04 IMAGING TYPES 0;4 SET (Required)
'ALL' FOR ALL;
LAST EDITED: FEB 26, 1999
HELP-PROMPT: Enter ALL; this field may have other values in the future.
2006.631,.05 LAST EDITED 0;5 DATE
INPUT TRANSFORM: S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
LAST EDITED: FEB 26, 1999
HELP-PROMPT: When finished all list definition changes, Enter "NOW" to log time of last edit.
DESCRIPTION:
Log of last time this report was edited.
TECHNICAL DESCR: Whenever the report definition is edited, the compile process must re-build some needed internal
data structures that support the execution of the List compile routines.
2006.631,.06 ENABLE LIST? 0;6 SET
'1' FOR Y;
'0' FOR N;
LAST EDITED: MAR 24, 1999
HELP-PROMPT: Enable this LIST only when it is ready for live use.
DESCRIPTION: Until the List definition is Enabled, it will not be available for use from the VistARad
Workstation; this allows you time to develop and/or modify list definitions without worrying about
end-users accessing a fully-defined list. Also, you can retire a list that is no longer needed by
deleting this field's answer.
2006.631,.07 BUTTON LABEL 0;7 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>15!($L(X)<3) X
LAST EDITED: JUN 30, 1999
HELP-PROMPT: Answer must be 3-15 characters in length.
2006.631,1 COLUMNS 1;0 POINTER Multiple #2006.6311 (Add New Entry without Asking)
DESCRIPTION:
Specify output columns here.
2006.6311,.01 COLUMN 0;1 POINTER TO MAG RAD LIST DATA ELEMENTS FILE (#2006.63) (Multiply asked)
LAST EDITED: MAR 02, 1999
HELP-PROMPT: Enter output columns for the list.
DESCRIPTION: This field is a pointer to MAG RAD LIST DATA ELEMENTS and specifies the display column in the
Exam Lists.
CROSS-REFERENCE: 2006.6311^B
1)= S ^MAG(2006.631,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^MAG(2006.631,DA(1),1,"B",$E(X,1,30),DA)
2006.6311,1 WIDTH 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>30)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAR 24, 1999
HELP-PROMPT: Type a Number between 0 and 30, 0 Decimal Digits
DESCRIPTION:
Output values may be truncated to the specified width, if desired.
2006.631,2 SORT 2;0 POINTER Multiple #2006.6312 (Add New Entry without Asking)
DESCRIPTION:
The sort sequence may be specified here.
2006.6312,.01 SORT 0;1 POINTER TO MAG RAD LIST DATA ELEMENTS FILE (#2006.63) (Multiply asked)
LAST EDITED: JUN 07, 1999
HELP-PROMPT: Specify the sort values, in the desired sort order.
DESCRIPTION:
The order in which fields are entered here determines the sort order.
CROSS-REFERENCE: 2006.6312^B
1)= S ^MAG(2006.631,DA(1),2,"B",$E(X,1,30),DA)=""
2)= K ^MAG(2006.631,DA(1),2,"B",$E(X,1,30),DA)
2006.6312,1 REVERSE? 0;2 SET
'1' FOR YES;
'0' FOR NO;
LAST EDITED: JUN 07, 1999
HELP-PROMPT: If a reverse sort is desired, this should be answered "Y".
DESCRIPTION: If a reverse sort is desired, this should be answered "Y"; reverse sort is only valid for
date/time and numeric-valued fields.
2006.631,200 TAG ISI;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>16!($L(X)<3)!'(X?1A1.15AN) X
MAXIMUM LENGTH: 16
LAST EDITED: OCT 31, 2022
HELP-PROMPT: Answer must be 3-16 characters in length.
DESCRIPTION: Enter the TAG to be used as the entry point for the compile routine. This is only used for List
Type "I" exam lists, and is required. Code at this routine/tag performs the compile for the list
being created.
2006.631,201 ROUTINE ISI;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>16!($L(X)<6)!'(X?1A1.15AN) X
MAXIMUM LENGTH: 16
LAST EDITED: OCT 31, 2022
HELP-PROMPT: Answer must be 6-16 characters in length.
DESCRIPTION: Enter the ROUTINE where the tag/entry-point is found. This is only used for List Type "I" exam
lists, and is required. Code at this routine/tag performs the compile for the list being created.
FILES POINTED TO FIELDS
MAG RAD LIST DATA ELEMENTS
(#2006.63) COLUMNS:COLUMN (#.01)
SORT:SORT (#.01)
INPUT TEMPLATE(S):
MAGJ LIST EDIT JUL 13, 1999@14:58 USER #0
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):