STANDARD DATA DICTIONARY #68.2 -- LOAD/WORK LIST FILE 3/24/25 PAGE 1
STORED IN ^LRO(68.2, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.2)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
DEFINES THE LOAD/WORK LIST TO BE MADE FROM THE ACCESSION LIST The ^LRO(68.2,LRINST,10,LRPROF,1,"AO",TEST) = ORDER X-ref is setup by
BUILD^LRLLP4 and holds the order to print the tests on the load/work list.
POINTED TO BY: LOAD/WORK LIST field (#3) of the AUTO INSTRUMENT File (#62.4)
CROSS
REFERENCED BY: NAME(B)
INDEXED BY: AUTO RELEASE (AR)
68.2,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<2) X
LAST EDITED: DEC 13, 1991
HELP-PROMPT: Answer must be 2-30 characters in length.
DESCRIPTION:
Name of the load or work list.
CROSS-REFERENCE: 68.2^B
1)= S ^LRO(68.2,"B",$E(X,1,30),DA)=""
2)= K ^LRO(68.2,"B",$E(X,1,30),DA)
68.2,.02 LOAD TRANSFORM 0;2 POINTER TO EXECUTE CODE FILE (#62.07)
INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,3)[""L""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: MAR 30, 1984
DESCRIPTION: This entry controls the algorithm for placing work on the list. Inquire to the EXECUTE CODES file
(Loadlist types) for specifics. Leave this blank unless you want more sophisticated placement.
SCREEN: S DIC("S")="I $P(^(0),U,3)[""L"""
EXPLANATION: EXECUTE CODES APPROPRIATE FOR LOAD TRANSFORM
68.2,.03 TYPE 0;3 SET (Required)
'0' FOR SEQUENCE/BATCH;
'1' FOR TRAY,CUP;
'2' FOR POINT OF CARE;
LAST EDITED: OCT 04, 2001
DESCRIPTION: Determines if this list is a sequence/batch, tray,cup or Point of Care (POC) type of load/work
list.
TECHNICAL DESCR: Point of Care (POC) is a type of interface that downloads and stores results for a bed side
analyzer (device) ie. Glucometers
Accession and verification procedures are modified to accommodate POC type of data storage. POC
results are not verified in the classical laboratory method.
68.2,.04 CUPS PER TRAY 0;4 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: AUG 25, 1984
HELP-PROMPT: Enter the number of samples on a tray or rack (0 if not a tray instrument)
DESCRIPTION:
Contains number of cups per tray if a tray,cup type.
68.2,.05 FULL TRAY'S ONLY 0;5 SET (Required)
'0' FOR NO;
'1' FOR YES;
LAST EDITED: APR 02, 1984
HELP-PROMPT: ANSWER YES IF YOU WANT ONLY FULL TRAY'S PUT ON THE LIST
DESCRIPTION:
If you want to accept full trays only set this field to YES.
68.2,.06 EXPAND PANELS ON PRINT 0;6 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: APR 04, 1984
HELP-PROMPT: ANSWER YES IF YOU WANT ALL TEST PANELS ENPANDED WHEN PRINTED.
DESCRIPTION:
If you want test panels expanded to display all tests when printed, this field must contain YES.
68.2,.07 INITIAL SETUP 0;7 POINTER TO EXECUTE CODE FILE (#62.07)
INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,3)[""L""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: SEP 10, 1984
DESCRIPTION: This code would be used each time a load or work list is built for the first time after it has been
"cleared". "Special" initialization may be customized through the EXECUTE CODE chosen.
SCREEN: S DIC("S")="I $P(^(0),U,3)[""L"""
EXPLANATION: EXECUTE CODES APPROPRIATE FOR INITIAL SETUP
68.2,.08 VERIFY BY 0;8 SET
'A' FOR ACCESSION;
'M' FOR MACHINE SEQUENCE;
'T' FOR TRAY;
'W' FOR WORKLIST;
LAST EDITED: AUG 22, 1984
HELP-PROMPT: This entry will force the way this Load/Work list works.
DESCRIPTION:
Determines the method of verification for this list.
68.2,.09 SUPPRESS SEQUENCE # 0;9 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: NOV 30, 1993
DESCRIPTION:
"YES" will suppress the sequence # listing.
68.2,.1 INCLUDE UNCOLLECTED ACCESSIONS 0;10 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: JAN 04, 1985
HELP-PROMPT: A 'YES' IN THIS FIELD WILL INCLUDE ALL ACCESSION THAT HAVE TESTS FOR THE PROFILE.
DESCRIPTION: This field is used to tell the load list routine whether to include (if set to YES) ALL accessions
that have the tests in the profile, or (if set to NO) only accessions that have ARRIVED in the lab.
68.2,.11 SHORT TEST LIST 0;11 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: JUL 22, 1985
HELP-PROMPT: Enter YES if you want a short list of the tests.
DESCRIPTION:
If this field contains "YES" a short test list will be generated.
68.2,.12 AUTO MICRO EDIT TEMPLATE 0;13 POINTER TO EXECUTE CODE FILE (#62.07)
INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,3)=""E""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: JUN 05, 1989
HELP-PROMPT: Enter the execute code to be used when verifying Auto Micro results
DESCRIPTION:
Select Execute Code to be associated with this Load/worklist.
SCREEN: S DIC("S")="I $P(^(0),U,3)=""E"""
EXPLANATION: SELECT ONLY EDIT TYPE TEMPLATES
68.2,.14 WKLD METHOD SUF;1 POINTER TO WKLD SUFFIX CODES FILE (#64.2)
LAST EDITED: SEP 18, 2001
DESCRIPTION: This field will be used as default response when setting up WKLD code during verification. This
field updated after the technologist confirm the method for this particular verification session.
The name and suffix number are automatically stuff for the user.
CROSS-REFERENCE: ^^TRIGGER^68.2^.15
1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^LRO(68.2,D0,"SUF")):^("SUF"),1:"") S X=$P(Y(1),U,2)
,X=X S DIU=X K Y X ^DD(68.2,.14,1,1,1.1) S DIH=$G(^LRO(68.2,DIV(0),"SUF")),DIV=X S $P(^("SUF"),U,2)
=DIV,DIH=68.2,DIG=.15 D ^DICR
1.1)= S X=DIV S I(0,0)=$G(D0),D0=DIV S:'D0!'$D(^LAB(64.2,+D0,0)) D0=-1 S Y(101)=$S($D(^LAB(64.2,D0,
0)):^(0),1:"") S X=$P(Y(101),U,1) S D0=I(0,0)
2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^LRO(68.2,D0,"SUF")):^("SUF"),1:"") S X=$P(Y(1),U,2)
,X=X S DIU=X K Y S X="" S DIH=$G(^LRO(68.2,DIV(0),"SUF")),DIV=X S $P(^("SUF"),U,2)=DIV,DIH=68.2,DIG
=.15 D ^DICR
3)= Sets the WKLD CODE SUFFIX NAME into .15
CREATE VALUE)= WKLD METHOD:NAME
DELETE VALUE)= @
FIELD)= WKLD CODE METHOD NAME
This trigger will stuff the WKLD CODE SUFFIX name (.01) into field #.15.
CROSS-REFERENCE: ^^TRIGGER^68.2^.16
1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^LRO(68.2,D0,"SUF")):^("SUF"),1:"") S X=$P(Y(1),U,3)
,X=X S DIU=X K Y X ^DD(68.2,.14,1,2,1.1) S DIH=$G(^LRO(68.2,DIV(0),"SUF")),DIV=X S $P(^("SUF"),U,3)
=DIV,DIH=68.2,DIG=.16 D ^DICR
1.1)= S X=DIV S I(0,0)=$G(D0),D0=DIV S:'D0!'$D(^LAB(64.2,+D0,0)) D0=-1 S Y(101)=$S($D(^LAB(64.2,D0,
0)):^(0),1:"") S X=$P(Y(101),U,2) S D0=I(0,0)
2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^LRO(68.2,D0,"SUF")):^("SUF"),1:"") S X=$P(Y(1),U,3)
,X=X S DIU=X K Y S X="" S DIH=$G(^LRO(68.2,DIV(0),"SUF")),DIV=X S $P(^("SUF"),U,3)=DIV,DIH=68.2,DIG
=.16 D ^DICR
3)= Sets the WKLD CODE SUFFIX number into .16
CREATE VALUE)= WKLD METHOD:WKLD SUFFIX CODE
DELETE VALUE)= @
FIELD)= WKLD CODE SUFFIX
This trigger will stuff the WKLD CODE SUFFIX number into field # .16.
68.2,.15 WKLD CODE METHOD NAME SUF;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>40!($L(X)<1) X
LAST EDITED: DEC 21, 1990
HELP-PROMPT: Answer must be 1-40 characters in length.
DESCRIPTION: The field should contain the subsection which should receive credit for workload any time a user
selects this worklist.
WRITE AUTHORITY: ^
NOTES: TRIGGERED by the WKLD METHOD field of the LOAD/WORK LIST File
68.2,.16 WKLD CODE SUFFIX SUF;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>5!($L(X)<4) X
LAST EDITED: JUL 07, 1992
HELP-PROMPT: Answer must be 4 characters in length.
DESCRIPTION: This field indicates what is the standard default method used by this particular LOAD/WORK LIST.
This suffix is appended to prefix or procedure wkld code for each test verified.
WRITE AUTHORITY: ^
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
TRIGGERED by the WKLD METHOD field of the LOAD/WORK LIST File
68.2,1 MAJOR ACCESSION AREA SUF;7 POINTER TO ACCESSION FILE (#68)
LAST EDITED: DEC 27, 1990
DESCRIPTION: This field contains the major accession area which should recieve the workload credit. Anytime a
user selects this worklist the entry will be used to tally workload.
NOTE: THIS FIELD IS ASSOCIATED WITH WORKLOAD.
68.2,1.5 LAB SUBSECTION SUF;8 POINTER TO ACCESSION FILE (#68)
LAST EDITED: DEC 27, 1990
DESCRIPTION: This is the next level down from the Major Accession area. An example might be, chemistry is the
major accession area and Sp chemistry would be the lab subsection.
68.2,1.7 WORK AREA SUF;9 POINTER TO ACCESSION FILE (#68)
INPUT TRANSFORM: S DIC("S")="I $L($P(^(0),U,17))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: FEB 20, 1991
DESCRIPTION: This is the lowest level of work distribution. Generally this would indicate the work bench where
the work is to be done. An example might be Chemistry (major accession area), Sp Chemistry (lab sub
section) and Drug screens (work area).
Note: The default for, major accession area, lab sub section and work area is the entry above it.
The order is as follows:
Major accession area Default is the accession area of the test.
Lab Subsection Default is the Major accession area.
Work Area Default is the Lab Subsection.
If none of these fields are filled in, then the default answer for all is the accession area of
the test. This means the reports will not be broken down into separate areas for any management
reports.
SCREEN: S DIC("S")="I $L($P(^(0),U,17))"
EXPLANATION: Select only accession area identified as work areas.
68.2,2 RUN or TRAY NUMBER 1;0 Multiple #68.21
DESCRIPTION:
All data in this multiple field is computer generated.
WRITE AUTHORITY: ^
68.21,.01 RUN or TRAY NUMBER 0;1 NUMBER
TRAY
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X S:$D(X) DINUM=X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 99
DESCRIPTION:
Cannot be altered except by programmer.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
68.21,2 DATE 0;2 DATE
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
DESCRIPTION:
The date part of the run number.
68.21,3 TECH. 0;3 POINTER TO NEW PERSON FILE (#200) (Required)
INPUT TRANSFORM: S DIC("S")="I $D(^XUSEC(""LRLAB"",Y))" D ^DIC S DIC=$G(DIE),X=+Y K:Y<0 X
LAST EDITED: SEP 23, 2004
DESCRIPTION:
Points to the USER file that have the 'LRLAB' security key assigned.
SCREEN: S DIC("S")="I $D(^XUSEC(""LRLAB"",Y))"
EXPLANATION: ONLY USER GROUP LAB
68.21,4 ACCESSION AREA 0;4 POINTER TO ACCESSION FILE (#68) (Required)
INPUT TRANSFORM: S DIC("S")="I '$L($P(^(0),U,17))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: JAN 06, 1992
SCREEN: S DIC("S")="I '$L($P(^(0),U,17))"
EXPLANATION: You can not select an accession area designated Work Area.
68.21,10 SEQUENCE or CUP NUMBER 1;0 POINTER Multiple #68.22 (Add New Entry without Asking)
DESCRIPTION:
Where the data is stored in the LAH global.
68.22,.01 ACCESSION AREA 0;1 POINTER TO ACCESSION FILE (#68) (Multiply asked)
INPUT TRANSFORM: S DIC("S")="I '$L($P(^(0),U,17))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: JAN 06, 1992
DESCRIPTION:
The pointer to the accession area.
SCREEN: S DIC("S")="I '$L($P(^(0),U,17))"
EXPLANATION: You can not select an accession area designated Work Area.
68.22,1 ACCESSION DATE 0;2 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X
LAST EDITED: JAN 29, 1984
DESCRIPTION:
The date part of the accession.
68.22,2 ACCESSION ENTRY 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: JAN 29, 1984
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 999999
DESCRIPTION:
The numeric part of the accession.
68.22,3 PROFILE 0;4 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<.01)!(X?.E1"."1N.N) X
LAST EDITED: JUL 14, 1987
HELP-PROMPT: Enter the profile number used to build this cup.
68.22,4 SPECIMEN 0;5 POINTER TO TOPOGRAPHY FIELD FILE (#61)
LAST EDITED: AUG 12, 1987
HELP-PROMPT: Used by the download program.
68.22,5 TEST or PANEL NUMBER 3;0 Multiple #68.225 (Add New Entry without Asking)
DESCRIPTION: This field let the tech select the test/panel number to be sent to the MicroScan. The number
entered is from the table I or the MicroScan
documentation. To be easier to use this this should be come a pointer to a file that contains
the code to send.
68.225,.01 TEST or PANEL NUMBER 0;1 NUMBER (Multiply asked)
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAR 23, 1989
HELP-PROMPT: Enter the Test/Panel number of the test to be done.
68.225,1 ISOLATE 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAR 23, 1989
HELP-PROMPT: Enter a ISOLATE number or leave blank
DESCRIPTION: This is the ISOLATE number of the test to be run. If the number is not known or might
conflict with anoter isolate number for this accession, then leave blank and the MicroScan
will assign one.
68.22,9 TESTS 1;0 POINTER Multiple #68.222 (Add New Entry without Asking)
68.222,.01 TESTS 0;1 POINTER TO LABORATORY TEST FILE (#60)
INPUT TRANSFORM: S DINUM=X
LAST EDITED: JUL 14, 1987
HELP-PROMPT: These are the tests to run on this cup.
UNEDITABLE
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
68.222,.02 URGENCY OF TEST 0;2 POINTER TO URGENCY FILE (#62.05)
LAST EDITED: JUL 14, 1987
68.22,21 DOWNLOAD RECORD 2;E1,250 FREE TEXT
INPUT TRANSFORM: K:$L(X)>250!($L(X)<1) X
LAST EDITED: AUG 06, 1987
HELP-PROMPT: ANSWER MUST BE 1-250 CHARACTERS IN LENGTH
DESCRIPTION: This will hold the record to be sent for a download of the test requests awaiting protocol
conversion.
68.21,21 DOWNLOAD PARAMETERS 2;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>200!($L(X)<1) X
LAST EDITED: AUG 12, 1987
HELP-PROMPT: This is loaded by the download build routine.
68.2,11 DATE OF SETUP 2;1 DATE
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: JUL 20, 1984
DESCRIPTION:
The date the load/work list was created is stored here.
68.2,12 FIRST TRAY 2;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: JUL 20, 1984
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 999
DESCRIPTION:
The first tray built on the last "build" is stored here.
68.2,13 STARTING CUP 2;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAR 30, 1984
HELP-PROMPT: THIS IS THE STARTING CUP FOR THE LAST RUN
DESCRIPTION:
The starting cup (or sequence number) on the last "build" is stored here.
68.2,14 LAST TRAY 2;4 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: THIS IS THE STARTING CUP FOR THE LAST RUN
DESCRIPTION:
The last tray built on the last "build" is stored here.
68.2,15 LAST CUP 2;5 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: JUL 20, 1984
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 9999
DESCRIPTION:
The last cup (or sequence number) on the last "build" is stored here.
68.2,30 BUILDING IN PROGRESS 3;1 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: APR 10, 1985
HELP-PROMPT: THIS FIELD SHOULD NOT BE EDITED WHEN CREATING A NEW LOAD LIST.
DESCRIPTION: While the load list is being built, the program sets this flag to YES. At the completion of
building, this flag is returned to NO. The purpose is to keep multiple users from competing for
the same load list at the same time. If the flag is left set, set to NO to continue building load
lists.
68.2,50 PROFILE 10;0 Multiple #68.23
DESCRIPTION: Only ONE load or work list can exist at a time. But more than one profile can be defined to make
"alternate" groupings of tests for the load/worklist which might be used on an infrequent or
non-standard basis.
IDENTIFIED BY: ACCESSION AREA(#2)[R]
INDEXED BY: AUTO RELEASE (AR)
68.23,.01 PROFILE 0;1 FREE TEXT (Multiply asked)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<1) X
LAST EDITED: JAN 29, 1984
HELP-PROMPT: ANSWER MUST BE 1-30 CHARACTERS IN LENGTH
DESCRIPTION: Only ONE load or work list can exist at a time. But more than one profile can be defined to make
"alternate" groupings of tests for the load/worklist which might be used on an infrequent or
non-standard basis.
CROSS-REFERENCE: 68.23^B
1)= S ^LRO(68.2,DA(1),10,"B",$E(X,1,30),DA)=""
2)= K ^LRO(68.2,DA(1),10,"B",$E(X,1,30),DA)
68.23,1 TEST 1;0 POINTER Multiple #68.24 (Add New Entry without Asking)
DESCRIPTION:
These are the tests to be brought onto the load/work list from the accessions.
68.24,.01 TEST 0;1 POINTER TO LABORATORY TEST FILE (#60) (Multiply asked)
LAST EDITED: OCT 02, 1986
DESCRIPTION:
These are the tests to be brought onto the load/work list from the accessions.
CROSS-REFERENCE: 68.24^B
1)= S ^LRO(68.2,DA(2),10,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^LRO(68.2,DA(2),10,DA(1),1,"B",$E(X,1,30),DA)
CROSS-REFERENCE: ^^TRIGGER^68.24^2
1)= K DIV S DIV=X,D0=DA(2),DIV(0)=D0,D1=DA(1),DIV(1)=D1,D2=DA,DIV(2)=D2 S Y(1)=$S($D(^LRO(68.2,D0,1
0,D1,1,D2,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X=DIV S X="1" X ^DD(68.24,.01,1,2,1.4)
1.3)= K DIV S DIV=X,D0=DA(2),DIV(0)=D0,D1=DA(1),DIV(1)=D1,D2=DA,DIV(2)=D2
1.4)= S DIH=$S($D(^LRO(68.2,DIV(0),10,DIV(1),1,DIV(2),0)):^(0),1:""),DIV=X X "F %=0:0 Q:$L($P(DIH,U
,2,99)) S DIH=DIH_U" S %=$P(DIH,U,4,999),DIU=$P(DIH,U,3),^(0)=$P(DIH,U,1,2)_U_DIV_$S(%]"":U_%,1:""
),DIH=68.24,DIG=2 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
2)= K DIV S DIV=X,D0=DA(2),DIV(0)=D0,D1=DA(1),DIV(1)=D1,D2=DA,DIV(2)=D2 S Y(1)=$S($D(^LRO(68.2,D0,1
0,D1,1,D2,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X="" X ^DD(68.24,.01,1,2,2.4)
2.4)= S DIH=$S($D(^LRO(68.2,DIV(0),10,DIV(1),1,DIV(2),0)):^(0),1:""),DIV=X X "F %=0:0 Q:$L($P(DIH,U
,2,99)) S DIH=DIH_U" S %=$P(DIH,U,4,999),DIU=$P(DIH,U,3),^(0)=$P(DIH,U,1,2)_U_DIV_$S(%]"":U_%,1:""
),DIH=68.24,DIG=2 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
CREATE VALUE)= "1"
DELETE VALUE)= @
FIELD)= BUILD
CROSS-REFERENCE:68.24^AO^MUMPS
1)= S LRINST=DA(2),LRPROF=DA(1) D BUILD^LRLLP4
2)= K ^LRO(68.2,DA(2),10,DA(1),1,"AO")
3)= This X-ref is built by BUILD^LRLLP4 if it doesn't exist. It is the expansion of all panels in t
his profile.
68.24,1 SPECIMEN 0;2 POINTER TO TOPOGRAPHY FIELD FILE (#61)
LAST EDITED: APR 02, 1984
DESCRIPTION: This field should have data if the test previously defined is to be included from a given accession
only if the site/specimen defined matches with this entry.
68.24,2 BUILD NAME ONLY 0;3 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: JAN 17, 1986
DESCRIPTION: If the test previously defined is not the/a panel to define the workpattern, this entry should be
"yes". The panel from file 60 defines the order of the workpattern, if more than one panel is NOT
a "Build Name Only", the workpattern will be scrambled if the tests in the panels have some of the
same tests. A "yes" means the test name is to be used solely for purposes of identifying the
test(s) to be brought from an accession to the load/work list.
I.E.: If "Yes", don't use this entry to define the order of display.
NOTES: TRIGGERED by the TEST field of the TEST sub-field of the PROFILE sub-field of the LOAD/WORK LIST
File
CROSS-REFERENCE:68.24^AC^MUMPS
1)= K ^LRO(68.2,DA(2),10,DA(1),1,"AO") ;D BUILD^LRLLP4
2)= K ^LRO(68.2,DA(2),10,DA(1),1,"AO")
68.24,3 POC WKLD METHOD 0;4 POINTER TO WKLD SUFFIX CODES FILE (#64.2)
LAST EDITED: AUG 17, 2004
HELP-PROMPT: Enter the workload method suffix to be associated with this POC test.
DESCRIPTION: Designates the WKLD method suffix to be assigned to this Point of Care (POC) test results when this
test is ordered. This allows multiple POC vendor systems to be interfaced to VistA via one POC
interface and still assign the appropriate methodology to the test result.
68.24,4 POC COLLECTION SAMPLE 0;5 POINTER TO COLLECTION SAMPLE FILE (#62)
LAST EDITED: MAY 25, 2005
HELP-PROMPT: Enter the related collection sample for this test/specimen
DESCRIPTION: Allows the site to specify the collection sample to use when ordering this test and specimen
combination.
68.23,2 ACCESSION AREA 0;2 POINTER TO ACCESSION FILE (#68) (Required)
INPUT TRANSFORM:S DIC("S")="I '$L($P(^(0),U,17))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: JAN 06, 1992
DESCRIPTION:
This is the default accession area to use to build the load/work list.
SCREEN: S DIC("S")="I '$L($P(^(0),U,17))"
EXPLANATION: You can not select an accession area designated Work Area.
68.23,2.1 UID VERIFICATION 0;3 SET
'0' FOR PROFILE ACCESSION AREA ONLY;
'1' FOR ANY ACCESSION AREA;
LAST EDITED: FEB 26, 1998
HELP-PROMPT: Select how verifying by UID will select accessions.
DESCRIPTION: When verifying by Lab Universal Identifier (UID) the site can configure how accessions are
selected.
If "PROFILE ACCESSION AREA ONLY" is selected then only those UIDs which are from the accession area
designated for this profile can be selected.
If "ANY ACCESSION AREA" is selected then a UID from any accession area can be selected. Note that
an accession from a different area should have tests that would be in this editing profile.
68.23,2.2 STORE DUPLICATE COMMENTS 0;4 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: AUG 08, 2002
HELP-PROMPT: Should duplicate comments be stored with results.
DESCRIPTION: When the Laboratory result verifying software is processing comments associated with a load/work
list result, this field determines how duplicate comments are processed. If set to "NO" (default if
no value) then a comment that matches a previously stored comment will not be stored with the
result. If set to "YES" then the duplicate check is not performed and the comment is stored with
the results irregardless if the comment already exists.
Setting it to "YES" will allow the handling of multiple line comments which contain the same
comment more than once and are still clinically significant.
68.23,2.3 DEFAULT REFERENCE LABORATORY 0;5 POINTER TO INSTITUTION FILE (#4)
LAST EDITED: APR 23, 2004
HELP-PROMPT: Specify the default performing laboratory for this profile.
DESCRIPTION: The performing laboratory that is commonly associated with this profile. It will be presented as
the default performing laboratory when a user is setting up a verifying session using this profile.
68.23,2.4 AUTO RELEASE 0;6 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: NOV 13, 2015
HELP-PROMPT: Select "YES" if this profile is to be used for auto release. Enter "??" for additional help.
DESCRIPTION: If an auto release process to accept and file laboratory results from an external system using auto
verification and/or human verification is being used then this field indicates to the auto release
process which profile on this load list to use to process the lab results.
There should only be one profile per load list set to "YES".
SCREEN: S DIC("S")="I Y=0!('$D(^LRO(68.2,""AR"",1,DA(1))))!$D(^LRO(68.2,""AR"",1,DA(1),DA))"
EXPLANATION: Only one profile on this Load List can be set to YES.
FIELD INDEX: AR (#1098) REGULAR IR SORTING ONLY WHOLE FILE (#68.2)
Short Descr: Indicates which profile is used for auto release of lab results.
Description: Used to flag which profile within a given load list will be used by the lab auto release process if
lab has implemented auto release functionality in conjunction with an external auto
verification/user verification process/system.
Set Logic: S ^LRO(68.2,"AR",X,DA(1),DA)=""
Kill Logic: K ^LRO(68.2,"AR",X,DA(1),DA)
Whole Kill: K ^LRO(68.2,"AR")
X(1): AUTO RELEASE (68.23,2.4) (Subscr 1) (forwards)
FIELD INDEX: AR (#1099) REGULAR IR SORTING ONLY
Short Descr: Indicates which profile is used for auto release of lab results.
Description: Used to flag which profile within a given load list will be used by the lab auto release process if
lab has implemented auto release functionality in conjunction with an external auto
verification/user verification process/system.
Set Logic: S ^LRO(68.2,DA(1),10,"AR",X,DA)=""
Kill Logic: K ^LRO(68.2,DA(1),10,"AR",X,DA)
Whole Kill: K ^LRO(68.2,DA(1),10,"AR")
X(1): AUTO RELEASE (68.23,2.4) (Subscr 1) (forwards)
68.23,3 TRAY # FOR CONTROL 2;0 Multiple #68.25 (Add New Entry without Asking)
DESCRIPTION: Enter the tray number appropriate for the controls you will next be choosing. If this is a
worklist or sequence loadlist, the "tray" is always "1".
68.25,.01 TRAY # 0;1 NUMBER (Multiply asked)
INPUT TRANSFORM:K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X S:$D(X) DINUM=X
LAST EDITED: SEP 10, 1984
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 9999
DESCRIPTION: Enter the tray number appropriate for the controls you will next be choosing. If this is a
worklist or sequence loadlist, the "tray" is always "1".
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
68.25,10 CONTROL 1;0 POINTER Multiple #68.26 (Add New Entry without Asking)
DESCRIPTION: Identify the control appropriate for this "tray". If you need to specify more than one of the
"same" control, use quotation marks around the control name and the FileMan will allow you to add
as many as you like.
68.26,.001 CUP or SEQUENCE # NUMBER
INPUT TRANSFORM:K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAY 02, 1984
HELP-PROMPT: When the list encounters this position, the control specified goes here.
DESCRIPTION: This is the actual CUP position (if things are running by TRAY/CUP) or the SEQUENCE position
(if it's a sequence or worklist). When the Load or Work list encounters this position, the
control specified goes here.
68.26,.01 CONTROL 0;1 POINTER TO LAB CONTROL NAME FILE (#62.3) (Multiply asked)
LAST EDITED: MAY 02, 1984
DESCRIPTION: Identify the control appropriate for this "tray". If you need to specify more than one of the
"same" control, use quotation marks around the control name and the FileMan will allow you to
add as many as you like.
68.23,4 Specimen to EXCLUDE 3;0 POINTER Multiple #68.27
DESCRIPTION: If any specimens are specified here, accessions of these specimen(s) will NOT be included on
the work/load list.
68.27,.01 Specimens to EXCLUDE! 0;1 POINTER TO TOPOGRAPHY FIELD FILE (#61) (Multiply asked)
LAST EDITED: SEP 13, 1984
DESCRIPTION: If any specimens are specified here, accessions of these specimen(s) will NOT be included on
the work/load list.
68.23,5 CONTROLS TO BEGIN WORKLIST 4;0 POINTER Multiple #68.28
DESCRIPTION: This multiple has the controls that are to be placed on the worklist at the beginning of the
list.
68.28,.001 Enter the control's rank NUMBER
INPUT TRANSFORM:K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: SEP 13, 1984
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 99
DESCRIPTION: This is the order the control appears relative to any other controls at the beginning of
the work.
68.28,.01 CONTROLS TO BEGIN WORKLIST 0;1 POINTER TO LAB CONTROL NAME FILE (#62.3) (Multiply asked)
LAST EDITED: SEP 13, 1984
DESCRIPTION: This is one of the controls to be placed at the beginning of the worklist. The rank you
associate it with will determine its order relative to any other accessions at the
beginning of the worklist.
68.23,6 CONTROLS TO END WORKLIST 5;0 POINTER Multiple #68.29
DESCRIPTION: This multiple has the controls that are to be blaced on the worklist at the end of the
list.
68.29,.001 Enter the control's rank NUMBER
INPUT TRANSFORM:K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: SEP 13, 1984
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 99
DESCRIPTION: This is the order the control appears relative to any other controls at the end of the
work.
68.29,.01 CONTROLS TO END WORKLIST 0;1 POINTER TO LAB CONTROL NAME FILE (#62.3) (Multiply asked)
LAST EDITED: SEP 13, 1984
DESCRIPTION: This is one of the controls to be placed at the end of the worklist. The rank you
associate it with will determine it's order relative to any other controls at the end of
the worklist.
68.2,51 USER ACCESS AUTHORIZATION 0;12 POINTER TO SECURITY KEY FILE (#19.1)
LAST EDITED: NOV 14, 1988
DESCRIPTION: If left blank, any lab person may access this load/worklist. If filled in only lab person holding
the authorization may use this load/worklist.
68.2,52 ADDITIONAL LAB TESTS 4;0 POINTER Multiple #68.3
DESCRIPTION:
To used for any additional WKLD codes used for this particular W/L.
68.3,.01 ADDITIONAL LAB TESTS 0;1 POINTER TO LABORATORY TEST FILE (#60) (Multiply asked)
INPUT TRANSFORM: S DINUM=X
LAST EDITED: JUL 12, 1991
DESCRIPTION: If this particular load work list should have addition WKLD workload counts. Enter the test in
the Laboratory Test file (#60) which contain the verify WKLD codes (field #500). These WKLD codes
will be included with each verified test.
An example might be instrument setup for a batch instrument.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
FILES POINTED TO FIELDS
ACCESSION (#68) MAJOR ACCESSION AREA (#1)
LAB SUBSECTION (#1.5)
WORK AREA (#1.7)
RUN or TRAY NUMBER:ACCESSION AREA (#4)
SEQUENCE or CUP NUMBER:ACCESSION AREA (#.01)
PROFILE:ACCESSION AREA (#2)
COLLECTION SAMPLE (#62) TEST:POC COLLECTION SAMPLE (#4)
EXECUTE CODE (#62.07) LOAD TRANSFORM (#.02)
INITIAL SETUP (#.07)
AUTO MICRO EDIT TEMPLATE (#.12)
INSTITUTION (#4) PROFILE:DEFAULT REFERENCE LABORATORY (#2.3)
LAB CONTROL NAME (#62.3) CONTROL:CONTROL (#.01)
CONTROLS TO BEGIN WORKLIST:CONTROLS TO BEGIN WORKLIST (#.01)
CONTROLS TO END WORKLIST:CONTROLS TO END WORKLIST (#.01)
LABORATORY TEST (#60) TESTS:TESTS (#.01)
TEST:TEST (#.01)
ADDITIONAL LAB TESTS:ADDITIONAL LAB TESTS (#.01)
NEW PERSON (#200) RUN or TRAY NUMBER:TECH. (#3)
SECURITY KEY (#19.1) USER ACCESS AUTHORIZATION (#51)
TOPOGRAPHY FIELD (#61) SEQUENCE or CUP NUMBER:SPECIMEN (#4)
TEST:SPECIMEN (#1)
Specimen to EXCLUDE:Specimens to EXCLUDE! (#.01)
URGENCY (#62.05) TESTS:URGENCY OF TEST (#.02)
WKLD SUFFIX CODES (#64.2) WKLD METHOD (#.14)
TEST:POC WKLD METHOD (#3)
INPUT TEMPLATE(S):
LRLL CONTROLS SEP 13, 1984 USER #0
LRLLDFT MAY 08, 2015@14:11 USER #0
LRLLPRO JAN 30, 1985 USER #0
LRLOAD MAY 02, 1984 USER #0
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):