©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
LA7DVEXT ;SFCIOFO/MJM/DALOI/PWC - Chemistry Extract Routine ;01/14/2000
Source file <LA7DVEXT.m>
| Package | Total | Call Graph |
|---|---|---|
| Health Level Seven | 1 | $$HLDATE^HLFNC |
| Kernel | 1 | $$FMTE^XLFDT |
| Registration | 1 | DEM^VADPT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| XTRCT | ; Call with LRDFN, GMTS1, GMTS2, MAX (#occurrences) & SEX (M or F)
|
|
| NXTST | ; Visit next node in ^(PTR) subtree
|
|
| RESULT(TEST,RESULT,LRCW) | ;Convert result to external format
|
|
| XPND | ; Appends additional data if required
|
|
| CHSET | ; Sets Chemistry locals for printing
|
|
| DATE | ; convert date from internal date format to MM/DD/YY TT:TT
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LAB(60 - [#60] | NXTST+4, NXTST+5, NXTST+7, NXTST+8, NXTST+9, NXTST+15, RESULT+6 |
| ^LAB(61 - [#61] | CHSET+4, CHSET+5 |
| ^LR - [#63] | XTRCT+5, CHSET+2, CHSET+4, CHSET+5, CHSET+6, CHSET+7, CHSET+8, NXTST+2 |
| ^TMP("LRC" | XTRCT+4!, CHSET+7, CHSET+8*, NXTST+19, NXTST+20, NXTST+21*, XPND+1* |
| Name | Line Occurrences |
|---|---|
| $$RESULT | NXTST+14 |
| CHSET | XTRCT+5 |
| DATE | CHSET+5 |
| NXTST | CHSET+6 |
| XPND | NXTST+22 |
| Name | Field # of Occurrence |
|---|---|
| ^( | NXTST+2, NXTST+5, NXTST+8, NXTST+19 |
| ^(0 | CHSET+4, CHSET+5, NXTST+5, NXTST+15 |
| ^(10 | NXTST+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACC | CHSET+1~, CHSET+5*, XPND+1 |
| AGE | XTRCT+1~, XTRCT+2, XTRCT+3* |
| CDT | CHSET+1~, CHSET+4*, CHSET+5*, NXTST+21 |
| CIS | NXTST+1~, NXTST+2*, NXTST+9*, NXTST+10*, NXTST+12 |
| CNT | XTRCT+1~, XTRCT+5*, CHSET+4* |
| COM | CHSET+1~, CHSET+8* |
| DESCR | NXTST+1~, NXTST+15*, NXTST+16 |
| >> EXPAND | CHSET+5, NXTST+3, NXTST+12, NXTST+18, NXTST+22 |
| FLAG | NXTST+1~, NXTST+2*, NXTST+3*, NXTST+18*, NXTST+21 |
| GMI | CHSET+1~, CHSET+8* |
| GMPC | NXTST+1~ |
| GMSQN | NXTST+1~, NXTST+8*, NXTST+19*, NXTST+20, NXTST+21, XPND+1 |
| >> GMTS1 | XTRCT+5 |
| >> GMTS2 | XTRCT+5 |
| HI | NXTST+1~, NXTST+16*, NXTST+17, NXTST+18, NXTST+21 |
| IDT | XTRCT+1~, XTRCT+5*, CHSET+2, CHSET+4, CHSET+5, CHSET+6, CHSET+7, CHSET+8, NXTST+2, NXTST+19 , NXTST+20, NXTST+21, XPND+1 |
| ISVALID | CHSET+1~, CHSET+2* |
| LO | NXTST+1~, NXTST+16*, NXTST+17, NXTST+18, NXTST+21 |
| LOC | CHSET+1~, CHSET+5*, XPND+1 |
| LRCW | RESULT~, RESULT+5* |
| >> LRDFN | XTRCT+5, CHSET+2, CHSET+4, CHSET+5, CHSET+6, CHSET+7, CHSET+8, NXTST+2 |
| >> MAX | XTRCT+5 |
| PTR | CHSET+1~, CHSET+6*, NXTST+2, NXTST+4, NXTST+8 |
| RDT | CHSET+1~, CHSET+5*, XPND+1 |
| RESULT | NXTST+1~, NXTST+2*, NXTST+14*, NXTST+18, NXTST+21, RESULT~, RESULT+6 |
| >> RWIDTH | NXTST+14 |
| SITE | CHSET+1~, CHSET+4*, CHSET+5, NXTST+15 |
| SNOMED | CHSET+1~, CHSET+3*, CHSET+4*, CHSET+5 |
| SPEC | CHSET+1~, CHSET+4*, CHSET+5*, NXTST+21 |
| TEST | NXTST+1~, NXTST+4*, NXTST+5, NXTST+7, NXTST+8, NXTST+9, NXTST+14, NXTST+15, NXTST+19, RESULT~ , RESULT+6 |
| THER | NXTST+1~, NXTST+15*, NXTST+16 |
| TNM | NXTST+1~, NXTST+5*, NXTST+12*, NXTST+21 |
| U | CHSET+2, CHSET+4, CHSET+5, NXTST+2, NXTST+5, NXTST+7, NXTST+8, NXTST+15, NXTST+16, NXTST+21 , XPND+1 |
| UNIT | NXTST+1~, NXTST+16*, NXTST+21 |
| VADM | XTRCT+6! |
| VADM(4 | XTRCT+3 |
| X | CHSET+5*, DATE+1*, RESULT+4~, RESULT+6*, RESULT+7 |
| X1 | RESULT+4~, RESULT+6* |