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! |