©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
ABPVDG01 ;QUEUE PRIVATE INSURANCE ELIG I/P ADMIT REPORT; [ 06/04/91 12:45 PM ]
Source file <ABPVDG01.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 2 | ^%ZIS ^%ZTLOAD |
| Third Party Tracking | 2 | ^ABPVDATE ^ABPVHD |
| VA Fileman | 1 | DT^DICRW |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DATES | ||
| TITLE | ||
| ZTLOAD | ||
| START | ||
| INIT | ||
| ZTLEND | ||
| DEVICE |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUTTSITE(1 | INIT+1 |
| ^DIC(4 - [#4] | INIT+3 |
| Name | Line Occurrences |
|---|---|
| DATES | START+1 |
| DEVICE | START+2 |
| INIT | START |
| TITLE | START |
| ZTLEND | START, START+1, START+2 |
| ZTLOAD | START+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %IS | DEVICE*, ZTLEND! |
| %ZIS | ZTLEND! |
| ABPV | ZTLEND! |
| ABPV("BEG" | START+1, DATES+1* |
| ABPV("END" | START+1, DATES+1* |
| ABPV("HD" | TITLE!, TITLE+1*, TITLE+2* |
| ABPV("IO" | START+2, DEVICE+3* |
| ABPV("SITE" | INIT+2* |
| ABPV("SITENAME" | INIT+3* |
| BDT | DATES+1! |
| DUZ(2 | INIT, INIT+1*, INIT+2, INIT+3 |
| EDT | DATES+1! |
| I | ZTLEND! |
| IO | DEVICE+1, DEVICE+3 |
| IOP | DEVICE*, ZTLEND+1*! |
| R | ZTLEND! |
| ZRTN | ZTLEND! |
| ZTDESC | ZTLOAD+1*, ZTLEND! |
| ZTDTH | ZTLEND! |
| >> ZTIO | ZTLOAD* |
| >> ZTRTN | ZTLOAD* |
| ZTSAVE | ZTLEND! |
| ZTSAVE("ABPV(" | ZTLOAD* |
| ZTSK | ZTLOAD+2, ZTLEND! |