+---------------------------------------------------------------+ | | | 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.
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.631,"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
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.
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.
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.
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.