LR7OSUM ;DALOI/STAFF - Silent Patient cum ;11/19/09 18:15
Source file <LR7OSUM.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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
DFN | ||
LRLLOC | ;
|
|
END | ; Cleanup variables
|
|
EN(Y,DFN,SDATE,EDATE,COUNT,LRGIOM,SUBHEAD) | ; Enter here to get silent lab results
; Results in "CH" subscript are stored in the Cumulative format ; Headers for each format are found in ^TMP("LRH",$J,name)=ln count ; Index for where tests are found in ^TMP("LRT",$J,print name)=header^line # of1st occurance. Entries without a header means that the test exists in the report, but no result. ; Formatted reports are found in ^TMP("LRC",$J,ifn) ; DFN = Patient ; SDATE = Start date to search for results (optional) ; EDATE = End date to search for results (optional) ; COUNT = Count of results to send (optional) ; LRGIOM = Right margin ; SUBHEAD = Array of subheaders from file 64.5, misc, micro & AP to show results. Null param = get all results |
|
TEST | ; Test the output
|
|
GET64(Y) | ; Get minor headers from file 64.5
|
|
PT | ; Test with a loop thru multiple patients
|
|
CLEAN | ; Clean up TMP globals
|
|
AP(DFN) | ; Get just the AP results
|
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | PT+5 |
^LAB(64.5 - [#64.5] | GET64+3 |
^LR - [#63] | LRLLOC+2 |
^TMP("LRC" | EN+25, TEST+2, PT+5!, AP+3! |
^TMP("LRCMTINDX" | CLEAN+1! |
^TMP("LRH" | PT+5! |
^TMP("LRPLS" | CLEAN+1! |
^TMP("LRPLS-ADDR" | CLEAN+1! |
^TMP("LRT" | PT+5!, CLEAN+1! |
^TMP($J | LRLLOC+3*, LRLLOC+4*, EN+15! |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%I | AP+2~ |
A | EN+16~ |
AGE | LRLLOC+3, EN+16~ |
B | LRLLOC+1~ |
C | LRLLOC+1~ |
CCNT | LRLLOC+1~, LRLLOC+2* |
COUNT | EN~, EN+21* |
CT1 | EN+16~, EN+18* |
DFN | LRLLOC+3, EN~, EN+12, EN+13, PT+1~, PT+4*, PT+5*, AP~, AP+1, AP+10 |
DIC | DFN+1!, EN+16~ |
DOB | EN+16~ |
DTIME | PT+2 |
E | AP+2~ |
EDATE | EN~, EN+23 |
F | EN+16~ |
G | EN+16~ |
GCNT | LRLLOC+1~, LRLLOC+2* |
GIOM | LRLLOC+1~, LRLLOC+10~, LRLLOC+11*, LRLLOC+12*, AP+2~, AP+8*, AP+9*, AP+10 |
GIOSL | LRLLOC+1~, LRLLOC+2* |
H | EN+16~ |
I | EN+16~, GET64+1~, GET64+2*, GET64+3* |
IFN | EN+16~, TEST+1~, TEST+2* |
INC | EN+16~ |
IO | DFN+3 |
J | EN+16~, GET64+1~, GET64+3* |
K | EN+16~ |
LR | EN+16~ |
LRA | EN+16~ |
LRAA | EN+16~ |
LRABV | EN+16~ |
LRACT | EN+16~ |
LRADM | EN+16~, EN+18* |
LRADX | EN+16~, EN+18* |
LRAU | AP+2~ |
LRCNT | EN+16~ |
LRCTN | EN+16~ |
>> LRDFN | LRLLOC+2, LRLLOC+3, LRLLOC+4, EN+13*, EN+14 |
LRDP | EN+16~ |
>> LRDPF | LRLLOC+3 |
LREND | DFN*, EN+16~, EN+23* |
LRGIOM | LRLLOC+11, EN~, EN+22* |
>> LRIDT | DFN*, EN+23* |
>> LRIN | DFN*, EN+23* |
LRJ02 | EN+16~ |
>> LRLLOC | LRLLOC+2* |
LRMD | EN+16~ |
LRMIT | EN+16~ |
LRN | EN+16~ |
LRNAME | EN+16~ |
>> LROUT | DFN*, EN+23* |
LRPRAC | EN+16~ |
LRQ | EN+16~ |
LRRB | EN+16~ |
LRSAV | EN+16~ |
LRSB | LRLLOC+1~ |
LRSPE | EN+16~ |
LRSPEM | EN+16~ |
LRTEST | EN+16~ |
LRTOP | EN+16~ |
LRTREA | EN+16~ |
LRUNKNOW | EN+16~ |
LRUNT | EN+16~ |
LRV | AP+2~ |
LRVAL | EN+16~ |
LRW | EN+16~ |
>> LRWRD | LRLLOC+2 |
LRZ | AP+2~ |
M | EN+16~ |
N | EN+16~ |
P | EN+16~ |
P7 | EN+16~ |
>> PNM | LRLLOC+3 |
PTN | PT+1~, PT+5* |
PTNX | PT+1~, PT+4*, PT+5 |
S1 | EN+16~ |
SDATE | EN~, EN+23 |
SP | EN+16~ |
>> SSN | LRLLOC+2*, LRLLOC+3 |
SUBHEAD | LRLLOC+4, LRLLOC+8, LRLLOC+9, EN~, AP+2~, AP+10 |
SUBHEAD("AUTOPSY" | AP+7* |
SUBHEAD("BLOO | D BANK" , LRLLOC+9 |
SUBHEAD("CYTOPATHOLOGY" | AP+4* |
SUBHEAD("EM" | AP+6* |
SUBHEAD("MICROBIOLOGY" | LRLLOC+8 |
SUBHEAD("MISC | ELLANEOUS TESTS" , LRLLOC+4 |
SUBHEAD("SURG | ICAL PATHOLOGY" , AP+5* |
T | EN+16~ |
U | LRLLOC+3 |
VA | LRLLOC+1~, EN+19! |
VA200 | LRLLOC+1~ |
VADM | EN+19! |
VAERR | LRLLOC+1~, EN+19! |
VAIN | EN+19! |
VAIN(7 | EN+18 |
VAIN(9 | EN+18 |
W | LRLLOC+1~ |
X | EN+16~, GET64+3*, PT+1~, PT+2*, PT+3, PT+4 |
X1 | EN+16~ |
X2 | DFN+1! |
XZ | EN+16~ |
Y | DFN+2, EN~, EN+16~, EN+25*, GET64~, GET64+11*, PT+5 |
Y( | GET64+3* |
Y("AUTOPSY" | GET64+10* |
Y("BLOOD BANK | " , GET64+6* |
Y("CYTOPATHOLOGY" | GET64+7* |
Y("EM" | GET64+9* |
Y("MICROBIOLOGY" | GET64+5* |
Y("MISCELLANE | OUS TESTS" , GET64+4* |
Y("SURGICAL P | ATHOLOGY" , GET64+8* |
Y1 | EN+16~ |
>> ZIP | AP+10 |
ZTRTN | DFN+1! |