©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
APCLVST ; IHS/CMI/LAB - PRINTS A PATIENT'S LAST VISIT ;
Source file <APCLVST.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 3 | ^%ZIS ^%ZISC ^%ZTLOAD |
| Patient Care Component | 1 | ^APCDVDSP |
| VA Fileman | 1 | ^DIC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ;
|
||
| START | ;
|
|
| ZTM | ;ENTRY FOR TASK MANAGER
|
|
| TSKMN | ;
|
|
| EOJ | ;ENTRY POINT
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^AUPNPAT - [#9000001] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVSIT("AA" | START+3, START+4 |
| Name | Line Occurrences |
|---|---|
| EOJ | APCLVST+6, APCLVST+8, APCLVST+9, APCLVST+12 |
| APCLVST+7 | |
| START | APCLVST+5 |
| TSKMN | APCLVST+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %ZIS | PRINT+1* |
| APCDVDSP | START+5*, EOJ+2! |
| APCXFLAG | APCLVST+6, START+1*, START+2*, START+3*, EOJ+2! |
| APCXLAST | START+4*, EOJ+2! |
| APCXVDFN | START+4*, START+5, EOJ+2! |
| AUPNDAYS | EOJ+2! |
| AUPNDOB | EOJ+2! |
| AUPNDOD | EOJ+2! |
| AUPNPAT | START+3, START+4, EOJ+2! |
| AUPNSEX | EOJ+2! |
| DA | EOJ+3! |
| DIC | START+2*!, EOJ+3! |
| DIC(0 | START+2* |
| IO | APCLVST+10, ZTM+2 |
| IO("Q" | APCLVST+9, PRINT+1! |
| ION | TSKMN+1 |
| IOP | PRINT+1! |
| >> POP | APCLVST+8 |
| X | EOJ+3! |
| Y | START+2, EOJ+3! |
| >> ZTDESC | TSKMN+1* |
| >> ZTDTH | TSKMN+1* |
| >> ZTIO | TSKMN+1* |
| ZTQUEUED | ZTM+1, EOJ+3! |
| >> ZTREQ | ZTM+1* |
| >> ZTRTN | TSKMN+1* |
| ZTSAVE | TSKMN+1! |
| ZTSAVE("APCDVDSP" | TSKMN+1* |
| ZTSK | EOJ+3! |