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 |