©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
LRAPQACN ;AVAMC/REG - CONSULTATION RPTS ;8/12/95 12:05 [ 04/28/2003 12:10 PM ]
Source file <LRAPQACN.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| B | ;S LRI=$O(^LR(LRXREF,LRY,LRABV,LRAN,LRDFN,0)) D:$Y>(IOSL-6) H Q:LR("Q") D P W !,LRP,?36,SSN D EN^LRAPPF1 Q:LR("Q") W !,LR("%") Q
|
|
| END | ||
| H | ||
| P | ||
| Y2K | ||
| AU | ||
| ASK | ||
| QUE | ||
| OUT |
| Name | Field # of Occurrence |
|---|---|
| ^LRAP | LRAPQACN+4 |
| EN^LRAPPF1 | B+1 |
| ^LRAPSM1 | QUE+4 |
| ^LRAPT2 | AU |
| CK^LRAUSM | ASK+1 |
| B^LRU | LRAPQACN+6 |
| D^LRU | AU |
| F^LRU | H+1 |
| L^LRU | QUE |
| M^LRU | H |
| S^LRU | QUE, QUE+4 |
| SSN^LRU | AU, P |
| V^LRU | END |
| XR^LRU | QUE |
| YN^LRU | LRAPQACN+3 |
| EN^LRUA | QUE |
| EN2^LRUA | QUE+4 |
| SET^LRUA | QUE+4 |
| BEG^LRUTL | LRAPQACN+7 |
| END^LRUTL | OUT |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: READ |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC - [#1] | P |
| ^LR - [#63] | QUE+3, Y2K+5, B+1, P |
| ^TMP("LRAP" | QUE!, Y2K+2*, Y2K+5, OUT! |
| ^TMP($J | QUE!, QUE+2*, Y2K+2 |
| Name | Line Occurrences |
|---|---|
| @( | QUE+3, Y2K+5 |
| ASK | LRAPQACN+4, ASK+1 |
| END | LRAPQACN+3, LRAPQACN+4, LRAPQACN+5, LRAPQACN+6, LRAPQACN+7, OUT |
| H | Y2K+4, B+1 |
| P | B+1, AU |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | LRAPQACN+3* |
| >> A | Y2K+2* |
| >> A("B" | ASK!, ASK+1 |
| >> B | LRAPQACN+4*, LRAPQACN+5, Y2K+2*, ASK |
| >> DOB | AU* |
| DT | Y2K |
| DTIME | ASK |
| >> HRCN | B+1 |
| IO | QUE |
| IOSL | B+1, H |
| >> LR | QUE* |
| >> LR("%" | B+1, H+1 |
| >> LR("A" | QUE* |
| >> LR("DIWF" | QUE* |
| >> LR("F" | Y2K+4*, H |
| >> LR("Q" | Y2K+5, B+1, H |
| >> LR("W" | QUE+4* |
| >> LR(1 | QUE* |
| >> LR(2 | QUE* |
| >> LR(3 | QUE* |
| >> LRA | QUE+4* |
| >> LRABV | Y2K+5, B+1 |
| >> LRAN | Y2K+5*, B+1 |
| >> LRDFN | Y2K+5*, B+1, P |
| >> LRDPF | P* |
| >> LRI | B+1* |
| >> LRLDT | LRAPQACN+6*, QUE+3 |
| >> LRM( | ASK+2* |
| >> LRM(1 | ASK* |
| >> LRN | LRAPQACN+4*, LRAPQACN+5* |
| >> LRN( | ASK+2* |
| >> LRN(1 | ASK* |
| >> LRO | QUE* |
| >> LRO(68 | QUE+2, H+1 |
| >> LRP | B+1, P* |
| >> LRQ(0 | LRAPQACN+5 |
| >> LRQ(3 | QUE+4*, Y2K+4* |
| >> LRQ(9 | QUE+4* |
| >> LRS(5 | QUE+4* |
| >> LRSDT | LRAPQACN+6*, QUE+3* |
| >> LRSN | QUE+1* |
| >> LRSS | QUE, QUE+3, Y2K+4, Y2K+5 |
| >> LRTMPA | Y2K*, Y2K+2 |
| >> LRXR | QUE+3 |
| >> LRXREF | Y2K+5, B+1 |
| >> LRY | Y2K+2*, Y2K+5*, B+1 |
| >> POP | LRAPQACN+7 |
| >> S | QUE* |
| >> S(2 | QUE+1*, QUE+2 |
| >> S(7 | QUE+1*, QUE+2 |
| >> SEX | AU* |
| >> SSN | AU*, P* |
| U | LRAPQACN+4, QUE+2, ASK |
| >> V | QUE+1* |
| >> X | LRAPQACN+4, LRAPQACN+5, QUE+3*, AU, P*, ASK*, ASK+1, ASK+2 |
| >> Y | LRAPQACN+4, LRAPQACN+6, AU*, P* |
| >> ZTRTN | LRAPQACN+7* |
| >> ZTSK | LRAPQACN+7 |