LRBLTA1 ; IHS/DIR/FJE - TRANSFUSION REACTION COUNTS 10/7/90 10:54 ;
Source file <LRBLTA1.m>
| Package | Total | Call Graph |
|---|---|---|
| Lab Service | 3 | N^LRBLTA (DT,F,M,V)^LRU END^LRUTL |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| C | ;S LRI=0 F S LRI=$O(^TMP($J,LRR,LRDFN,LRI)) Q:'LRI!(LR("Q")) D:$Y>(IOSL-6) H1 Q:LR("Q") W !,SSN,?5,LRP,?36 S Y=+$G(^LR(LRDFN,1.9,LRI,0)) D DT^LRU W Y
|
|
| B | ||
| END | ||
| H | ||
| H1 | ||
| S |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LAB(65.4 - [#65.4] | LRBLTA1+6 |
| ^LR - [#63] | C+1 |
| ^LR("AR" | LRBLTA1+5 |
| ^TMP($J | LRBLTA1+4!, LRBLTA1+6, S, B, C+1 |
| Name | Line Occurrences |
|---|---|
| B | LRBLTA1+6 |
| C | B |
| END | LRBLTA1+7 |
| H | LRBLTA1+4, LRBLTA1+6, H1 |
| H1 | C+1 |
| S | LRBLTA1+5 |
| Name | Field # of Occurrence |
|---|---|
| ^( | S* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> HRCN | C+1 |
| IOSL | LRBLTA1+6, C+1 |
| IOST | H |
| >> LR("%" | H+2 |
| >> LR("F" | H |
| >> LR("Q" | LRBLTA1+4, LRBLTA1+6, B, C+1, H, H1 |
| >> LRDFN | LRBLTA1+5*, S, B*, C+1 |
| >> LRF | LRBLTA1+6, S, H+2 |
| >> LRI | LRBLTA1+5*, S, C+1* |
| >> LRLDT | LRBLTA1+5 |
| >> LRLST | H+2 |
| >> LRP | C+1 |
| >> LRR | LRBLTA1+5*, LRBLTA1+6*, S, B, C+1 |
| >> LRR(1 | LRBLTA1+6*, H1 |
| >> LRSDT | LRBLTA1+5 |
| >> LRSTR | H+2 |
| U | LRBLTA1+6 |
| >> Y | C+1* |