LR7OR2 ;DALOI/dcm - Get Lab results (cont.) ; 3/29/19 8:12am
Source file <LR7OR2.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Lab Service | 2 | LR7OB63 LR7OR1 |
Text Integration Utility | 2 | TIULO TIULO1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
CH(SDATE,EDATE,TEST,COUNT,SPEC,UNVER) | ;Get CH subscript data
|
|
SETTST(ISUB,ZERO) | ;Set test data in ^TMP
; ISUB= test subscript ; ZERO= 0th node at ^LR(LRDFN,"CH",IVDT,TST) |
|
NOTE(LRDFN,IVDT) | ;Get comments
|
|
TEST(Y,DFN,ORD,SDATE,EDATE,SUB,TEST,FLAG,COUNT) | ;Test network calls
; Called from TIU ; COUNT = count of results to send, results with the same date/time count as 1 |
|
T60(Y,IFN) | ;Get tests from file 60
; If IFN is not passed then the whole file is sent. |
|
T64(Y,IFN) | ;Get tests from file 64
; If IFN is not passed then the whole file is sent, if entry has a link to file 60 |
|
ORD(LRDFN,IVDT) | ;Get order # for entry in file 63
; LRDFN=Lab Patient # ; IVDT=Inverse Date/time in 63 (^LR(LRDFN,"CH",IVDT)) |
|
ORDP(LRPROV) | ; Display ordering provider in comment
|
|
RRDT(LRDT) | ; Display report released date/time
|
|
PLS | ; List reporting and performing laboratories
; If multiple performing labs then list tests associated with each lab. |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LAB(60 - [#60] | CH+6, SETTST+4, SETTST+5, SETTST+7, SETTST+15, SETTST+19, T60+3, T60+4, T64+3, T64+4 |
^LAM - [#64] | SETTST+7, T64+3, T64+4 |
^LAM("B" | T64+4 |
^LR - [#63] | CH+10, CH+11, CH+12, CH+16, CH+17, CH+22, NOTE+3, ORD+5, PLS+9 |
^LRO(68 - [#68] | ORD+6, ORD+7, ORD+8 |
^TMP( | CH+4!, CH+28! |
^TMP("LRAPI" | TEST+9*, TEST+10 |
^TMP("LRORID" | CH+4, CH+28 |
^TMP("LRPLS" | SETTST+19*, PLS+16, PLS+17, PLS+19, PLS+23, PLS+34! |
^TMP("LRRR" | CH+18, SETTST+16, SETTST+18*, NOTE+3*, TEST+6, TEST+8, TEST+9, ORDP+3, ORDP+4*, RRDT+4 , RRDT+5*, PLS+5, PLS+12*, PLS+13*, PLS+14*, PLS+20*, PLS+25*, PLS+27*, PLS+29*, PLS+30* , PLS+32* |
Name | Line Occurrences |
---|---|
$$ORD | CH+12 |
NOTE | CH+18 |
ORDP | CH+22 |
PLS | CH+26 |
RRDT | CH+24 |
SETTST | CH+16, CH+17 |
Name | Field # of Occurrence |
---|---|
^( | CH+16, CH+17, NOTE+3 |
^(0 | CH+6, SETTST+7 |
^(64 | SETTST+7 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AC | ORD+4~, ORD+7*, ORD+8 |
ACD | ORD+4~, ORD+7*, ORD+8 |
ACN | ORD+4~, ORD+7*, ORD+8 |
CNT | ORDP+1~, ORDP+3*, ORDP+4, RRDT+1~, RRDT+4*, RRDT+5*, PLS+3~, PLS+5*, PLS+12*, PLS+13* , PLS+14*, PLS+20*, PLS+25*, PLS+27*, PLS+29*, PLS+30*, PLS+32 |
COUNT | CH~, CH+2, CH+11, TEST~, TEST+5, TEST+7* |
>> CT1 | CH+2, CH+11, CH+20* |
CTR | TEST+3~, TEST+7*, TEST+9*, T60+2~*, T60+4*, T64+2~*, T64+4* |
DFN | CH+18, SETTST+16, SETTST+18, NOTE+3, TEST~, TEST+4, TEST+5, TEST+8, TEST+9, ORDP+3 , ORDP+4, RRDT+4, RRDT+5, PLS+5, PLS+12, PLS+13, PLS+14, PLS+20, PLS+25, PLS+27 , PLS+29, PLS+30, PLS+32 |
EDATE | CH~, CH+2, CH+11, TEST~, TEST+5 |
FLAG | TEST~, TEST+5 |
GOTIT | CH+3~, CH+13*, CH+19, SETTST+20* |
I | CH+3~, CH+4*, CH+28* |
IFN | NOTE+1~, NOTE+2*, NOTE+3*, T60~, T60+3, T60+4*, T64~, T64+3, T64+4* |
IST | CH+3~, CH+17* |
ISUB | SETTST~, SETTST+4, SETTST+9, SETTST+15 |
ITST | CH+3~, CH+16* |
IVDT | CH+3~, CH+10*, CH+11*, CH+12, CH+16, CH+17, CH+18, CH+22, SETTST+9, SETTST+16 , SETTST+18, NOTE~, NOTE+3, TEST+3~, TEST+8*, TEST+9, ORD~, ORD+3, ORD+5, ORDP+3 , ORDP+4, RRDT+4, RRDT+5, PLS+5, PLS+9, PLS+12, PLS+13, PLS+14, PLS+20, PLS+25 , PLS+27, PLS+29, PLS+30, PLS+32 |
LINE | PLS+3~, PLS+11*, PLS+13, PLS+14, PLS+22*, PLS+25*, PLS+26*, PLS+27, PLS+28*, PLS+29 , PLS+30 |
LLEN | PLS+3~, PLS+22*, PLS+25*, PLS+26* |
LRDFN | CH+10, CH+11, CH+12, CH+16, CH+17, CH+18, CH+22, SETTST+9, NOTE~, NOTE+3 , ORD~, ORD+3, ORD+5, PLS+9 |
LRDT | RRDT~, RRDT+2 |
LRPLS | PLS+3~, PLS+18*, PLS+19*, PLS+23, PLS+28 |
LRPROV | ORDP~, ORDP+2 |
LRX | SETTST+3~, SETTST+9*, SETTST+10, SETTST+11, SETTST+19, PLS+3~, PLS+9*, PLS+10, PLS+11 |
LRY | ORDP+1~, ORDP+2*, ORDP+4, RRDT+1~, RRDT+2*, RRDT+3*, RRDT+5 |
MPLS | PLS+3~, PLS+16*, PLS+17*, PLS+21 |
>> NAME | T60+4*, T64+4* |
ORD | CH+3~, CH+12*, SETTST+18, TEST~, TEST+5 |
PLS | PLS+3~, PLS+16*, PLS+17 |
PORDER | SETTST+3~, SETTST+15*, SETTST+16*, SETTST+18 |
SDATE | CH~, CH+2, CH+10, TEST~, TEST+5 |
SEQ | TEST+3~, TEST+8*, TEST+9 |
SPEC | CH~, CH+15 |
SSUB | TEST+3~, TEST+7*, TEST+8*, TEST+9 |
SUB | TEST~, TEST+5 |
TEST | CH~, CH+6, CH+7, CH+8, TEST~, TEST+5 |
TESTNAME | PLS+3~, PLS+22*, PLS+23*, PLS+24, PLS+26 |
TSTY | CH+3~, CH+16 |
TSTY( | CH+7*, CH+17 |
UNVER | CH~, CH+14 |
X | CH+3~, CH+6*, CH+7, CH+8, CH+16*, CH+17*, SETTST+3~, SETTST+4*, NOTE+3*, ORD+4~ , ORD+6*, ORD+7, ORD+8*, ORD+9, PLS+3~, PLS+24*, PLS+25, PLS+26 |
X0 | CH+3~, CH+12*, CH+24, ORD+4~, ORD+5*, ORD+7 |
X6 | ORD+4~, ORD+5*, ORD+6, ORD+7 |
Y | SETTST+3~, TEST~, TEST+10*, T60~, T64~ |
Y( | T60+4*, T64+4* |
Y(1 | TEST+6*, T60+3*, T64+3* |
Y1 | SETTST+3~, SETTST+4*, SETTST+5, SETTST+7, SETTST+9, SETTST+12, SETTST+15, SETTST+18, SETTST+19 |
Y10 | SETTST+3~, SETTST+6*, SETTST+7*, SETTST+18 |
Y11 | SETTST+3~, SETTST+6*, SETTST+7*, SETTST+18 |
Y12 | CH+3~, CH+12*, SETTST+18 |
Y14 | SETTST+3~, SETTST+6*, SETTST+11*, SETTST+18 |
>> Y15 | SETTST+5*, SETTST+18 |
Y16 | CH+3~, CH+12*, SETTST+18 |
Y19 | CH+3~, CH+12*, CH+15, SETTST+18 |
Y2 | SETTST+3~, SETTST+4*, SETTST+10*, SETTST+12*, SETTST+18 |
Y3 | SETTST+3~, SETTST+4*, SETTST+10*, SETTST+18 |
Y4 | SETTST+3~, SETTST+10*, SETTST+18 |
Y5 | SETTST+3~, SETTST+10*, SETTST+18 |
Y6 | CH+3~, CH+12*, CH+14, SETTST+18 |
Y9 | SETTST+3~, SETTST+6*, SETTST+7*, SETTST+18 |
ZERO | SETTST~, SETTST+4 |