©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
LRAPPF2 ; IHS/DIR/AAB - ANAT PATH ACC# INDEX 8/13/95 22:01 ;
Source file <LRAPPF2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| N1 | ;F N=0:0 S N=$O(^TMP($J,"S",F,N)) Q:'N!(LR("Q")) S W=^(N) D:$Y>(IOSL-6) H1 Q:LR("Q") W !?6,$J(N,5),?12,$P(W,"^",2),?43,$P(W,"^",3) W:$P(W,"^")'="PATIENT" ?60,$P(W,"^")
|
|
| H1 | ||
| H |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP($J | LRAPPF2+3, N1+1 |
| Name | Line Occurrences |
|---|---|
| H | LRAPPF2+3, H1 |
| H1 | N1+1 |
| N1 | LRAPPF2+3 |
| Name | Field # of Occurrence |
|---|---|
| ^( | N1+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> A | LRAPPF2+3* |
| >> F | LRAPPF2+3*, N1+1 |
| >> H(4 | LRAPPF2+3* |
| IOSL | N1+1 |
| IOST | H |
| >> LR("%" | H+3 |
| >> LR("F" | H |
| >> LR("Q" | LRAPPF2+3, N1+1, H, H1 |
| >> LRLST | H+1 |
| >> LRO(68 | H+1 |
| >> LRSTR | H+1 |
| >> N | N1+1* |
| >> W | N1+1* |